What are the different forms of EVALUATE statement?
Answer Posted / shinoy sansilavose
EVALUATE
WHEN A=B AND C=D
imperative stmt
WHEN (D+X)/Y = 4
imperative stmt
WHEN OTHER
imperative stmt
END-EVALUATE
EVALUATE SQLCODE ALSO FILE-STATUS
WHEN 100 ALSO '00'
imperative stmt
WHEN -305 ALSO '32'
imperative stmt
WHEN OTHER
imperative stmt
END-EVALUATE
EVALUATE SQLCODE ALSO A=B
WHEN 100 ALSO TRUE
imperative stmt
WHEN -305 ALSO FALSE
imperative stmt
END-EVALUATE
EVALUATE SQLCODE ALSO TRUE
WHEN 100 ALSO A=B
imperative stmt
WHEN -305 ALSO (A/C=4)
mperative stmt
END-EVALUATE
| Is This Answer Correct ? | 15 Yes | 0 No |
Post New Answer View All Answers
What is the difference between comp and comp-3?
How to get the last record in vsam file in cluster? And how can you get the ksds file records into cobol program?
What is the difference between Call and a Link?
What are declaratives and what are their uses in cobol?
What is rmode(any) ?
What is a report item?
Have you used the sort in your project?for this type of questions any working on real time project give the eg. with real time scenario.
IF I mention stop run in CICS what happens?
System Testing for Mainframe Developers What is System Testing? integration testing ? what's the procedure ..
How to know whether the module is dynamical or statistical?
What are various search techniques in cobol? Explain.
For rewrite, why is it mandatory that file needs to be opened?
Why would you use find and get rather than to obtain?
How you can characterize tables in cobol?
What is comp-1 and comp-2?