View previous topic :: View next topic
Author
Message
lee_issc New User Joined: 11 Dec 2008Posts: 33 Location: China
Dears,
I am puzzled by the LRECL of SORTOUT these days.Say my JCL first
Code:
//SORTIN DD DSN=ACA.LIM.IMTAGT.S31,DISP=SHR
//SORTOUT DD DSN=TDL.LIM.CD.DOWN.TDS.TEMP33,
// DISP=(NEW,CATLG,DELETE),UNIT=SYSDA,
// SPACE=(TRK,(100,10),RLSE)
//* DCB=*.SORTIN
//SORTWK01 DD UNIT=DASD,SPACE=(CYL,5)
//SORTWK02 DD UNIT=DASD,SPACE=(CYL,5)
//SORTWK03 DD UNIT=DASD,SPACE=(CYL,5)
//SYSUDUMP DD SYSOUT=*
//SYSIN DD *
OPTION VLSCMP
INCLUDE COND=(29,4,CH,EQ,C'U101',OR,
29,4,CH,EQ,C'GTG8',OR,
29,4,CH,EQ,C'GTG6')
SORT FIELDS=(17,10,CH,A)
OUTREC FIELDS=(1:1,4,5:17,10,15:29,4)
/*
The LRECL of SORTIN is 2185 with VB.After sorted I got the 2185 length for the SORTOUT file.But I just want to a FB file with length 10+4.How can I do?
Back to top
Anuj Dhawan Superior Member Joined: 22 Apr 2006Posts: 6250 Location: Mumbai, India
lee_issc wrote:
But I just want to a FB file with length 10+4.How can I do?
Per your post, OUTREC should decide the LRECL for SORTOUT but what "10+4" means, did you want to say LRECL should be 14?
Back to top
lee_issc New User Joined: 11 Dec 2008Posts: 33 Location: China
Anuj Dhawan,
Quote:
did you want to say LRECL should be 14?
Yes.FB with LRECL 14.
Back to top
Frank Yaeger DFSORT Developer Joined: 15 Feb 2005Posts: 7129 Location: San Jose, CA
You can use the following DFSORT control statements to convert your VB file to an FB/14 file.
Code:
OPTION VLSCMP
INCLUDE COND=(29,4,CH,EQ,C'U101',OR,
29,4,CH,EQ,C'GTG8',OR,
29,4,CH,EQ,C'GTG6')
SORT FIELDS=(17,10,CH,A)
OUTFIL VTOF,BUILD=(17,10,29,4)
Back to top
Please enable JavaScript!