consider the following progrm statements
MOVE 0 TO SW.NO.OF.REC
PERFORM PRI-OUT UNTIL SW=1
DISPALY NO.OF.REC
STOP RUN
PRE-OUT
READ IN-FILE AT END
MOVE 1 TO SW
WRITE OUO-REC FROM IN-REC
ADD 1 TO NO.OF REC
if the IN-FILE contains 1000 records what value will be
displayedafter the
PERFORM is over?assume that N0.OF.REC has PIC 9(4)
a.1000
b.1001
c.1
d.none of the above since there is a syntex error
Answer Posted / islam
the correct answer is : c (i.e. 1)
| Is This Answer Correct ? | 0 Yes | 1 No |
Post New Answer View All Answers
How to remove the spaces at the end of each record in the output file of variable length, via cobol program?
Program A (Normal COBBAT) calling a B Program (DB2COBOL, COBBATDB which is using a VSAM file. its a dynamic call. How we will handle VSAM file decleration in our from JCL from where we are running A PGM. And should we have PLAN for A pGM also. if possible can some one post a sample JCL. Thanks for help in advance.
what is the use of outrecord?
What is the Purpose of Pointer in the string?
What is the default value(s) for an initialize? What keyword will allow for an override of the default?
Have you used comp and comp-3 in your project? And how?
HOw can I get the negative sign while deduct high value from low value
What is the difference between goback, stop run and exit program in cobol?
Which Search verb is equivalent to PERFORM…VARYING?
How you can characterize tables in cobol?
how do you reference the rrds file formats from cobol programs
How to remove 2 duplicate records and copy only one using job control language?
How did the release of cobol/370 version 1.3 improve the performance of release 1.1?
How do we get current date from system with century in COBOL?
What is a SSRANGE and NOSSRANGE?