What are the different forms of EVALUATE statement?
Answers were Sorted based on User's Feedback
Answer / 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 |
please..could u give an example about USAGE IS POINTER ..and explain why and when we use it ?
What are the different open modes available in cobol?
Suppose, file A has 100 records and file B has 500 records. We want to write records common to both A and B into file C and records which are present only in either A or B into another file D. What should be the logic of Cobol program to achieve this?
7 Answers Bank Of America, Mind Tree,
hie everyone.i just completed my b.tech in electronics and joined mainframes course.am i doing right course for my better future?please help me with your suggestions.ill be very thankful to you guys.
can we use 77 level no for Redefines?if we use give an example?
I want to declare a field with data type Double in my COBOL program. how shall i do that ?
77 I pic 99 value 5 Perorm para-A I times. Para -A. move 10 to I. How many times the para-A will be executed.?
How to change size of Initial number of records to *NOMAX for ALL PF files from perticular library, how can I do that
What are the divisions in a cobol program?
wht happens if we dnt give scope terminator ?
Write some characteristics of cobol as means of business language.
Name the divisions, which are available in a cobol program?