In one of intervie, my interviwer asked, I have a file
which contains 4 records I would like to split the 4
different outputs for each record how to do?
Answers were Sorted based on User's Feedback
Answer / sachin
above answer is partially correct
use below syntax i have already performed this code
in our application.
//S1 EXEC PGM=SORT
//SORTIN DD DSN=INPUT FILE,DISP=SHR
//DD01 DD DSN =O/P1
//DD02 DD DSN =O/P2
//DD03 DD DSN =O/P3
//DD04 DD DSN =O/P4
//SYSIN DD *
SORT FIELDS=COPY
OUTFIL FNAMES=(DD01,DD02,DD03,DD04),SPLIT
| Is This Answer Correct ? | 0 Yes | 0 No |
Answer / amruta
you can use (if then do output options) conditional logic
statements.
| Is This Answer Correct ? | 0 Yes | 0 No |
Answer / muttiah
I'm not sure about the answers posted.But you can try this
simple JCL to achieve what you want.
//JOBCARD /*As per your company standard*/
//STEP1 EXEC PGM=SORT
//Sortin DD DSN=<Inputfile>,disp=shr
//SORT0F01 DD DSN=<FILENM1>,DISP=OLD
//SORT0F02 DD DSN=<FILENM2>,DISP=OLD
//SORT0F03 DD DSN=<FILENM3>,DISP=OLD
//SORT0F04 DD DSN=<FILENM4>,DISP=OLD
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SYSIN DD *
OPTION COPY OR SORT FIELDS=COPY
OUTFIL FILES=01,STARTREC=1,ENDREC=1
OUTFIL FILES=02,STARTREC=2,ENDREC=2
OUTFIL FILES=03,STARTREC=3,ENDREC=3
OUTFIL FILES=04,STARTREC=4,ENDREC=4
/*
//
NOTE: I have given DISP=OLD which means it will override
the contents when you submit the jcl
If you want to create a new dataset replace like this
EX:
//SORT0F04 DD DSN=<FILENM4>,DISP=(NEW,CATLG,DELETE),
// SPACE=(TRK,(1,4)),DCB=*.SORTIN
Hope this makes sense!!
| Is This Answer Correct ? | 0 Yes | 0 No |
Answer / chandan
You need to use ICETOOL utility and with Case statment. Pl
find the answer from ICETOOL pdf manual and test it.
| Is This Answer Correct ? | 0 Yes | 3 No |
what is the purpose of coding notify parameter in job statement?
We can use PASS with permanent datasets also. THEN Which is the condition in which we may use PASS (instead of KEEP) with permanent data sets, while there is no need to specify UNIT and VOL for them like temporary data sets (in cas we use KEEP for permanent data sets) ?
How Can we see all generations of a GDG ?
What is the difference between joblib and jcllib statements
Matching Logic in Jcl not in cobol.Could any one please answer this question
What are three parameters you can specify on Job statement as well as on exec stmt ?
Can there be 2 job statements in a JCL? If yes what is the purpose of doing tha?
Is there a way to check for an empty file in JCL other than using IEBCOMPR and the command PRINT COUNT(1)?
what is the difference between return code and maxcc?
Is their any set of rules for dd? Explain.
//ERFDS JOB //STEP1 //STEP2 //STEP3...COND=(4,LT) //STEP4 1.CONDITION IN STEP3 REFERS TO WHICH STEP'S RETURN CODE (STEP1 OR STEP2)? 2.IN ABOVE PROGRAM IF CONDITION SATISFIES IN STEP3 WHICH STEPS WILL EXECUTE?? AND WHY? IF CONDITION IN STEP3 SATISFIES
My JCL have five steps & I created new versions of GDG in first step through fourth step & fifth step I was refered Step one GDG version. My JCL got abend at 4th step and how I can restart my JCL Please let me know the answers. //STEP1 EXEC GDG1(+1) DISP=(NEW) //STEP2 EXEC GDG1(+2) DISP=(NEW) //STEP3 EXEC GDG1(+3) DISP=(NEW) //STEP4 EXEC GDG1(+4) DISP=(NEW) //STEP5 EXEC GDG1(+1) DISP=(OLD)
11 Answers HCL, IBM, L&T, TCS,