Can "EVALUATE" execute all conditions

Lalitha Hima Bindu · New User Joined: 06 Jul 2007 Posts: 5 Location: Chennai

Here is my question?

Q1. What will be the output for the below code:
:

working-storage section.

77 A PIC 9 VALUE IS 1.

:

:

PROCEDURE DIVISION.

EVALUATE TRUE

WHEN A <2

DISPLAY "CASE2"

WHEN A = 1

DISPLAY "CASE1"

WHEN OTHER

DISPLAY "OTHER"

END-EVALUATE.

A: CASE2

Q2. What will be the output for the below code:

:

:

working-storage section.

77 A PIC 9 VALUE IS 1.

:

PROCEDURE DIVISION.

EVALUATE TRUE

WHEN A = 1

DISPLAY "CASE1"

WHEN A <2

DISPLAY "CASE2"

WHEN OTHER

DISPLAY "OTHER"

END-EVALUATE.

A: CASE1

But in my Program, I like to change the way how EVALUATE statement functions. i.e. I like to execute EVALUATE all conditions and like to take the last satisfied condition.

Is it possible, if so how ?

Thanks in Advance
Lalitha.

ksk · Posted: Mon Jan 21, 2008 12:15 pm

Hi.

murmohk1 · Posted: Mon Jan 21, 2008 12:33 pm

Lalitha,

Use seperate IF loops.

Aaru · Posted: Mon Jan 21, 2008 1:15 pm

Lalitha,

Hi and welcome to the forums.

Lalitha Hima Bindu · New User Joined: 06 Jul 2007 Posts: 5 Location: Chennai

I heard "EVALUATE" can handle multiple conditions also. In the sense for Q1 even though the first When satisfies, still it will execute the second when and it will display the O/P as "CASE1". But I donot knowhow to achieve this using Evaluate.

guptae · Posted: Mon Jan 21, 2008 2:16 pm

Hi Lalitha,

As mentioned by Aaru

varunvasudevan · New User Joined: 10 Jan 2008 Posts: 4 Location: Chennai

Hi Lalitha,
u have heard that EVALUATE will handle multiple condition.That s true but u have taken it in wrong meaning.Normally the IF condion can handle only two condions ie true or false.
if (cond)
........
else
.....
end-if.
otherwise u can use AND/OR with if statment.Other option is u should go for nested if statements.

But EVALUATE will handle multiple conditions by specifying conditions in WHEN clause.You can use one EVALUTE statement with multiple when coditions.
And regarding ur question, once a WHEN condition satisfies ,the control will exit from EVALUATE statment and it will go to next statement.So i think u should go for another command to take only the last satisfied condition.

mmwife · Super Moderator Joined: 30 May 2003 Posts: 1592

Hi Lalitha,

the_gautam · Posted: Mon Jan 21, 2008 8:56 pm

hi Lalitha,
as far as a single EVALUATE statement is concerned, it can execute only one successful WHEN clause. if there are more than one WHEN clauses in the EVALUATE structure which satisfies the condition mentioned with the EVALUATE clause, the first satisfying WHEN clause is executed and the control moves to the END-EVALUATE statement. it does not check the other WHEN clauses as soon as one WHEN clause is executed.

mnnarayankar · New User Joined: 21 Jan 2008 Posts: 23 Location: bangalore

Hi Lalitha,

In EVELUTE if any of the WHEN CONDITION is satisfied then pointer automatically come out of the END-EVALUATE statement.