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
What is the difference between next sentence and continue in cobol programing language?
IF I mention stop run in CICS what happens?
How to read the 2nd last record of a VSAM file? (The file size is huge and we don't know the key)
In which area will you utilize 88 level items in cobol?
What type of SDLC u followed? Why?
What is the compute verb? How is it used?
What is a SSRANGE and NOSSRANGE?
Name the divisions, which are available in a cobol program?
What is static and dynamic call in cobol?
What are the different rules to perform a Search?
i was faced one question- i have value -00001234.56 Suppress the zeroes and the output should be -1234.56 But Not - 1234.56 spaces should not be available after suppressing the zeroes. logic in jcl and cobol?
How can we find that module can be called – whether DYNAMICALLY or STATICALLY?
What rules are followed by the search verb.
Why would you use find and get rather than to obtain?
What is perform what is varying?