Interested to Buy Any Domain ? << Click Here >> for more details...
I hv ten records in ps file and i hv say some 15 records in
vsam file .i hv empno and age in ps file n
empno,empname,dept n desig in vsam file. i hv 2 read the ps
file n check wid matching empno in vsam file and then
insert all fields from ps and vsam into db2 table....plz
help in writin the procedure division
- 1 Answers
- 5184 Views
- I also Faced
- E-Mail Answers
File FD for PS
01 PS-FILE
05 PS-EMP-NO
05 PS-EMP-AGE
File FD for VSAM
01 VSAM-FILE
05 VSAM-EMP-NO-------->RECORD KEY
05 VSAM-EMP-NAME
05 VSAM-EMP-DEPT
PROCEDURE DIVISION
PERFORM UNTILL END OF PS FILE
READ PS FILE
READ VSAM-FILE KEY IS PS-EMP-NO
IF VSAM-FILE-STAUTS = '00'
EXEC SQL
INSERT INTO TABLE EMPLOY WITH VALUE 'PS-EMP-NO', 'PS-EMP-
AGE', 'VSAM-EMP-NAME' 'VSAM-EMP-DEPT'
END-EXEX
END-PERFORM.
| Is This Answer Correct ? | 4 Yes | 0 No |
Can the OCCURS clause be at the 01 level?
why we are using picture clause in the cobol programs?
Hi All, Can anyone tell me how we can MOVE value of a X(19) variable to a S9(17) COMP-3 variable? Answer with an Example will be of great help.
write a cobol logic. i have file that has 10 records .1 record go to first output file and second record goes to 2 output and etc
What is the figurative constant in cobol?
What is the difference between comp and comp-3?
I encountered an error when I move spaces to a numeric field?What should I do to move spaces on that field?help please.
How may divisions are there in JCL-COBOL?
The maximum number of dimensions that an array can have in COBOL-85 is ?
Explain fixed length record in cobol? with suitable example
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.
What is the difference between performing a SECTION and a PARAGRAPH?
COBOL 
