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