1 /* Begin include file mlsys_mailer_data.incl.pl1 */
 2 
 3 dcl  MLSYS_MAILER_DATA_VERSION_1 char (8) aligned static options (constant) init ("mlsmdv_1");
 4 
 5 dcl  mlsys_mailer_data_n_recipients fixed bin;
 6 dcl  mlsys_mailer_data_ptr ptr;
 7 dcl  1 mlsys_mailer_data aligned based (mlsys_mailer_data_ptr),
 8        2 header,
 9          3 version char (8),
10          3 flags,
11            4 validate bit (1) unaligned,                    /* do not send the message */
12            4 report_errors bit (1) unaligned,               /* force reporting of errors */
13            4 dont_queue bit (1) unaligned,                  /* do not queue if it can't be sent */
14            4 send bit (1) unaligned,                        /* send as a message */
15            4 mail bit (1) unaligned,                        /* send as mail */
16            4 queue_only bit (1) unaligned,                  /* don't try to deliver */
17          3 source varying char (256),                       /* original source of mail */
18          3 total_recipients fixed bin,                      /* # of recipients for this call */
19        2 recipients (mlsys_mailer_data_n_recipients refer (mlsys_mailer_data.total_recipients))
20             like mlsys_mailer_recipient;
21 
22 dcl  1 mlsys_mailer_recipient aligned based,
23        2 flags,
24          3 processed bit (1) unaligned,                     /* this entry has been processed */
25          3 queued bit (1) unaligned,                        /* mail was queued for later delivery */
26          3 delivered bit (1) unaligned,                     /* mail has been delivered to this recipient */
27          3 fatal_error bit (1) unaligned,                   /* a fatal error occurred sending the mail */
28          3 expanded bit (1) unaligned,                      /* this recipient is due to a mailing list */
29          3 error_reported bit (1) unaligned,                /* the sender has been informed of any errors */
30        2 original_recipient_index fixed bin,                /* index of unexpanded recipient */
31        2 user_name char (128) varying,                      /* name at remote site */
32        2 host_name char (40) varying,                       /* host name for this recipient */
33        2 code fixed bin (35),                               /* results of sending/queueing for this recipient */
34        2 result varying char (128);                         /* explanation of result */
35 
36 /* End include file mlsys_mailer_data.incl.pl1 */