Try something like this
//SYSIN DD *
SORT FIELDS=COPY
INCLUDE COND=(21,3,CH,EQ,C'JOB',AND,
5,4,CH,EQ,C' ')
OUTFIL FNAMES=SORTOUT,CONVERT,OUTREC=(1:
1C'DO4',
27,6)
Kenneth Leidner
570-820-1926
Imagination is more important than knowledge.
-----Original Message-----
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf
Of Davis Kriss P
Sent: Thursday, May 12, 2005 1:57 PM
To: IBM-MAIN@BAMA.UA.EDU
Subject: DFSORT, INREC and BUILD
I am trying to build an output record that looks like
D04nnnnnn (where nnnnnn is in column 27 for a length of 6 in the
input record)
I found a start on the IBM
//SYSIN DD *
SORT FIELDS=COPY
INCLUDE COND=(21,3,CH,EQ,C'JOB',AND,
5,4,CH,EQ,C' ')
INREC BUILD=(1,1,C'D',2,2,C'04',27,6)
RECORD TYPE=F
----------------------------------------------------------------------
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
