1 /* BEGIN INCLUDE FILE ... mlsys_open_options.incl.pl1 */
 2 /* Created:  June 1983 by G. Palter */
 3 
 4 /* Options for the mail_system_$open_mailbox entrypoint */
 5 
 6 dcl  1 open_options aligned based (open_options_ptr),
 7        2 version character (8),
 8        2 message_selection_mode fixed binary,               /* what types are to be read (all/ordinary/interactive) */
 9        2 sender_selection_mode fixed binary,                /* selects messages by who sent them */
10        2 message_reading_level fixed binary;                /* specifies whether all or only part of a message is read */
11 
12 dcl  OPEN_OPTIONS_VERSION_2 character (8) static options (constant) initial ("mlsopn02");
13 
14 dcl  open_options_ptr pointer;
15 
16 
17 dcl  ALL_MESSAGES fixed binary static options (constant) initial (0);
18                                                             /* read all messages in the mailbox ...
19                                                                ... used as both a message and sender selection mode */
20 
21 /* Defined message selection modes */
22 
23 dcl  (ORDINARY_MESSAGES                 initial (1),        /* read only ordinary messages */
24       INTERACTIVE_MESSAGES              initial (2))        /* read only interactive messages */
25           fixed binary static options (constant);
26 
27 
28 /* Defined sender selection modes */
29 
30 dcl  (ACCESSIBLE_MESSAGES               initial (-1),       /* reads whatever messages are accessible */
31       OWN_MESSAGES                      initial (1),        /* reads only those messages sent by this user */
32       NOT_OWN_MESSAGES                  initial (2))        /* reads only those messages not sent by this user */
33           fixed binary static options (constant);
34 
35 
36 /* Defined message reading levels */
37 
38 dcl  (READ_KEYS                         initial (1),        /* reads only the unique key of each message */
39       READ_MESSAGES                     initial (2))        /* reads the entire content of each message */
40           fixed binary static options (constant);
41 
42 /* END INCLUDE FILE ... mlsys_open_options.incl.pl1 */