Answer / rahul

ENVIRONMENT DIVISION.
INPUT-OUTPUT SECTION.
FILE-CONTROL.
SELECT file-name ASSIGN TO dd-name.
FILE STATUS IS ws-file-status1.

ws-file-status1 need to define in WORKING STORAGE SECTION
with
PIC X(02)- For QSAM files
PIC X(03) for VSAM files.

Answer / rama

we will code file status in file-control of environment
division.
file-control.
SELECT infile ASSIGN TO ws-dd-name
FILE STATUS IS ws-fs-code.

and ws-fs-code has to coded in working-storage section.
if i'm wrong plz let me know...

which is Best IBM Mainframe Training and Placement Institute in Ameerpet Hyderabad

0 Answers  

---

if we display var1 then what will b displayed in below condition. 77 var1 pic s9(2) value -10. 77 var1 pic s9(2) value -11. " " " -12. " " " -13. -14 ... ... -19.

2 Answers   IBM, Steria,

---

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.

0 Answers  

---

How to traceback if I am getting SOC7 or SOC4 abend? List down the steps

0 Answers  

---

how will u find out 3rd week's 2nd day using occurs ?

3 Answers   L&T,

---

Can we move X(9) to 9(9). If yes what are the ways for doing this?

3 Answers  

---

should I use Go back in the main program ? Yes we can use Go back in main program as well.

2 Answers   Xansa,

---

What is sqlca and why is it needed in any cobol-db2 program?

1 Answers  

---

There are two flat files one having 10 records and other having 5 records. write a cobol pgm to find the duplicate records(matching records)from both files.

1 Answers   Mind Tree,

---

Which of the following files can be OPENed in all the 4 modes? The four modes are INPUT, I-O, OUTPUT and EXTEND. (a) INDEXED (b) RELATIVE (c) SEQUENTIAL (d) All of the above

7 Answers   TCS,

---

Give some advantages of REDEFINES clause?

2 Answers   Syntel,

---

how can we get current dat and time thru cobol pgm

3 Answers   DELL,

---