How do you define a sort file in JCL that runs the COBOL program?

Categories >> Software >> MainFrame >> IBM MainFrame >> COBOL
Suggest New Category

How do you define a sort file in JCL that runs the COBOL
program?

Question Posted / guest

6 Answers
30290 Views
Syntel, I also Faced
E-Mail Answers

Answers were Sorted based on User's Feedback

How do you define a sort file in JCL that runs the COBOL program?..

Answer / shinoy sansilavose

Suppose if you want to sort a file TEST.OUTPUT.FILE which
is the output of your COBOL program then you can do the
following coding in JCL,

//SORTIN DD DSN=TEST.OUTPUT.FILE,DISP=SHR
//SORTOUT DD DSN=TEST.OUTPUT.SORT.FILE,
// DISP=(NEW,CATLG,DELETE),
// UNIT=TESTDA,
// SPACE=(CYL,(50,50)),
// DCB=(RECFM=FB,LRECL=80,BLKSIZE=0)
//SYSIN DD *
SORT FIELDS=(1,5,CH,A)

Now the sorted file TEST.OUTPUT.SORT.FILE will be sorted
based on the field starting from 1 to 5 specified in the
input for SORT.

Is This Answer Correct ?

30 Yes

7 No

How do you define a sort file in JCL that runs the COBOL program?..

Answer / nk

//STEP1 EXEC PGM=MYSORTPGM
//INFILE DD DSN=MY.UNSORTED.FILE,DISP=SHR
//SORTWK01 DD UNIT=SYSDA,SPACE=(CYL,(100,20))
//SORTWK02 DD UNIT=SYSDA,SPACE=(CYL,(100,20))
//OUTFILE DD DSN=MY.SORTED.FILE,
// DISP=(,CATLG,DELETE),
// UNIT=TEST,SPACE=(CYL,(100,10),RLSE),
// DCB=(DSCB.FB,LRECL=500)
SELECT SORTWK01-FILE ASSIGN TO SORTWK01.
SD SORTWK01-FILE
etc.

Is This Answer Correct ?

15 Yes

11 No

How do you define a sort file in JCL that runs the COBOL program?..

Answer / rik

YOU HAVE TO SIMPLY WRITE THE FOLLOWING CODE IN YOUR JCL :

//STEP1 EXEC PGM=SUPERSRT
//SORTIN DD DSN=TEST001.INFILE,DISP=SHR
//SORTOUT DD DSN=TEST001.SORTED,DISP=(NEW,CATLG,DELETE),
// DCB=(RECFM=FB,LRECL=80,BLKSIZE=0),
// UNIT=WORK,SPACE=(TRK,5,2),RLSE)
//SYSIN DD *
SORT FIELDS=(16,05,ZD,A)
/*

THE CONTAINT OF THE TEST001.INFILE WILL BE COPPIED TO
TEST001.SORTED FILE AND THIS TEST001.SORTED FILE WILL BE
SORTED IN ASCENDING ORDER OF THE CONTAINT OF FIELD POSITION
16 TO 20..

Is This Answer Correct ?

8 Yes

5 No

How do you define a sort file in JCL that runs the COBOL program?..

Answer / priya

Hi,
I want to sort the file in run jcl and i need to get that
sorted file in cobol program there in select statement what
dd name i should mention?

Is This Answer Correct ?

2 Yes

1 No

How do you define a sort file in JCL that runs the COBOL program?..

Answer / 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

How do you define a sort file in JCL that runs the COBOL program?..

Answer / ashok

JCL is a dying language man !!

Please indulge in some Emerging Technologies like
PL/I .......

Is This Answer Correct ?

8 Yes

41 No

Post New Answer