Dbxtkey()
From Recital Documentation Wiki
Revision as of 10:39, 6 May 2009 by Yvonnemilne (Talk | contribs)
PURPOSE
translate tag key to record number
SYNOPSIS
#include "dbl.h" int dbxtkey(dbx, key, recno, softseek) <input parameters> char *dbx; /* Tagged index file pointer */ char key; /* Address of a buffer containing the key */ int softseek; /* If 1, then perform a softseek */ <output parameters> long *recno; /* Address of a buffer where record number is returned */
RETURN VALUE
The dbxtkey(() 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 dbxtkey() function translates a key into its associated record number by searching for the specified key in the active tag.
EXAMPLE
The following example searches for "Santa Rosa" in the VESSEL tag of the shipwreck table and returns the record number.
#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; }