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


Please Help Members By Posting Answers For Below Questions

Hi pls anybody tell me about " ANALYSIS DOCUMENT PREPARATION AND ESTIMATION OF TASK " (in real time project)."I want to update a sequential file in my project" for that purpose i need both structures i mean analysis document and estimation of task.

1701


What is the difference between external and global variables in COBOL?

814


Have you used comp and comp-3 in your project? And how?

2008


How to traceback if I am getting SOC7 or SOC4 abend? List down the steps

946


In COBOL programming, what is PERFORM? What is VARYING?

672






Give some examples of command terminators?

759


What is the Purpose of POINTER Phrase in STRING command in COBOL?

721


Why do we code s9 (4) comp. Inspite of knowing comp-3 will occupy less space?

720


How to use the same COBOL program in Batch and CICS on lines? explain with an example

1914


Which Search verb is equivalent to PERFORM…VARYING?

686


how do you reference the rrds file formats from cobol programs

800


INREC AND OUTREC? HOW TO SPLIT 5K RECORDS TO DIFFERENT FILES IN A FILE IN COBOL? RESTART IN COBOL-DB2? ISOLATION LEVELS?

422


Can we redefine the field of x(200) to less than 200?

820


) How do u handle errors in BMS macro

1511


What are the different open modes available in cobol?

722