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


Please Help Members By Posting Answers For Below Questions

Explain how you can characterize tables in cobol?

636


What is perform what is varying?

701


what is the difference between COBOL2 AND COBOL390?

2449


Explain how to differentiate call by context by comparing it to other calls?

683


What is the Purpose of POINTER Phrase in STRING command in COBOL?

713






How many sections are there in data division in COBOL?

676


if we have " ibm mainframe ",in that how to remove first and last leading space eg:"ibm mainframe" like that the answer we need

853


How do u write test cases?

1633


how do you reference the ksds vsam file formats from cobol programs

660


What are declaratives and what are their uses in cobol?

706


Discuss about changing dataset name in proc.

757


how do you reference the esds vsam file formats from cobol programs

627


What is the difference between Global and External Variables?

660


i want to learn mainframe..any websites and material to learn from basic..? my mail id : rajeswaribe2010@gmail.com

1767


If you are current on the owner of a set, what is the difference between an obtain next and obtain first? Actually in which topic will we use dis???Plz explain it clearly

2656