1 /* BEGIN INCLUDE FILE mrds_db_model_info.incl.pl1 - - Jim Gray 81-01-28 */ 2 3 /* HISTORY: 4 5 81-01-28 Jim Gray : originally created for the mmi_$get_model_info interface. 6 7 83-02-18 Davids: added db_type and dmfile_attributes substructure. Also 8 the constants mrds_db_model_info_VFILE_TYPE and DMFILE_TYPE. Changed version 9 value to 2 from 1. 10 11 83-02-24 Davids: renamed the before_journal element of the dmfile_attributes 12 substructure to rollback. and changed the VFILE_TYPE and DMFILE_TYPE to 13 vfile_type and dmfile_file 14 */ 15 16 /* DESCRIPTION: 17 18 This structure passes back information common to the whole database, 19 rather than that pertaining to a particular relation or attribute. 20 It refers to the database model, rather than to some submodel for that model. 21 This structure is to be used externally, not internal to MRDS. 22 23 */ 24 25 26 declare 1 mrds_db_model_info aligned based (mrds_db_model_info_ptr), 27 2 version fixed bin, /* version number for this structure */ 28 2 model_version fixed bin, /* the version number of the database model */ 29 2 db_type fixed bin, /* type of database, vfile or dmfile */ 30 2 dmfile_attributes, 31 3 protected bit (1) unal, /* "1"b implies that transactions must be used */ 32 3 rollback bit (1) unal, /* "1"b implies that it is possible to rollback a transaction */ 33 3 concurrency bit (1) unal, /* "1"b implies concurrency locks will be used */ 34 3 mbz bit (33) unal, 35 2 creator_id char (32), /* the person.project.tag of the database creator */ 36 2 creation_time fixed bin (71); /* the convert date to binary form of the database creation time */ 37 38 declare mrds_db_model_info_ptr ptr ; 39 40 declare mrds_db_model_info_structure_version fixed bin int static options (constant) init (2) ; 41 42 declare mrds_db_model_info_vfile_type fixed bin int static options (constant) init (1); 43 44 declare mrds_db_model_info_dmfile_type fixed bin int static options (constant) init (2); 45 46 47 /* END INCLUDE FILE mrds_db_model_info.incl.pl1 */