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
Answers were Sorted based on User's Feedback
Answer / santhosh
please be in attention.Read the code thoroughly for syntax
errors.Here in this code he is performing a paragraph which
is not defined (i,e.)he is performing pri-out paragraph &
defined pre-out paragraph.
| Is This Answer Correct ? | 5 Yes | 0 No |
Answer / satyaprem
the programmer need to pay attention to code ...syntax
error ..looks ans 1 but not true ...
| Is This Answer Correct ? | 0 Yes | 0 No |
Difference between ps, esds
COBOL Snippet: Tell where the control will when the below code execute IF (A=B) CONTINUE ELSE NEXT SENTENCE PERFORM <IMP-STMT> END-IF.
can we display comp-3 variables. if we want to display what we have to do . give me one example
How can we increase the size of an existing PDS to include more no. of modules. I tried the answer posted by Jagan(TSO PDS 'pds name') but did not find it working. The answer posted by kamal i know very well. Please suggest me a answer so that we don't need to delete the existing PDS and still we can change the size as well.
I have a file it contain 10 records.i got abend at 8th record because of soc7.how do you know that perticular record got abend?
Without using move verb how to move one variable to another.
what do you mean by copybook? and what is the difference between the copybook which we are using in working storage and procedure division.
how would you resolve sb37 and SE37?
Re: 01 NAME1 PIC X(13) VALUE "COBOL PROGRAMMING". 01 NAME2 PIC X(13). now I want to display the value of NAME1 in reverse order i.e value should be displayed as "GNIMMARGORP LOBOC" HOW can I do that ??? please let me know if any one knows it.
Can anyone explain me CALL procedure in COBOL.Does it carries similarities like call by reference in C.
Why IBM?
What is COMP SYNC?