Ron,
Use the following control cards. I assumed that if there is a header then it
would be the first record in the file. So we skip the first record irrespective
of header presence and get the values from 2nd record. Since all records have
the patnum and compkey we just need 1 record to build the filename.
//SYSIN DD *
OPTION COPY,SKIPREC=1,STOPAFT=1
OUTREC BUILD=(C'Performdta_',
26,05,
C'_',
19,04,
C'_',
DATE1,
C'_',
TIME1,
C'.csv',
80:X)
/*
Thanks,
Kolusu
DFSORT Development
IBM Corporation
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
