Interested to Buy Any Domain ? << Click Here >> for more details...
What are the different forms of EVALUATE statement?
- 2 Answers
- 15498 Views
- IBM, Micro Labs, I also Faced
- E-Mail Answers
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
Can we redefine the field of x(200) to less than 200?
How do we get current date from system with century in COBOL?
How to get the last record in vsam file in cluster? And how can you get the ksds file records into your cobol program?
Name the sections present in data division.
What is inspect in cobol ?
if we have " ibm mainframe ",in that how to remove first and last leading space eg:"ibm mainframe" like that the answer we need
Why did you choose to work with ibm mainframe cobol programming?
how do you reference the esds vsam file formats from cobol programs
HOw can I get the negative sign while deduct high value from low value
What is the difference between structured cobol programming and object alternativelyiented cobol?
How to traceback if I am getting SOC7 or SOC4 abend? List down the steps
What is redefines clause in COBOL?
What is the difference between a binary search and a sequential search what are the pertinent cobol?
What is the difference between PIC 9.99 and 9v99 in COBOL?
What are the different rules of SORT operation?
