Interested to Buy Any Domain ? << Click Here >> for more details...
What are the different forms of EVALUATE statement?
- 2 Answers
- 15315 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
What is the local-storage section?
Have you used comp and comp-3 in your project? And how?
what is the difference between COBOL2 AND COBOL390?
How to remove the spaces at the end of each record in the output file of variable length, via cobol program?
input 1 input2 ouput1 output2 output 3 1 re 300 1 re 200 1 re 300 3 rc 500 1 re 200 2 rr 400 1 re 300 2 rr 400 1 rc 400 3 rc 500 1 rc 400 2 rr 700 2 rr 700 5 tt 900 5 tt 900 2 inputs r in flat file and output 1 is matched records,ouptput2 is unmatched of input1,output3 is unmatched of input2! how vl u get the output files using sequential order and to check with each and every records! let me know the procedure division ?
what is s000 u4087 error? please give the all error codes in cobol,jcl.
i was faced one question- i have value -00001234.56 Suppress the zeroes and the output should be -1234.56 But Not - 1234.56 spaces should not be available after suppressing the zeroes. logic in jcl and cobol?
I need to compare 3 variables(dates) and do some processing based on the earliest date. There could be more then 1 date record in any of the 3 fields. What is the best way to code this?
Mention the guidelines to write a structured cobol program?
please..could u give an example about USAGE IS POINTER ..and explain why and when we use it ?
input= ,,,, mainframe training ,,, hyderabad .... location.... output1=$ mainframe training in hyderabad location$ output2=**** mainframe training in hyderabad location ****. In this pgn when we give input considering the spaces the output is displayed in this format.Like in the place of ,,,, $ should be displayed likewise.So please helpmeout.
What is inspect in cobol ?
How can you get the ksds file records into your cobol program?
What is the problem of ordered sequential files access?
How to know whether the module is dynamical or statistical?
