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

A cobol program to read a file , match it with other if.
If match occurs then write it to an output file. If no
match then no need to write it.Error log created by program
to track any error.

Answer Posted / ajay kumar ande

procedure:
1. take 4 seq. files,read two files
2.if rec1(key1)=rec2(key2)
write record3
else
write record4

or using jcl
pgm=iebcmpr
sysut1 dd dsn=dataset1
sysut2 dd dsn=dataset2
sysin dd *
compare typorg=ps/po

Is This Answer Correct ?    3 Yes 4 No



Post New Answer       View All Answers


Please Help Members By Posting Answers For Below Questions

What happens when we move a comp-3 field to an edited (say z (9). Zz-)?

1415


What is the difference between PIC 9.99 and PIC9v99?

1351


what are decleratives in cobol?

2273


What is the difference between comp and comp-3?

1198


What is Pic 9v99 Indicates in COBOL?

1279


In COBOL, what is the different between index and subscript?

1253


What are the different open modes available in cobol?

1206


How do you define a variable of comp-1 and comp-2?

1211


Which Search verb is equivalent to PERFORM…VARYING?

1050


Can we change the password using ALTER? anyone tried and changed?

2031


i want to learn mainframe..any websites and material to learn from basic..? my mail id : rajeswaribe2010@gmail.com

2234


State the various causes of s0c1, s0c5 and s0c7.

1099


Discuss about changing dataset name in proc.

1245


How to change size of Initial number of records to *NOMAX for ALL PF files from perticular library, how can I do that

3242


Can we redefine the field of x(200) to less than 200?

1387