How to code fscode 10 in cobol program? Where yoy code in your
pgm?give ans for the question.
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 .
| Is This Answer Correct ? | 8 Yes | 1 No |
Post New Answer View All Answers
State the various causes of s0c1, s0c5 and s0c7.
how to refer the data field?
What is cobol?
What is the difference between Global and External Variables?
)If there are 10 steps in GDG, if I want to refer the step2 after step5 . what should I do?
Name the divisions, which are available in a cobol program?
How to know whether the module is dynamical or statistical?
I have a File that has duplicate records. I need only those records that occur more than thrice.?
Which is the default, TEST BEFORE or TEST AFTER for a PERFORM statement?
Difference between array and sub-script ?
please..could u give an example about USAGE IS POINTER ..and explain why and when we use it ?
Write the code to count the sum of n natural numbers.
i want a program using by if, evaluate , string, unstring, perform, occurs?
input= ,,,, mainframe training ,,, hyderabad .... location.... output1=$ mainframe training in hyderabad location$ output2=**** mainframe training in hyderabad location ****. In this pgn when we give input considering the spaces the output is displayed in this format.Like in the place of ,,,, $ should be displayed likewise.So please helpmeout.
How to fetch 1000 error records from VSAM file(Eg: 1000000 records present) while getting SOC7 abend ?