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
How can we find that module can be called – whether DYNAMICALLY or STATICALLY?
Write a program to explain size error.
) How do u handle errors in BMS macro
Define cobol?
what is difference between cobol and cobol/400
What is the difference between Structured COBOL Programming and Object Oriented COBOL programming?
What is an in line perform? When would you use it? Anything else you wish to say about it.
Have you used comp and comp-3 in your project? And how?
Why did you choose to work with ibm mainframe cobol programming?
Write a cobol program making use of the redefine clause.
What rules are followed by the search verb.
How to fetch 1000 error records from VSAM file(Eg: 1000000 records present) while getting SOC7 abend ?
What type of SDLC u followed? Why?
Explain how to differentiate call by context by comparing it to other calls?
What are the different rules to perform a Search?