1 /* BEGIN INCLUDE FILE ... sdm_data.incl.pl1 */
 2 /* Created:  20 December 1978 by G. Palter */
 3 /* Modified: 17 September 1982 by G. Palter to add sdm_data_$ec_suffix and sdm_data_$ec_search_list */
 4 /* Modified: August 1983 by G. Palter as part of send_mail conversion */
 5 
 6 
 7 /* Constant data used by the send_mail subsystem */
 8 
 9 dcl  sdm_data_$version character (32) varying external;     /* current version of the subsystem */
10 
11 dcl  sdm_data_$info_directory character (168) external;     /* directory containing self-documenation */
12 
13 dcl  sdm_data_$special_message character (256) varying external;
14                                                             /* message to print on each invocation if not null */
15 
16 dcl  sdm_data_$ec_suffix character (32) external;           /* exec_com suffix for send_mail */
17 dcl  sdm_data_$ec_search_list character (32) external;      /* exec_com search list */
18 
19 dcl 1 sdm_data_$default_options like send_mail_options aligned external;
20                                                             /* default options to control send_mail */
21 
22 
23 /* Static data used by the send_mail subsystem */
24 
25 dcl  sdm_data_$first_invocation bit (1) aligned external;   /* ON => this is the first invocation in this process */
26 
27 dcl  sdm_data_$default_from_field pointer external;         /* -> an address list to be used when asked to display the
28                                                                From field and it has not been explicitly set by the user:
29                                                                this list contains exactly 1 address -- the user's mail
30                                                                table address (or default mailbox address if anonymous) */
31 
32 /* END INCLUDE FILE ... sdm_data.incl.pl1 */