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
Which is the default, TEST BEFORE or TEST AFTER for a PERFORM statement?
What are the different data types in cobol?
How to get the last record in vsam file in cluster? And how can you get the ksds file records into cobol program?
How you can characterize tables in cobol?
What is perform what is varying?
What is the difference between binary search and sequential search?
how do you reference the fixed unblock file formats from cobol programs
how can i see junk values in dclgen or in hostvariable of comp ?
Are you comfortable in cobol or jcl?
how to move the records from file to array table. give with code example
Explain the configuration section of a cobol program with examples of syntax.
Explain about different table spaces.
I have a File that has duplicate records. I need only those records that occur more than thrice.?
How do you reference the fixed block file formats from cobol programs
) how do u code after getting data?