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 |
Why we are using comp and comp-3 in real time projects?
if you give cylinder(1,1)how many cylinders it will be allocate?
for an INITIALIZE and what keyword allows for an override of the default.
COBOL Snippet: Tell where the control will when the below code execute IF (A=B) CONTINUE ELSE NEXT SENTENCE PERFORM <IMP-STMT> END-IF.
What is the maximum size of a 01 level item in COBOL I? in COBOL II?
How to use the same COBOL program in Batch and CICS on lines? explain with an example
What are options have been removed in COBOL 11?
What is difference between comp & comp-4?
In file1 have 80 records are like d1,d2,d3......D80. File2 have 1000records are like a1d1,a1d2,a3d3.....Etc. I want matching records in file3 ? Plse tell me the matching logic???I want answer only in cobol ?Not using any tool or jcl?
In a COBOL II PERFORM statement, when is the conditional tested, before or after the perform execution?
wht is structured cobol pgm and non structred cobol pgm ?
Define REDEFINE clause and Is it possible to have the redefine clause anywhere in the working storage section for a data name?