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
What is amode(24), amode(31), rmode(24) and rmode(any) (applicable to only mvsesa enterprise server) ?
I have to write to a outfile where the number of records in that file should be the header of that file using IMS.. can anyone help me in this issue
) what is the difference between AID and HANDLE AID?
how can i see junk values in dclgen or in hostvariable of comp ?
I have a program with an Array of 5000 occurences which is being passed from 5 sub levels to the front end screen. Thess 5 programs using each 5*2 = 10 different arrays with size as 5000. This is causing the transaction to utilize more storage consupmtion. I am looking to reduce the storage consumption. As part of that initially i thought Dynamic array may solve my problem. After viewing the comments given i see its same as normal array. IS there any other way we can resolve this issue?
What are 77 levels used for?
how to access the file from prodution from changeman tool and to submit a file to production
How to traceback if I am getting SOC7 or SOC4 abend? List down the steps
State the various causes of s0c1, s0c5 and s0c7.
i have 10 names in an array and my name is one of them also array is not in sorted order i need to display my name using index how will i do this
What is the compute verb? How is it used?
What is a report item?
How to get the last record in vsam file in cluster? And how can you get the kids file records into your cobol program?
Discuss about changing dataset name in proc.
What is Pic 9v99 Indicates in COBOL?