D_GTSCR

SUMMARY
   d_gtscr(ts[,dbn])
   ULONG *ts;
   int dbn;

ARGUMENTS

   ts        Pointer to a ULONG (unsigned long) variable to contain
             timestamp value.

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


DESCRIPTION
   Function d_gtscr copies the last access timestamp for the current
   record into the unsigned long variable pointer to by ts.

──────────────────────────────────────────────────────────────────────────
Note:
   This function should be used with function d_crget to save the curent
   record's database address and last access timestamp, for those record
   types whitch are timestamped.
──────────────────────────────────────────────────────────────────────────

CURRENCY CHANGES
   None

RETURN CODES

   -7   S_NOCR         The current record is null.

   -41  S_TIMESTAMP    The current owner record type is not timestamped.

EXAMPLE

    ..

   DB_ADDR dba;
   ULONG   ts ;

   /* save current record for( lates retrievial */
   d_crget(&save_dba);
   d_gtscr (&ts);
    ..
   /* later - retrieve saved record */
   d_crset(&save_dba);
   d_stscr(&ts);
   if (d_crstst() == S_OKAY)
      d_recread(&irec);
    ..