1 /* BEGIN INCLUDE FILE ... rdm_data.incl.pl1 */
 2 /* Created:  September 1983 by G. Palter */
 3 
 4 
 5 /* Constant data used by the read_mail subsystem */
 6 
 7 dcl  rdm_data_$version character (32) varying external;     /* current version of the subsystem */
 8 
 9 dcl  rdm_data_$info_directory character (168) external;     /* directory containing self-documenation */
10 
11 dcl  rdm_data_$special_message character (256) varying external;
12                                                             /* message to print on each invocation if not null */
13 
14 dcl  rdm_data_$ec_suffix character (32) external;           /* exec_com suffix for read_mail */
15 dcl  rdm_data_$ec_search_list character (32) external;      /* exec_com search list */
16 
17 
18 /* Static data used by the read_mail subsystem */
19 
20 dcl  rdm_data_$first_invocation bit (1) aligned external;   /* ON => this is the first invocation in this process */
21 
22 /* END INCLUDE FILE ... rdm_data.incl.pl1 */