Answer Posted / deepak gairola
The JCL
SORT FIELDS=COPY
INCLUDE COND=(60,2,CH,EQ,C'AN',
OR,60,3,CH,EQ,C'ANI')
SUM FIELDS=NONE
OUTFIL FNAMES=FB1,FTOV,OUTREC=(31,19)
If you want to convert to VB to FB use parameter VTOF...
The another method for this is using convert parameter..
This is VB to FB
//S4SORT EXEC
PGM=SORT
//SORTIN DD DSN=INPUT.VARIABLE.FILE,DISP=SHR
<=Variable input
//SORTOUT DD DSN=OUTPUT.FIXED.FILE, <===== Fixed output
// DISP=
(NEW,CATLG,DELETE),
// UNIT=(SYSDA),SPACE=(TRK,(50,15),RLSE),
// DCB=
(RECFM=FB,LRECL=80,BLKSIZE=27920)
//SYSOUT DD
SYSOUT=*
//SYSIN DD
*
INREC FIELDS=
(1:1,4,
6:6,74)
SORT FIELDS=
(62,8,CH,A)
OUTFIL OUTREC=
(1:1,4,
6:6,74,
80:C' '),CONVERT
Is This Answer Correct ? | 5 Yes | 2 No |
Post New Answer View All Answers
Why block size is multiple of lrecl in jcl?
define cond parameter in jcl?
What statement marks the beginning of an in-stream or cataloged procedure in jcl and assigns default values to parameters defined in the procedure?
what is SOC4 error?
can any one plzzzzzz tell the jcl code for creating ps using idcams
What do you understand by the term notcat 2 – gs?
List the various advantages of using jcl language?
Explain about LMQUERY�give a dialog information about a data set
what is “Cond= even” and “Cond=only”?
What happens if both JOBLIB & STEPLIB is specified ?
Explain how can an in-stream dataset be terminated?
what operation is performed by job statement?
What is the function of the dd mgmtclas keyword in sms datasets?
when does a dataset go uncataloged?
Explain the function of //jcllib statement?