1. Categories >> Software >> MainFrame >> IBM MainFrame >> COBOL
  2. Suggest New Category

Suppose, file A has 100 records and file B has 500 records. We
want to write records common to both A and B into file C and
records which are present only in either A or B into another file D.
What should be the logic of Cobol program to achieve this?

Question Posted / shivendusingh

Answers were Sorted based on User's Feedback



Suppose, file A has 100 records and file B has 500 records. We want to write records common to both..

Answer / m

correction to #3
sort files Asc

if f1 = f2
move file1-rec to file3-rec. write file3-rec
read f1 & f2.
if f1 < f2
move file1-rec to file4-rec. write file4-rec.
read f1.
if f1 > f2
move file2-rec to file4-rec. write file4-rec
read f2.

Is This Answer Correct ?    11 Yes 1 No

Suppose, file A has 100 records and file B has 500 records. We want to write records common to both..

Answer / karan

If we do not want to go with cobol then it can be easily
done with SORT, ICETOOL( Splice option) which i feel is
faster and simpler instead of writing a compare program.
If there is a compultion to use a cobol pgm then soln will
be -
PERFORM untill (EOF A and EOF B)
if f1 = f2
move file1-rec to file3-rec. write file3-rec
read f1 & f2.
if f1 < f2
move file1-rec to file4-rec. write file4-rec.
read f1.
if f1 > f2
move file2-rec to file4-rec. write file4-rec
read f2.
END PERFORM

IF EOF A and not EOF B
PERFORM until EOF B
move move file2-rec to file4-rec.
write file4-rec
read f2.
END PERFORM
ElSE
IF EOF B and not EOF A
PERFORM until EOF A
move move file1-rec to file4-rec.
write file4-rec
read f1.
END PERFORM
END

note: files should be in sorted order ASC before program
runs.
This is a generic solution to al such compare programs.

Is This Answer Correct ?    5 Yes 1 No

Suppose, file A has 100 records and file B has 500 records. We want to write records common to both..

Answer / suresh

sort the file by using key...and perform matching logic

Is This Answer Correct ?    0 Yes 0 No

Suppose, file A has 100 records and file B has 500 records. We want to write records common to both..

Answer / shrik

Sort both file A and B using the Key in ascending order..
Then read File A and B..
Compare records read frm A and B
If found Equal write into File C (common records)
If NOT write into file D

Is This Answer Correct ?    6 Yes 8 No

Suppose, file A has 100 records and file B has 500 records. We want to write records common to both..

Answer / hardik dave

Use SYNCSORT and you will get all matching records in one
file and all those non matching records in another. Just
read more on SYNCSORT and you will be clear.

Is This Answer Correct ?    3 Yes 6 No

Suppose, file A has 100 records and file B has 500 records. We want to write records common to both..

Answer / anji

I think this is partially right. after accessing 100 records
program is abended. And how to send remaining B file records
into file D.. send me ans plz..

Is This Answer Correct ?    0 Yes 3 No

Suppose, file A has 100 records and file B has 500 records. We want to write records common to both..

Answer / vinod

if f1 = f2
move file1-rec to file3-rec
write file3-rec
if f1 < f2
move file2-rec to file4-rec
write file4-rec.
if f1 > f2
move file1rec to file4-rec
write file4-rec

Is This Answer Correct ?    2 Yes 6 No

Post New Answer

More COBOL Interview Questions

When would you use in-line perform?

2 Answers  

How to remove the spaces at the end of each record in the output file of variable length, via cobol program?

0 Answers  

What will happen if we generate GDG (+2) version without generating (+1) version?

2 Answers   IBM, T systems,

What is Static and Dynamic linking ?

3 Answers  

What guidelines should be followed to write a structured cobol prgm?

0 Answers  




how to transfer the file from pc to mainframe??

3 Answers  

How you can read the file from bottom?

0 Answers  

In a COBOL II PERFORM statement, when is the conditional tested, before or after the perform execution?

3 Answers  

can i give 9(10) in comp 3 instead of s9(10) ? if i can give wht would be ths ans

2 Answers   DELL,

COBOL program to read the string ' BOMBAY' in reverse order as 'YABMOB'

8 Answers   Barclays, IBM,

level number 77 is used to define a)group data b)elementary data c)redefine d)none

8 Answers   TCS,

hi friends,can any one post the ibm mainframe inteqview questions for 1year exp candidate,for itc infotech interview?. have any body attended for this in the past?...

1 Answers   ITC Infotech,

For more COBOL Interview Questions Click Here
Categories