Answer Posted / 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 .

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.

1501

---

What is the difference between structured cobol programming and object alternativelyiented cobol?

1298

---

Write a program to enter and display the names of students in a class using the occurs clause.

1260

---

How do u write test cases?

2111

---

What are declaratives and what are their uses in cobol?

1261

---

What are the different rules of SORT operation?

1202

---

Explain about different table spaces.

1155

---

Have you used the sort in your project?for this type of questions any working on real time project give the eg. with real time scenario.

2476

---

Which is the default, TEST BEFORE or TEST AFTER for a PERFORM statement?

1396

---

how can i see junk values in dclgen or in hostvariable of comp ?

3052

---

How can i load all the data from a file to Table (array) in cobol.How i manage the occurs clause with out reading the file.Any options avilable ? Please can any one help me it is urgent?

2632

---

What are the rules of the move verb?

1323

---

here is my requirement A1 is alphanumeric with value 'A1B2C3D4' as defined below 05 A1 PIC X(8) VALUE IS 'A1B2C3D4' but i need to have A2,A3 as ABCD & 1234 repectively...... A2 = ABCD A3 = 1234 Can you please explain me what are the different ways to do it?

8031

---

can anybody post me about file-aid and changemen tools pls and give me reference if any mainframe guys are there

2429

---

what is s000 u4087 error? please give the all error codes in cobol,jcl.

17930

---