i have two file, each file having :

file1 is having 2 fields

field1 field2



file2 is having 3 fields
field1 field2 field3


my req is to make it one file like:

field1 field2 field1 field2 field3

if anyone know please send me syntax, i tried this with
DFSORT but could not succeed.

Answer Posted / navatha

declare field1,field2(file3rec1) in 1 group then
field1,field2,feild3 in another group(file3rec2) then
declare it as whole record then using reference
modification u can do as
move filerec1 to file3rec1(1:10)
move filerec2 to file3rec2(1:10)
write file3


i think this will get ur answer............

Is This Answer Correct ?    0 Yes 0 No



Post New Answer       View All Answers


Please Help Members By Posting Answers For Below Questions

System Testing for Mainframe Developers What is System Testing? integration testing ? what's the procedure ..

1669


How to know whether the module is dynamical or statistical?

724


What is the difference between a binary search and a sequential search? What are the pertinent cobol commands?

780


Give some examples of command terminators?

826


How you can read the file from bottom?

728






Why did you choose to work with ibm mainframe cobol programming?

705


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.

1840


What is link edit in cobol?

844


What is the compute verb? How is it used?

726


Explain how you can characterize tables in cobol?

714


What are 77 levels used for?

727


What is comp-1 and comp-2?

832


Explain how to differentiate call by context by comparing it to other calls?

759


What is the difference between a binary search and a sequential search what are the pertinent cobol?

801


How are the next sentence and continue different from each other?

847