1 /* BEGIN INCLUDE FILE ... ssu_rp_options.incl.pl1 */
 2 /* Created:  June 1982 by G. Palter */
 3 
 4 /* Options for the standard subsystem request processor */
 5 
 6 dcl  1 rp_options aligned based (rp_options_ptr),
 7        2 version character (8),
 8        2 language_info,                                     /* defines the request language */
 9          3 non_standard_language bit (1) aligned,           /* ... ON => use language defined in following array */
10          3 character_types (0 : 511) fixed binary (9) unaligned unsigned,
11        2 abbrev_info,                                       /* information related to abbreviation processing ... */
12          3 expand_request_lines bit (1) aligned,            /* ... ON => request processor should expand abbreviations */
13          3 default_profile_ptr pointer,                     /* ... -> profile to use if ".u" given without pathname */
14          3 profile_ptr pointer;                             /* ... -> abbreviation profile used by this subsystem */
15 
16 dcl  rp_options_ptr pointer;
17 
18 dcl  RP_OPTIONS_VERSION_1 character (8) static options (constant) initial ("rpo_0001");
19 
20 /* END INCLUDE FILE ... ssu_rp_options.incl.pl1 */