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
 
reg EVALUATE in COBOL?

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> COBOL Programming
View previous topic :: :: View next topic  
Author Message
subramanianup
Warnings : 1

New User


Joined: 18 May 2005
Posts: 46
Location: Bangalore, INDIA

PostPosted: Tue Feb 07, 2006 4:00 pm    Post subject: reg EVALUATE in COBOL?
Reply with quote

What will happen in the following case
MOVE 5 TO PART1
MOVE 6 TO PART2

Which PARA will be performed in the following code,
EVALUATE TRUE
WHEN PART1=5
PERFORM A-PARA
WHEN PART2=6
PERFORM B-PARA
WHEN OTHER
NEXT SENTENCE
END-EVALUATE.
can anyone explain this?
Back to top
View user's profile Send private message

Rupesh.Kothari

Member of the Month


Joined: 27 Apr 2005
Posts: 464

PostPosted: Tue Feb 07, 2006 4:05 pm    Post subject: Re: reg EVALUATE in COBOL?
Reply with quote

HI,

Quote:
What will happen in the following case
MOVE 5 TO PART1
MOVE 6 TO PART2

Which PARA will be performed in the following code,
EVALUATE TRUE
WHEN PART1=5
PERFORM A-PARA
WHEN PART2=6
PERFORM B-PARA
WHEN OTHER
NEXT SENTENCE
END-EVALUATE.
can anyone explain this?



I believe PERFORM A-PARA will perform as it first check the first when statement and evaluate and after that not check the second when and terminate the EVALUATE.

Hope this helps

Regards
Rupesh
Back to top
View user's profile Send private message
priyesh.agrawal

Senior Member


Joined: 28 Mar 2005
Posts: 1452
Location: Chicago, IL

PostPosted: Tue Feb 07, 2006 4:22 pm    Post subject: Re: reg EVALUATE in COBOL?
Reply with quote

Rupesh is correct.... This code will execute only A-PARA while going thru the EVALUATE statement.

You would like to see here...

Regards,

Priyesh.
Back to top
View user's profile Send private message
rajesh_1183

Active User


Joined: 24 Nov 2005
Posts: 121
Location: Tadepalligudem

PostPosted: Tue Feb 07, 2006 4:23 pm    Post subject:
Reply with quote

Yaa Rupesh is write.In the Evaluate...which ever the first WHEN condition that is true...is executed and exits from the EVALUATE.


Thanks,
Rajesh
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 -> COBOL Programming All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
This topic is locked: you cannot edit posts or make replies. Cobol to fetch the content by using s... arunc55 COBOL Programming 4 Fri Nov 17, 2017 1:25 pm
No new posts VBS and VB, COBOL syntax is the same ... natt.sut COBOL Programming 3 Sun Nov 12, 2017 6:36 am
No new posts COBOL - EXIT statement weird behavior anthony.pangestu COBOL Programming 0 Fri Oct 27, 2017 9:57 am
No new posts IEW2456E error when link-editing a C ... Senthilraj JCL & VSAM 0 Fri Oct 13, 2017 3:12 pm
No new posts Assembler Macro Copybook converted to... Ziquilix PL/I & Assembler 4 Tue Sep 26, 2017 3:07 am

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