How do you define a sort file in JCL that runs the COBOL
program?
Answer Posted / savemeenachilar
//STEP1 EXEC
PGM=SORT
//SORTIN DD
DSN=XMMD01.DEV3.REPORT6.LIST,DISP=SHR
//SORTOUT DD
DSN=AMMDPM1.DEV3.SAMPLE.SRTOUT1,
// DISP=
(NEW,CATLG,DELETE),
//
UNIT=SYSDA,
//
MGMTCLAS=DEVL,
// SPACE=(CYL,
(1,10),RLSE),
// DCB=
(RECFM=FB,LRECL=133)
//SYSIN DD
*
SORT FIELDS=
(29,8,CH,A)
SUM
FIELDS=NONE
INCLUDE COND=
(2,1,CH,EQ,C'B',AND,
(113,1,CH,EQ,C'Y',OR,113,1,CH,EQ,C'N'))
/*
//SYSOUT DD
SYSOUT=*
/*
| Is This Answer Correct ? | 4 Yes | 5 No |
Post New Answer View All Answers
How to remove 2 duplicate records and copy only one using job control language?
IF I mention stop run in CICS what happens?
)If there are 10 steps in GDG, if I want to refer the step2 after step5 . what should I do?
What is Pic 9v99 Indicates in COBOL?
What are the cobol coding sheets?
What is the difference between PIC 9.99 and PIC9v99?
How arrays can be defined in COBOL?
In COBOL, what is the different between index and subscript?
What is the difference between Call and a Link?
Name some of the examples of COBOl 11?
How you can read the file from bottom?
What is the problem of ordered sequential files access?
what is the difference between COBOL2 AND COBOL390?
how do you reference the variable unblock file formats from cobol programs
What are different data types in cobol?