D_CSOGET

SUMMARY
   d_csoget(SET,dba[,dbn])
   int SET;
   DB_ADDR *dba;
   int dbn;

ARGUMENTS
   SET       Set type for which the current owner's database address is to
             be returned.

   dba       Pointer to a BD_ADRR variable to receive the database address
             of the current member.

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


DESCRIPTION
   This function copies the database address of the current owner of SET
   into the  database address variable pointer to by dba. It is used in
   conjuction with the d_csoset function for saving and restoring the
   current owner of a set. If the current owner is null (NULL_DBA) error
   code S_NOCO is returned as a status (i.e dberr is not called) and dba
   will receive the null database address.

──────────────────────────────────────────────────────────────────────────
Note:
   If the record type of the current owner is timestamped, you should also
   call function d_gtsco to get the last access timestamp of current
   owner. Then the current owner is later restored by d_csoset, function
   d_stsco should also be called to restore the last access timestamp
   associated with that current owner record.
──────────────────────────────────────────────────────────────────────────

CURRENCY CHANGES
   None

RETURN CODES
   -2   S_INVSET       Invalid set type. Probably passed a record or field
                       type instead of a set type.

   -8   S_NOCO         The current owner is null. Returned as a status not
                       an error

EXAMPLE


   DB_ADDR dba;
    ..
   /* save current author on stack for later processing */
   d_csoget(HAS_PUBLISHED,&dba)
    ..     /* print key words thru info_to_key */
   /* restore saved author as owner of has_published */
   d_csoset(HAS_PUBLISHED,&dba);d_
    ..