1 /* BEGIN INCLUDE FILE ... _ssu_request_table.incl.pl1 */
 2 /* Created:  by W. Olin Sibert */
 3 
 4 /* format: style4,delnl,insnl,ifthenstmt,ifthen */
 5 
 6 
 7 /* Definition of a subsystem request table */
 8 
 9 dcl  1 rqt aligned based (rqt_ptr),
10        2 version character (8),
11        2 name character (32),                               /* name of this table */
12        2 flags,                                             /* this field is completely unused */
13          3 pad2 (6) bit (36) unaligned,
14        2 n_requests fixed binary,
15        2 requests (0 refer (rqt.n_requests)) like rq_data;
16 
17 dcl  rqt_ptr pointer;
18 
19 dcl  RQT_VERSION_4 character (8) static options (constant) initial ("srqt_4.0");
20 
21 
22 /* Definition of a single request's entry in the table */
23 
24 dcl  1 rq_data aligned based (rq_data_ptr),
25        2 code_loc bit (18) unaligned,                       /* -> (RTBOS) code sequence to invoke request */
26        2 namelist_loc bit (18) unaligned,                   /* -> (RTBOS) list of names for this request */
27        2 info_string,
28          3 loc bit (18) unaligned,                          /* -> (RTBOS) short description of request */
29          3 lth fixed binary (17) unaligned,                 /* length of description (0 if none) */
30        2 flags aligned like request_flags;                  /* miscellaneous flags */
31 
32 dcl  rq_data_ptr pointer;
33 
34 /* END INCLUDE FILE ... _ssu_request_table.incl.pl1 */