Interested to Buy Any Domain ? << Click Here >> for more details...
There are two input sorting files and there is a need to
create one sort out file which contains data of both input
files. What is the sort card for this. Write a sample JCL
for this using a control card?
- 3 Answers
- 8359 Views
- I also Faced
- E-Mail Answers
Answers were Sorted based on User's Feedback
Answer / y@$w@nth
We can go for concatenation of datasets approach for this
to do
//userid01 job .....
//stp1 exec pgm=sort
//sortin dd dsn=userid01.test.input1,disp=shr
// dd dsn=userid01.test.input2,disp=shr
//sortout dd dsn=userid01.test.input,disp=shr
//sysout dd sysout=*
//sysin dd *
sort fields=copy
/*
//
In the above case the statement
sortin dd dsn=userid01.test.input1,disp=shr
// dd dsn=userid01.test.input2,disp=shr
means concatenation of two datasets as one.....
Let me know if i am wrong
yaswanth.pyrs@gmail.com
Cheers..
Y@$w@nth..
| Is This Answer Correct ? | 3 Yes | 0 No |
Answer / dineshj
There is a way to give two input files in dfsort. coding is
here.,
//iksa01 job .....
//stp1 exec pgm=sort
//sortin dd dsn=iksa01.dfsort.input1,disp=shr
// dd dsn=iksa01.dfsort.input2,disp=shr
//sortout dd dsn=iksa01.dfsort.output1,disp=shr
//sysout dd sysout=*
//sysin dd *
/*
//
| Is This Answer Correct ? | 0 Yes | 7 No |
Describe the various parameters utilized in the creation of a gdg?
i have a base gdg consisting of 12 versions like jan to dec. i need to concatante this gdg to another gdg which have version 1 or to the base gdg itself can anyone give me the code pls ?
can we write a proc with in a proc
When should DISP=MOD is used?
State the uses of syspring, sysin, sort fields, sum fields and dummy.
Could you provide an example and its effect OF, Using COND on JOB and EXEC both ?
how JCL works?
One dataset is creating in the step1 with LRECL of 133 and the same dataset is used in the next step in DISP=SHR mode, but while scanning the JCL the following error is thrwon. Please verify the below JCL $/SEPP030.PROVIDER DD DSN=Z1225BT.F5750PG9.F5910PRV.QC#A6868 //ERRORRPT DD DSN=F5910&ST&IN..F5910EPP.ERRORRPT.P&CYCDATE, --ERRORRPT DD DSN=F5910PG.F5910EPP.ERRORRPT.P, // DISP=&DISNCD,UNIT=&DELQ, -- DISP= (NEW,CATLG,DELETE),UNIT=DELQ, // SPACE=(TRK, (30,15),RLSE), // DCB=&DCB2 -- DCB= (PPG.METMODEL,BLKSIZE=0,LRECL=133,RECFM=FB) $/SEPP030.ERRORRPT DD DSN=Z1225BT.F5910EPP.ERRORRPT.AOUTPUT //SEPP040 EXEC PGM=FILEAID,COND= (0002,EQ,SEPP030) //SYSPRINT DD SYSOUT=* //SYSLIST DD SYSOUT=* //DD01 DD DSN=SYSCMN.PROD.CCLIB (F5910EP1),DISP=SHR $/SEPP040.DD01 DD DSN=Z1225BT.TEST.CCLIB (F5910EP1) E1 - DSS20791E - DATA SET 'Z1225BT.F5910EPP.ERRORRPT.AOUTPUT' HAS AN LRECL OF 133 COULD NOT BE OPENED BECAUSE THE CODED LRECL WAS 80. // DD DSN=F5910&ST&IN..F5910EPP.ERRORRPT.P&CYCDATE, -- DD DSN=F5910PG.F5910EPP.ERRORRPT.P, // DISP=SHR $/ DD DSN=Z1225BT.F5910EPP.ERRORRPT.AOUTPUT please find the error code in the above mentioned lines and please suggest me about the error and the solution for that.
Is acct parameter mandatory?
How To get the last record in VSAM file in cluster? and How can u get the ksds file records into ur cobol program ? Pls tell me about these two questions.
How to read and write a single record into a file. I would like to use it to enter a single 8-character piece of information and use it to put it into a variable for processing in JCL. Thank you
How many instream we can write in single jcl?
COBOL 
