We have two PS files,want to compare those files and put
the duplicate records in one file.
Input file 1 contains(1,2,4,9,10)
Input file 2 contains (1,4,5,11,12,14,16).

Help me with jcl.

Answers were Sorted based on User's Feedback



We have two PS files,want to compare those files and put the duplicate records in one file. Input..

Answer / shriram supalwar, dharmabad

//jobcard
//step1 exec pgm=iebgener
//sysprint dd sysout=*
//sysut1 dd dsn=proj.test.file1,disp=shr
// dd dsn=proj.test.file2,disp=shr
//sysut2 dd dsn=proj.output,disp=shr
//sysin dd dummy
//if (step1.rc eq 0) then
//step2 exec pgm=sort
//sysprint dd sysout=*
//sortin dd dsn=proj.output,disp=shr
//sortout dd dsn=proj.sortout,disp=shr
//sortxsum dd dsn=proj.duplicate,disp=shr
//sysin dd *
sort fields=(1,5,ch,a)
sum fields=none,xsum
/*

Now, all these records are copied to proj.output
and out of those records the duplicate records are copied to
proj.duplicate

Correct me if i am wrong

Is This Answer Correct ?    3 Yes 1 No

We have two PS files,want to compare those files and put the duplicate records in one file. Input..

Answer / aditi

hi,

I have also faced the same question.

as we have the two seperate input files.
Nitika, U have taken only one input file so how we sort it
using only one file?

Is This Answer Correct ?    1 Yes 0 No

We have two PS files,want to compare those files and put the duplicate records in one file. Input..

Answer / nitika

Use SORTXSUM utility in JCL to get the output.
//JOB1 JOB ,, CLASS = A
//STEP1 EXEC PGM=SORT
//SORTIN DD DSN=TEST.PS.INPUT
//SORTOUT DD DSN=TEST.PS.OUTPUT
//SORTXSUM DD DSN=TEST.PS.OUTPUT
//SYSIN DD *
SORT FIELDS = (1,1,CH,A)
SUM FIELDS = (NONE,XSUM)
/*

Now SUM FIELDS = NONE means no duplicates in the output file
(TEST.PS.OUTPUT)and XSUM means duplicates, in the two files
being matched, should be sent to the file mentioned in
SORTXSUM ddname.

So, output file will have 1,4.

Is This Answer Correct ?    3 Yes 3 No

We have two PS files,want to compare those files and put the duplicate records in one file. Input..

Answer / karthik

@aditi n nikita

i think we can use ibm utility iebcompare

Is This Answer Correct ?    0 Yes 0 No

We have two PS files,want to compare those files and put the duplicate records in one file. Input..

Answer / mdv

@Shriram Supalwar, Dharmabad

You don't need the IEBGENER STEP.

Your second step sort can have both the files concatenated
as one and given as Input.


Thanks

Is This Answer Correct ?    0 Yes 0 No

We have two PS files,want to compare those files and put the duplicate records in one file. Input..

Answer / abhusha

Use join keys
//STEP01 EXEC PGM=SORT
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SORTJNF1 DD DSN=INPUT.FILE.ONE,DISP=SHR
//SORTJNF2 DD DSN=INPUT.FILE.TWO,DISP=SHR
//SORTOUT DD DSN=OUTPUT.FILE,
// DISP=(NEW,CATLG,DELETE),
// SPACE=(CYL,(100,200),RLSE),
// DCB=(RECFM=FB,BLKSIZE=0,LRECL=80)
//SYSIN DD *
SORT FIELDS=COPY
JOINKEYS FILES=F1,FIELDS=(1,10,A)
JOINKEYS FILES=F2,FIELDS=(1,10,A)
REFORMAT FIELDS=(F1:1,71,F2:1,9)
/*

Is This Answer Correct ?    0 Yes 0 No

Post New Answer

More JCL Interview Questions

Can I share my data with other jobs? How?

0 Answers  


which parameter is used to check the syntax of a jcl without executing it?

0 Answers   IBM,


Explain the hierarchy levels in jcl?

0 Answers  


Explain how can a jobs execution priority be modified?

0 Answers  


Explain about LMPUT-

1 Answers  






what is a MODELDSCB?

1 Answers  


What are the default system and catalog libraries in JCL?

2 Answers   Infosys,


what does mvs stand for?

1 Answers   IBM,


What is MOD and when would you use it?

3 Answers  


Hi, Say I have 10 flat files and I want to copy all these 10 flat files to a GDG versions flat files (I have GDG base: FDWS01.TEST.RESTORE) in one shot. Can we do that in one shot using a JCL. May be by using IEBGENER. It's a bit urgent. So anyone's fast rely would be appreciated.. Thanks in advance.. 10 flat files ----------------------------------- FDWS01.SUB.RESTORE1 FDWS01.SUB.RESTORE2 FDWS01.SUB.RESTORE3 ; ; FDWS01.SUB.RESTORE10 TO GDG versions ----------------------- FDWS01.TEST.RESTORE.G0001V00 FDWS01.TEST.RESTORE.G0002V00 FDWS01.TEST.RESTORE.G0003V00 ; ; FDWS01.TEST.RESTORE.G0010V00

4 Answers  


I have a job (4 steps) with time parameter coded in job & exec, say time=10 in job & time =3,2,2,4 in each steps. Will the job executes successfully?

4 Answers   Cognizant,


write a jcl to execute a job by 7:00 am on jan 20,1986?

0 Answers   IBM,


Categories