CASEDFT

Specifies the default subroutine to be run in a CASE group.

CASEDFT 
 Sr  (Subroutine Name)
ParmList (<u>*NONE</u> | Subroutine Name)
 F1  (Operand)
 F2  (Operand)
Hi (Indicator Variable)
Lo (Indicator Variable)
Eq (Indicator Variable)

Parameters

Sr

Required. Contains the subroutine name to be called. The name must be a valid subroutine name declared on a BEGSR command. **

ParmList

Optional. The name of the parameter list. *NONE is the default.

F1

Optional. Can contain any valid operation.

F2

Optional. Can contain any valid operation.

Hi

Optional. As a result of the comparison, the Hi indicator is set on if F1 is greater than F2 .

Lo

Optional. As a result of the comparison, the Lo indicator is set on if F1 is less than F2 .

Eq

Optional. As a result of the comparison, the Eq indicator is set on if F1 is equal to F2 .

Remarks

The CASEDFT operation is functionally identical to an EXSR operation. Any CASE operations that follow an unconditional CASEDFT operation in the same CASE group are never tested. The normal placement of the unconditional CASEDFT operation is after all other CASE operations.

See Also

BEGSR

CASE

ENDCS

EXSR