Answer / adarsh

File status 10 specifies that there are no records to read
in a file.
We can use anywhere in the program after opening the file
and before closing the file.

Answer / manikandesvaran

After sucessfull read just check the file status code
associated.
For ex.
PERFORM UNTIL WS-FILE-REC-EOF
READ INP-DATA INTO WS-FLE-INP-REC
AT END
SET WS-FILE-REC-EOF TO TRUE
END-READ

IF WS-INP-FLE-STATUS = ZEROS OR 10
CONTINUE
ELSE
DISPLAY '------------ERROR-----------------------'
END-IF.

Hope this will help .

i have variable record in the 5th, i want to sort from 5th filed ? how ?

2 Answers   TCS,

---

The hierarchy of the execution of logical operators is (a) NOT AND OR (b) AND OR NOT (c) OR AND NOT (d) OR NOT AND

10 Answers   Huawei, IBM, TCS,

---

hai friends ,i have HSBc exam on this sunday,my platform is Mainframe,i have 1 year exp,pls any one send me placement papers of Hsbc and technical questions on mainframe

6 Answers   Citi Bank, CitiGroup, HSBC, iNautix, Wipro,

---

What is reference modification? What is UNION in sql and syntax? What is the difference between GDGS and VSAM? Which is prefer one? What is processing groups in endevor?

1 Answers   Kuwait Oil Company,

---

Which of the following EDITind and PICTURE symbols is to be used if a minus(-) is to appear before the value if the value is -ve and a plus(+) is to appear before the value if the value is +ve? (a) + (b) - (c) + OR (d) It is not possible

7 Answers   TCS,

---

How to covert given string into ASCII value in COBOL/MF COBOL

3 Answers   CTS, IBM, iFlex,

---

what is Pic 9v99 Indicates?

2 Answers  

---

How to declare if emp-name = AAAAA""BBB in working-storage section. After display emp-name should print like AAAAA""BB

6 Answers   Polaris,

---

What is a SSRANGE and NOSSRANGE?

0 Answers  

---

1.Can we define condition-name conditions in FD entry.

11 Answers  

---

Hai friends why we need to read a file before re-write a record?

7 Answers   L&T,

---

why we are using picture clause in the cobol programs?

2 Answers  

---