What has to change in the script below in order to generate more than one entry to the outfile? I am capturing the data to send to an outfile but it only posted the first occurence to the dataset
/* REXX */
ADDRESS TSO
"ALLOC FI(OUTFILE) DSNAME('xxxxx.xxxxxxxx.xxxxxx') MOD REUSE"
DAYS = DATE("B")
NEWDATE = DAYS
DATE1 = DATE('S',NEWDATE,'B')
STR1 = DATE1
STR2 = " "
STR3 = IMFTEXT
STRING = STR1 STR2 STR3
PUSH STRING
ADDRESS MVS
"EXECIO 1 DISKW OUTFILE (FINIS"
ADDRESS TSO
"FREE FI(OUTFILE)"
Software/Hardware used:
EXECIO
ASKED:
February 18, 2011 3:34 AM
UPDATED:
February 18, 2011 2:23 PM