Study the DATA DIVISION entries and the three PROCEDURE
DIVISION entries
given below:
01 END-OF-FILE-SWITCH PIC XXX.
88 NO-MORE-RECS VALUE "YES".
88 MORE-RECS VALUE "NO".
(i) READ SAMPLE-FILE AT END MOVE "YES" TO NO-MORE-RECS.
(ii) IF NO-MORE-RECS = "YES" GO TO LAST-PARA.
(iii) IF NO-MORE-RECS GO TO LAST-PARA.
Which are wrong?
(a) (i) and (ii)
(b) (ii) and (iii)
(c) (i) and (iii)
(d) all
Answer Posted / sharmila
HI, please correct me if m wrong..
as we cannot place a condition for 88 level number. Both ii and iii are wrong. hence the correct option should be (b) right?
Is This Answer Correct ? | 0 Yes | 2 No |
Post New Answer View All Answers
what happens if parmparameter passes zero bytes to the program
How to change size of Initial number of records to *NOMAX for ALL PF files from perticular library, how can I do that
I have to write to a outfile where the number of records in that file should be the header of that file using IMS.. can anyone help me in this issue
What is a report item?
What is the difference between PIC 9.99 and PIC9v99?
how to access the file from prodution from changeman tool and to submit a file to production
how do you reference the variable block file formats from cobol programs
Explain how to differentiate call by context by comparing it to other calls?
Give some examples of command terminators?
what are decleratives in cobol?
Which mode is used to operate the sequential file?
Define static linking and dynamic linking.
what is amode(24), amode(31), rmode(24) and rmode(any)?
What is link edit in cobol?
Our issue is there seems to be a disconnect, or no link, between our SELECT statement and our SD. We had SELECT SORT-FILE and SELECT SORT-FILE ASSIGN TO SORTWRK. ASSIGN TO SORTWRK1 SORTWRK2 SORTWRK3 SORTWRK4. with SD SORT_FILE RECORD CONTAINS 7833 CHARACTERS. In either case, at run time, the system ignored our SORTWRK# DD statements and allocated 16 sort works with the SORTWK## naming convention. Any ideas why the system does not recognize the connection? We do not even need the SORTWRK DD statements. Thanks