I have 3 duplicate records in a file .
I want to eliminate 1st, 2nd and copy 3rd one only . HOW ?
Answers were Sorted based on User's Feedback
so , first sort the PS using JCL SORT utility and update the
PS file.
find the duplicates using XSUM . and write the duplicates
alone in a seperate PS.
take the seperate PS and give the control condition inside
SYSIN DD * as , sort fields with skiprec(3), since u need
only the 3rd one to copy
| Is This Answer Correct ? | 16 Yes | 2 No |
Answer / vivek chandrasekaran
:
Use ICETOOL to solve the request in 1 step
//S1 EXEC PGM=ICETOOL
//TOOLMSG DD SYSOUT=*
//DFSMSG DD SYSOUT=*
//IN DD DSN=... input file
//OUT DD DSN=... output file
//TOOLIN DD *
SELECT FROM(IN) TO(OUT) ON(p,l,t) LASTDUP
/*
Where p - position, l - length, t-type(CH,PD..)
| Is This Answer Correct ? | 5 Yes | 0 No |
What does the TIME parameter signify ? What does TIME=1440 mean ?
hi in one of the interview one asked me how to submit a job from cobol?as well as how to submit a jcl from CICS? can u pls any one tell me..
What is primary allocation for a dataset?
A STEP has more than 1 file as INPUT. And we have to put all these records int 1 output file. How to do ? //InputF DD DSN=ID.File1 DSN=ID.File2 DSN=ID.File3
do we need to mention the location of catalogued procedure for each it's call in a single job?
My JCL has 4 steps that execute PROC’s P1, P2, P3 and P4 as shown below //P1 EXEC PROC=P1 //P2 EXEC PROC=P2 //P3 EXEC PROC=P3 //P4 EXEC PROC=P4 There are four steps S1, S2, S3 and S4 in each PROC’s (i.e. P1, P2, P3 and P4) I want to execute only step S2 of PROC P2 and no other steps or PROC’s. How do you achieve this?
Explain how can a stopped job be started again?
In a single step if input file is present then only need to copy into output file or else need to through a RC is it possible. Note : i want it in a single step
which utility is used to run a cobol-db2 program?
How to find the length of variable length copybook using fileaid ??
If Region=0k means What Happen?
I want to JCL sort for Non-COMP and COMP-3 fields SORT FIELDS=(1,5,A,6,11,A,12,11,A,19,1,A,20,1,A),FORMAT=BI,EQUALS Length of comp bytes is 11 bytes which start at 6byte and 12 byte considering 11 bytes in comp-3 is 6 bytes. Can anyone tell if the above sort work SORT FIELDS=(1,5,A,6,6,A,12,6,A,19,1,A,20,1,A),FORMAT=BI,EQUALS does not works OK