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


Please Help Members By Posting Answers For Below Questions

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

2726


Which is not true about evaluate statement

1567


Explain what you understand by passing by value.

692


What are the pertinent COBOL

2041


What are the various section in data division and briefly explain them.

692






Differentiate cobol and cobol-ii. (Most of our programs are written in cobolii, so, it is good to know, how, this is different from cobol)?

624


Write the code implementing the perform … varying.

639


Explain how you can characterize tables in cobol?

636


I need to compare 3 variables(dates) and do some processing based on the earliest date. There could be more then 1 date record in any of the 3 fields. What is the best way to code this?

1798


What is the difference between Call and a Link?

694


What is report-item in COBOL?

704


A table has two indexes defined. Which one will be used by the SEARCH?

752


What is the difference between next sentence and continue in cobol programing language?

705


How to remove 2 duplicate records and copy only one using job control language?

736


What is the difference between comp and comp-3?

692