In file1 have 80 records are like d1,d2,d3......D80. File2 have 1000records are like a1d1,a1d2,a3d3.....Etc. I want matching records in file3 ? Plse tell me the matching logic???I want answer only in cobol ?Not using any tool or jcl?
- 1 Answers
- 4851 Views
- CSC, I also Faced
- E-Mail Answers
Answer Posted / animesh
It can be done using internal array table within the cobol program. first we will Move Record file in an aray with same Lrecl as the file1 and having 80 occurence.
Then again for file 2 we will populate another internal array table with 1000 occurence.
perform varying w-v-idx1 from w-k-1 by w-k-1 until
w-v-idx1> 80
perform varying w-v-idx2 from w-k-1 by w-k-1 until
w-v-idx2>1000
If w-v-file1(w-v-idx1) = w-v-file2(idx2)
Set some w-s-count = y
Add +1 to w-s-count
move -w-v-file1(w-v-idx1) to w-v-file3
write file 3 from w-v-file
| Is This Answer Correct ? | 1 Yes | 0 No |
Post New Answer View All Answers
Explain how will you differentiate between an internal and an external sort, the pros and cons, internal sort syntax etc
how we sort two input files based on a common column and giving one o/p file please send me the coding logic?
What is the difference between goback, stop run and exit program in cobol?
Why occurs cannot be used in 01 level in COBOL?
How do get the result of your program directly on your pc?
can anybody post me about file-aid and changemen tools pls and give me reference if any mainframe guys are there
What is the utilization of copybook in cobol? Could we utilize a similar copybook?
What is the difference between structured cobol programming and object alternativelyiented cobol?
Explain about different table spaces.
input= ,,,, mainframe training ,,, hyderabad .... location.... output1=$ mainframe training in hyderabad location$ output2=**** mainframe training in hyderabad location ****. In this pgn when we give input considering the spaces the output is displayed in this format.Like in the place of ,,,, $ should be displayed likewise.So please helpmeout.
If you are current on the owner of a set, what is the difference between obtain next and obtain first?
I have a program with an Array of 5000 occurences which is being passed from 5 sub levels to the front end screen. Thess 5 programs using each 5*2 = 10 different arrays with size as 5000. This is causing the transaction to utilize more storage consupmtion. I am looking to reduce the storage consumption. As part of that initially i thought Dynamic array may solve my problem. After viewing the comments given i see its same as normal array. IS there any other way we can resolve this issue?
what is amode(24), amode(31), rmode(24) and rmode(any)?
Write down the divisions of cobol program?
What are the access modes of START statement?
