Interested to Buy Any Domain ? << Click Here >> for more details...
How to code fscode 10 in cobol program? Where yoy code in your
pgm?give ans for the question.
- 2 Answers
- 10342 Views
- IBM, I also Faced
- E-Mail Answers
Answers were Sorted based on User's Feedback
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.
| Is This Answer Correct ? | 8 Yes | 0 No |
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 .
| Is This Answer Correct ? | 8 Yes | 1 No |
Explain call by context by comparing it to other calls.
How do define dynamic array in cobol. how do you define single dimensional array and multidimensional array in your cobol?
What is SSRANGE, NOSSRANGE ?
in a indexed file what is procedure for read the records from 12 to 18. please give the code example
whats the disadvantage of search all over search?
ID DIVISION. PROGRAM-ID. PLO. DATA DIVISION. WORKING-STORAGE SECTION. 01 VAR1 PIC 9(2). 01 VAR2 PIC X(2). PROCEDURE DIVISION. ACCEPT VAR2. MOVE VAR2 TO VAR1. STOP RUN. if i give 'PI' in var2 then what will b output of progr. any abend?????
is it possible to rename 01 level?
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.
is this below syntax correct? CALL 'subprg' using A,B Please help
Can we move X(7) to S9(7) COMP?
What are the different types of condition in cobol and write their forms.
What is XDC ?
COBOL 
