Difference between revisions of "Dbxckey()"
From Recital Documentation Wiki
Yvonnemilne (Talk | contribs) |
Yvonnemilne (Talk | contribs) |
||
Line 12: | Line 12: | ||
<input parameters> | <input parameters> | ||
− | char *dbx; /* Tagged index file descriptor | + | char *dbx; /* Tagged index file descriptor */ |
<output parameters> | <output parameters> | ||
− | char *key; /* Address of a buffer where the current key is returned | + | char *key; /* Address of a buffer where the current key is returned */ |
− | long *recno; | + | long *recno; /* Address of a buffer where the current record number associated with the key will be returned */ |
</code> | </code> | ||
Line 39: | Line 39: | ||
<code lang="c"> | <code lang="c"> | ||
#include <stdio.h> | #include <stdio.h> | ||
− | #include "dbl.h" | + | #include "dbl.h" /* Recital/Library include file */ |
− | #include "dblproto.h" /* Recital/Library prototype file */ | + | #include "dblproto.h" /* Recital/Library prototype file */ |
static dBFIELD fields[6] = { | static dBFIELD fields[6] = { | ||
"VESSEL", 'C', 18, 0, 0, | "VESSEL", 'C', 18, 0, 0, | ||
− | "LAT", 'N', 4, 1, 0, | + | "LAT", 'N', 4, 1, 0, |
− | "LONG", 'N', 4, 1, 0, | + | "LONG", 'N', 4, 1, 0, |
"AMOUNT", 'N', 10, 0, 0, | "AMOUNT", 'N', 10, 0, 0, | ||
− | "DATE", 'D', 8, 0, 0, | + | "DATE", 'D', 8, 0, 0, |
− | "FLAG", 'C', 9, 0, 0 | + | "FLAG", 'C', 9, 0, 0 |
}; | }; | ||
Line 58: | Line 58: | ||
main() | main() | ||
{ | { | ||
− | + | int rc; /* Return Code for error handling */ | |
− | + | char *dbf; /* File descriptor for table */ | |
− | + | char *dbx; /* File descriptor for tagged index */ | |
− | + | char record[58]; /* Array of char for records */ | |
− | + | char status; /* Deleted record flag */ | |
− | + | long recno; /* Table record variable */ | |
− | + | char key[21]; /* Storage location for keys */ | |
− | + | rc = dbdcache(100); | |
− | + | errorproc("dbdcache()","table cache specified.", rc); | |
− | + | rc = dbicache(100); | |
− | + | errorproc("dbicache()", "index cache specified.",rc); | |
− | + | rc = dbfilemode(1,0); | |
− | + | rc = dbopen("shipwreck.dbf", &dbf); | |
− | + | errorproc("dbopen()","table opened in shared mode.", rc); | |
− | + | rc = dbxopen(dbf, "shipwreck.dbx", &dbx); | |
− | + | errorproc("dbxopen()","tagged index opened.", rc); | |
− | + | rc = dbxtkey(dbx, "Santa Rosa ", &recno, 0); | |
− | + | errorproc("dbxtkey()", "record number found by key.", rc); | |
− | + | printf("\t\trecord number: \t%d\n", recno); | |
− | + | rc = dbxgetrk(dbf, dbx, "Santa Rosa ", record, &status); | |
− | + | errorproc("dbxgetrk()", "record retrieved by key.", rc); | |
− | + | printf("\t\t%s\n", record); | |
− | + | rc = dbxckey(dbx, key, &recno); | |
− | + | errorproc("dbxckey()", "current key read.", rc); | |
− | + | printf("\t\tcurrent key: \t%s\n", key); | |
− | + | rc = dbxclose(dbx); | |
− | + | errorproc("dbxclose()", "tagged index closed.", rc); | |
− | + | rc = dbclose(dbf); | |
− | + | errorproc("dbclose()", "table closed.", rc); | |
− | + | exit(0); | |
} | } | ||
Line 102: | Line 102: | ||
{ | { | ||
if ( rc != SUCCESS ) { | if ( rc != SUCCESS ) { | ||
− | + | printf("\n Error performing function %s -> %d\n", func, rc); | |
− | + | exit(1); | |
} | } | ||
− | printf("Function: t%s, t%s - | + | printf("Function: \t%s, \t%s - Ok\n", func, str); |
return; | return; | ||
} | } |
Latest revision as of 14:48, 5 May 2009
PURPOSE
read current key
SYNOPSIS
#include "dbl.h" int dbxckey(dbx, key, recno) <input parameters> char *dbx; /* Tagged index file descriptor */ <output parameters> char *key; /* Address of a buffer where the current key is returned */ long *recno; /* Address of a buffer where the current record number associated with the key will be returned */
RETURN VALUE
The dbxckey() function returns 0 for success, or < 0 if an error occurs. See the section on return code values for a detailed list of return codes.
DESCRIPTION
The dbxckey() function reads the current key and its associated record number for the active tag from the specified tagged index file, .DBX.
EXAMPLE
The following example reads the current key and its associated record number from the VESSEL tag of the shipwreck table.
#include <stdio.h> #include "dbl.h" /* Recital/Library include file */ #include "dblproto.h" /* Recital/Library prototype file */ static dBFIELD fields[6] = { "VESSEL", 'C', 18, 0, 0, "LAT", 'N', 4, 1, 0, "LONG", 'N', 4, 1, 0, "AMOUNT", 'N', 10, 0, 0, "DATE", 'D', 8, 0, 0, "FLAG", 'C', 9, 0, 0 }; static void errorproc( char *func, char *str, int rc); main() { int rc; /* Return Code for error handling */ char *dbf; /* File descriptor for table */ char *dbx; /* File descriptor for tagged index */ char record[58]; /* Array of char for records */ char status; /* Deleted record flag */ long recno; /* Table record variable */ char key[21]; /* Storage location for keys */ rc = dbdcache(100); errorproc("dbdcache()","table cache specified.", rc); rc = dbicache(100); errorproc("dbicache()", "index cache specified.",rc); rc = dbfilemode(1,0); rc = dbopen("shipwreck.dbf", &dbf); errorproc("dbopen()","table opened in shared mode.", rc); rc = dbxopen(dbf, "shipwreck.dbx", &dbx); errorproc("dbxopen()","tagged index opened.", rc); rc = dbxtkey(dbx, "Santa Rosa ", &recno, 0); errorproc("dbxtkey()", "record number found by key.", rc); printf("\t\trecord number: \t%d\n", recno); rc = dbxgetrk(dbf, dbx, "Santa Rosa ", record, &status); errorproc("dbxgetrk()", "record retrieved by key.", rc); printf("\t\t%s\n", record); rc = dbxckey(dbx, key, &recno); errorproc("dbxckey()", "current key read.", rc); printf("\t\tcurrent key: \t%s\n", key); rc = dbxclose(dbx); errorproc("dbxclose()", "tagged index closed.", rc); rc = dbclose(dbf); errorproc("dbclose()", "table closed.", rc); exit(0); } static void errorproc(func, str, rc) char *func; char *str; int rc; { if ( rc != SUCCESS ) { printf("\n Error performing function %s -> %d\n", func, rc); exit(1); } printf("Function: \t%s, \t%s - Ok\n", func, str); return; }