Interested to Buy Any Domain ? << Click Here >> for more details...
How do you come out of an EVALUATE statement?
- 3 Answers
- 9217 Views
- I also Faced
- E-Mail Answers
Answers were Sorted based on User's Feedback
Answer / prakash shrivastava
AFTER THE EXECUTION OF ONE OF WHEN CLAUSE ,THE CONTROL IS
AUTOMATICALLY PASS TO THE NEXT SENTENCE AFTER THE EVALUTE
STATEMENT.THERE IS NO NEED ANY EXTRA CODE FOR EVALUATE
STATEMENT.
| Is This Answer Correct ? | 4 Yes | 0 No |
Answer / purushothaman.m
at the end of the statement use END-EVALUATE(scope
terminator) before StopRun.
| Is This Answer Correct ? | 2 Yes | 0 No |
Answer / aji cherian
As soon as a condition is met, it will come out
automatically.
| Is This Answer Correct ? | 2 Yes | 1 No |
Size of a column has been changed in DB2 table (Suppose it was of 5 characters and later changed to 4 characters) and forgot to change the DCLGEN in COBOL program, what will happen during the execution of code? If the program Abends then what will be the error? If it doesn't abend then hpw the error can be catched?
What is the use of EVALUATE statement?
what are the utilities for load and unload the DB2 tables
Name the divisions in a COBOL program ?
What is amode(24)?
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
I have a field with data type X(10). I want to perform arithmetic operation on this field? I tried doing it by moving the value into a numeric field. but it didn't work out. I am getting a S0C7 abend. Pls let me know if there is any way of getting this done?
how do u link sub pgm to main pgm ?
01rec1. 05 a pic 999v99 value 123.12 05 b pic 99v9 value 45.9 02 rec2. 05 x pic 999v99 05 y pic 99v99 05 z pic x(3) value 'abc' if rec1 is moved to rec2 then what is the value of rec2?
How can you declare the file ?
Write some characteristics of cobol as means of business language.
01 text-data pic x(100). move 'xyzdbfrjjg u' to text-data. how to find the value of last index of text-data?
COBOL 
