i have two file one is ksds another one is esds i want store
matching records in flat file how to you matching.
Answer Posted / satish.klnm
esds<rno, rname....>,
Procedure division.
open input fileksds, input fileesds, output file33.
para-1.
read fileesds at end perform end-para.
para-2.
start fileksds key = rno<esds> invalid key
perform para-1.
write rec33 from rec<esds>.
perform para-1.
end-para.
close fileksds, fileesds, file33.
stop run.
| Is This Answer Correct ? | 3 Yes | 3 No |
Post New Answer View All Answers
How to get the last record in vsam file in cluster? And how can you get the kids file records into your cobol program?
what are decleratives in cobol?
What is perform what is varying?
What kind of error is trapped by on size error option?
How can i load all the data from a file to Table (array) in cobol.How i manage the occurs clause with out reading the file.Any options avilable ? Please can any one help me it is urgent?
What happens when we move a comp-3 field to an edited (say z (9). Zz-)?
When is inspect verb is used in cobol?
How to get the last record in vsam file in cluster? And how can you get the ksds file records into cobol program?
What is comp-1 and comp-2?
Why occurs cannot be used in 01 level in COBOL?
I have a File that has duplicate records. I need only those records that occur more than thrice.?
How to print 10 to 1 if the input have only 10 digit number?
What is the difference between goback, stop run and exit program in cobol?
INREC AND OUTREC? HOW TO SPLIT 5K RECORDS TO DIFFERENT FILES IN A FILE IN COBOL? RESTART IN COBOL-DB2? ISOLATION LEVELS?
How many sections are there in data division in COBOL?