Answer / vaneesh

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.

If there are two copybooks which have same variables and we are using both the copybooks in our program. will there be an error and if i move values to the variable which copybook varibales gets the values i move in.

3 Answers   CTS,

---

How to retain the Duplicates in the one records?

3 Answers   CS,

---

COBOL program to read the string ' BOMBAY' in reverse order as 'YABMOB'

8 Answers   Barclays, IBM,

---

How include time & date in the report generation in cobol programing?

2 Answers  

---

what is the use of comp2 ? where can we use it with example ?

3 Answers   Covansys,

---

What are subroutines ? and how do we pass data to the sub routines?

2 Answers   Xansa,

---

what is linkcard in cobol?

1 Answers   TCS,

---

What is the difference between SEARCH and SEARCH ALL? What is more efficient?

9 Answers   IBM, iFlex, Wipro,

---

what is redefines? where it can be effectively use for the purpose of memory utilization? give an example?

4 Answers   IBM,

---

Explain about Redefines cluse?

3 Answers   iGate,

---

What is the difference between SEARCH and SEARCH ALL?

6 Answers   Cognizant,

---

What is the Linkage section? What is the Use and Why the parm length use alway "PARM-LENGTH PIC S9(4) or PIC S9 (4) COMP." any reason?.Please let me know any one... Cheers,Prasad

8 Answers   Syntel,

---