1 /* BEGIN mrds_security_info.incl.pl1 -- reb, 81-05-13 */
 2 
 3 /* DESCRIPTION:
 4 
 5    The reason for this structure is to return security related information to
 6    the user.
 7 
 8 
 9    HISTORY:
10 
11    81-05-13 Rickie E. Brinegar: Originally written.
12 
13 */
14 
15 dcl 1 mrds_security_info based (mrds_security_info_ptr),
16     2 db_secure bit (1) unal,                              /* ON => database is in a secure state */
17     2 administrator bit (1) unal,                          /* ON => user is currently an administrator */
18     2 pad bit (34) unal;                                   /* reserved for future use */
19 
20 dcl mrds_security_info_ptr ptr;
21 
22 /* END mdbm_rm_db_info.incl.pl1 */
23