iTS 1.0+)

SCREEN COBOL Source Program

Compaq NonStop™ Pathway/iTS SCREEN COBOL Reference Manual—426750-001

2-19

Simple Conditions

Class Condition

The class condition determines whether a DISPLAY item value is numeric or alphabetic.

Class condition syntax is:

When NOT is included, the test condition is reversed. NOT NUMERIC tests for a field

being nonnumeric; NOT ALPHABETIC tests for a field being nonalphabetic.

The NUMERIC test cannot be used with an item described as alphabetic. The

NUMERIC test cannot be used with a group item composed of elementary items with

data descriptions that include operational signs. If the data item being tested is signed,

the item is numeric only if the contents are numeric and a valid sign is present. If the

item is not signed, the item passes the test only if the contents are numeric and no sign is

present. Valid signs for items with SIGN IS SEPARATE clause are + and -.

The ALPHABETIC test cannot be used with an item described as numeric.

Condition-Name Condition

A condition-name condition determines whether or not the value of a conditional

variable is equal to one of the values predefined for the condition-name.

Condition-name condition syntax is:

The condition-name must be a level 88 item defined in the Data Division and given

a value or a range of values.

The condition is true if the value of the conditional variable is equal to one of the

condition-name values or falls within one of the ranges of values (including both

ends of the range) given with condition-name.

data-name [ IS ] [ NOT ] { NUMERIC }

{ ALPHABETIC }

condition-name