Cobol EVALUATE

[jtwo]

Hi,

Can someone tell me how you interpret the code when there are stacked "WHEN"s with no "action" statements after them (i.e, "PERFORM"s ,etc.) in an EVALUATE TRUE statement ?
Are they to be interpreted as "OR" conditions ? For example, how would the example below be interpreted:


EVALUATE TRUE
WHEN NOT field1
WHEN field2
WHEN field3
WHEN field4
WHEN field5 = '1'
CONTINUE
WHEN TRANS-DATE > CURRENT-DATE
PERFORM....
|
|
|
|
END-EVALUATE

Thanks very much !
jtwo

 

[PHV]

Are they to be interpreted as "OR" conditions
Exactly.

Hope This Helps, PH.
Want to get great answers to your Tek-Tips questions? Have a look at FAQ219-2884 or FAQ181-2886

 

[k5tm]

Presumably field1 through field4 are actually condition-names (i.e. defined with an 88 level), correct?

Tom Morrison

http://www.liant.com

 

[jtwo]

Thanks very much PH, and Tom yes those are 88 level fields.
Jtwo