Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Profile Log in to check your private messages Log in
 
What are the different forms of EVALUATE statement

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> Mainframe Interview Questions
View previous topic :: :: View next topic  
Author Message
KS

New User


Joined: 28 Feb 2006
Posts: 91
Location: Chennai

PostPosted: Tue Mar 21, 2006 10:18 am    Post subject: What are the different forms of EVALUATE statement
Reply with quote

Hi,
One of the interview question - What are the different forms of EVALUATE statement?Can somebody help?

Thanks,
KS
Back to top
View user's profile Send private message

tusharguptait

New User


Joined: 15 Feb 2006
Posts: 32

PostPosted: Tue Mar 21, 2006 1:00 pm    Post subject: Re: EVALUATE
Reply with quote

1)
EVALUATE
WHEN A=B AND C=D
imperative stmt
WHEN (D+X)/Y = 4
imperative stmt
WHEN OTHER
imperative stmt
END-EVALUATE

2)
EVALUATE SQLCODE ALSO FILE-STATUS
WHEN 100 ALSO '00'
imperative stmt
WHEN -305 ALSO '32'
imperative stmt
WHEN OTHER
imperative stmt
END-EVALUATE

3)
EVALUATE SQLCODE ALSO A=B
WHEN 100 ALSO TRUE
imperative stmt
WHEN -305 ALSO FALSE
imperative stmt
END-EVALUATE

4)
EVALUATE SQLCODE ALSO TRUE
WHEN 100 ALSO A=B
imperative stmt
WHEN -305 ALSO (A/C=4)
imperative stmt
END-EVALUATE


Hope these helps.
Back to top
View user's profile Send private message
KS

New User


Joined: 28 Feb 2006
Posts: 91
Location: Chennai

PostPosted: Wed Mar 22, 2006 5:43 pm    Post subject:
Reply with quote

Thanks.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> Mainframe Interview Questions All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts WER268A OUTREC STATEMENT : SYNTAX E... frozenblood87 SYNCSORT 12 Sat Aug 26, 2017 9:45 pm
No new posts Suppress value reported by BREAK in D... Learncoholic DFSORT/ICETOOL 3 Wed Aug 16, 2017 6:03 pm
No new posts ON 2 AND EVERY 1 - Statement ??? UmeySan COBOL Programming 2 Tue Jul 25, 2017 1:20 pm
No new posts ROUNDED Problem with COMPUTE statement shalem COBOL Programming 11 Thu Feb 09, 2017 8:16 pm
No new posts VALIDATE NULL VALUE IN DB2 CASE STATE... useit DB2 5 Thu Feb 09, 2017 4:34 pm

Facebook
Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us