D_KEYSTORE

SUMMARY
   d_keystore(FIELD[,dbn])
   long FIELD;
   int dbn;

ARGUMENTS
   FIELD       The field type of the optional key field the existence of which
               is to be stored.

   dbn         (optional) The number of the database containing the record.

DESCRIPTION
   This function creates a key entry from the data contained in the current
   record for the optional key FIELD.This function can only be called after
   the record has been created, Once stored, an optional key will
   automatically be modified its field contents (e.g. by d_recwrite).


CURRENCY CHANGES
   None.

RETURN CODES

  -5     S_INVFLD       Invalid field type.You either did not pass a field
                        type or you passed a field type which is not in the
                        current record.

   -24   S_NOTLOCKED    Data file containing FIELD is not locked.

   -27   S_TRNOTACT     Transactions not active.In shared mode, changes can
                        only be made from within a transaction.

   -37   S_NOTOPTKEY    Specified field type is not defined as an optional key.

   -38   S_BADFIELD     Specified field type not defined in current record.


EXAMPLE

   /* batch load key for daily stock tracking record  */
   for (d_recfrst(STOCK);db_status==S_OKAY;
        d_recnext(STOCK))
        {
        d_keystore(ID_CODE);
        }