In the SMTPMVS procedure, we have:

//SMTPMVS EXEC PGM=IRXJCL,
//         PARM='SMTPHDR &SENDTO &CCTO &BCCTO &HDR2 &SUBJECT &TRACE'

If we specify 'HDR2=1 TO READ A 'HEADER2' DDNAME FOR
ADDITIONAL MESSAGE HEADER DATA'

might we put date/time information in the HEADER2 DD statement like:

/* Build secondary header */                                           02740008
 queue 'Data'                                                           02750008
 day = Substr(Date('W'),1,3)                                            02760008
 queue 'Date:' day',' Date('N') TIME('N')                               02770008

and end up with a field:

Date: Thu, 15 APR 2010 00:21:27 PDT

On the message?

John Donnelly
National Semiconductor Corporation
2900 Semiconductor Drive
Santa Clara, CA 95051

408-721-5640
408-470-8364 Cell
[email protected]





----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Reply via email to