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...

I have a File that has duplicate records. I need only those
records that occur more than thrice.

Answer Posted / pradip anand

//USERIDR JOB (M,92950000,,9999),'N=TSO.ICETOOL',MSGCLASS=M,
// CLASS=M,NOTIFY=USERID
//*
//STEP001 EXEC PGM=ICETOOL
//TOOLMSG DD SYSOUT=*
//DFSMSG DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//*
//SORTIN DD DSN=INPUT.FILE1,DISP=SHR
// DD DSN=INPUT.FILE2,DISP=SHR
//*
//EQDUPES DD DSN=OUTPUT.FILE.REC,
// DISP=(NEW,CATLG,DELETE),UNIT=SYSDA,
// DCB=(LRECL=200,RECFM=FB,BLKSIZE=0,DSORG=PS),
// SPACE=(CYL,(30,30),RLSE)
//TOOLIN DD
*
SELECT FROM(SORTIN) TO(EQDUPES) -

ON(4,4,CH) EQUAL(N)
/*


Example:

Input File1:
000 1111 12356908
001 1212 54321234
002 1323 78654323
003 5656 98765456

Input File2:
000 1000 12356908
001 1212 99999999
002 1323 77777777
003 5656 88888888


Output File:
When EQUAL(1)
000 1000 12356908
000 1111 12356908

When EQUAL(2)
001 1212 54321234
001 1212 99999999
002 1323 78654323
002 1323 77777777
003 5656 98765456
003 5656 88888888

mail me if still have any doubt.

Is This Answer Correct ?    3 Yes 0 No



Post New Answer       View All Answers


Please Help Members By Posting Answers For Below Questions

in order to execute step2 a job after a return code of 8 in step1, what condition you will code in step2?

2644


How can a fb file convert to vb file using sort program?

1291


What are steplib and joblib? What for they are used?

1140


How can a jobs execution priority be modified?

1233


Which statement is used to identify the private libraries in job?

1127


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

1068


What is concatenating?

1032


What are the difference between jcl and jes?

1542


by using cond parameter maximum 8 cond can be coded in single cond means ?explain

1399


What is catelog procedure and how many catelog procedure to use in one job?

8554


Step 1 RC 4 Step 2 Step 3 I want to know the COND parameter which can be coded in step 2 or 3. Step 2 should be executed based on Step 1 RC and Step 3 should not be executed based on step 1's RC

4836


why should SYSIN DD * statement should not be included inside a PROCedure snippet??? please answer this.. i need to know.

2401


What is the function of dd name parameter with a 2 part structure; audit.report?

1173


Name the statement which can be used to send data to another mvs jes3 node?

1113


Explain the purpose of the dd keylen parameter?

1101