1 /* BEGIN INCLUDE FILE  -  mrds_dsm_sem_info.incl.pl1 */
 2 
 3 /*
 4 This structure is used to communicate with mrds_dsm_semantics, and to
 5 maintain information across calls to mrds_dsm_semantics.
 6 
 7 79-12-19 Spratt: written
 8 
 9 81-05-07 Davids: added the data_model_ptr element
10 */
11 
12      dcl     mrds_dsm_semantics_info_ptr
13                                     ptr;
14      dcl     MRDS_DSM_SEMANTICS_INFO_VERSION_1
15                                     fixed bin (17) internal static options (constant) init (1);
16 
17      dcl     1 mrds_dsm_semantics_info
18                                     based (mrds_dsm_semantics_info_ptr) aligned,
19                2 version            fixed bin (35),
20                2 flags,
21                  3 debug_semantics  bit (1) unal,
22                  3 pad              bit (35) unal,
23                2 work_area_ptr      ptr,
24                2 error_iocb_ptr     ptr,
25                2 listing_iocb_ptr   ptr,
26                2 highest_severity   fixed bin (35),
27                2 submodel_iocb_ptr  ptr,
28                2 data_model_ptr     ptr;
29 
30 /* END INCLUDE FILE  -  mrds_dsm_sem_info.incl.pl1 */