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 / visitor
FD FILE1
01 FILE1-REC
05 FIELD1 PIC X(3)
05 FIELD2 PIC X(3)
FD FILE2
01 FILE2-REC
05 FIELD1 PIC X(3)
05 FIELD2 PIC X(3)
05 FIELD3 PIC X(3)
FD FILE3
01 FILE3-REC
05 FELD1 PIC X(3)
05 FELD2 PIC X(3)
05 FELD1 PIC X(3)
05 FELD2 PIC X(3)
05 FELD3 PIC X(3)
PROCEDURE DIVISION
oPEN INPUT FILE1
FILE2
OUTPUT FILE3
READ FILE1
READ FILE2
WRITE FILE3-REC FROM FILE1-REC,FILE2-REC.
STOP RUN.
| Is This Answer Correct ? | 6 Yes | 0 No |
Post New Answer View All Answers
What is report-item in COBOL?
What are the cobol coding sheets?
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 is cobol?
IF I mention stop run in CICS what happens?
how do you reference the variable unblock file formats from cobol programs
There are 5 fields and 1000 records in a file. Unload it into an array. Write the syntax for declaration and how will you unload it.
What is rmode(any) ?
What the difference is between continue and next sentence?
What are the access modes of START statement?
Describe the cobol database components?
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.
A table has two indexes defined. Which one will be used by the SEARCH?
For rewrite, why is it mandatory that file needs to be opened?
What are the pertinent COBOL commands?