Golgappa.net | Golgappa.org | BagIndia.net | BodyIndia.Com | CabIndia.net | CarsBikes.net | CarsBikes.org | CashIndia.net | ConsumerIndia.net | CookingIndia.net | DataIndia.net | DealIndia.net | EmailIndia.net | FirstTablet.com | FirstTourist.com | ForsaleIndia.net | IndiaBody.Com | IndiaCab.net | IndiaCash.net | IndiaModel.net | KidForum.net | OfficeIndia.net | PaysIndia.com | RestaurantIndia.net | RestaurantsIndia.net | SaleForum.net | SellForum.net | SoldIndia.com | StarIndia.net | TomatoCab.com | TomatoCabs.com | TownIndia.com
Interested to Buy Any Domain ? << Click Here >> for more details...

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

What is amode(24), amode(31), rmode(24) and rmode(any) (applicable to only mvsesa enterprise server) ?

1262


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

2599


) what is the difference between AID and HANDLE AID?

2193


how can i see junk values in dclgen or in hostvariable of comp ?

3048


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?

1686


What are 77 levels used for?

1142


how to access the file from prodution from changeman tool and to submit a file to production

7619


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

5425


State the various causes of s0c1, s0c5 and s0c7.

1136


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

1598


What is the compute verb? How is it used?

1182


What is a report item?

1190


How to get the last record in vsam file in cluster? And how can you get the kids file records into your cobol program?

1259


Discuss about changing dataset name in proc.

1288


What is Pic 9v99 Indicates in COBOL?

1335