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
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 |
Wat is the difference between NEXT and CONTINUE statement in cobol,can any one explain with example.
describe 805 error
what is srange and nosrange pls reply to ths question ?
Give some advantages of REDEFINES clause?
State the various causes of s0c1, s0c5 and s0c7.
What is a subscript ?
wht is packed decimal in cobol
What is the local-storage section?
What is the Importance of GLOBAL clause According to new standards of COBOL?
what are the working storage fields in BMS macro?
how we rectify soc4 and soc7 error in project(need real time answer)? please reply
what are the diferences b/w sub-script and index?