ADELIA |
VADELIA |
SADELIA |
WADELIA |
EADELIA |
(I/B) |
(I/B) (C/S) |
(B) (S) |
(I/B) (C/S) |
(B) (C/S) |
Section for use
All
Syntax
ELSE
Description
This instruction is optionally used with the IF instruction. It must be specified immediately after the processing statements which are executed when the evaluation of the conditions of the associated IF instruction (or possible ELSE_IF) applies.
The ELSE instruction is followed by the processing statements which are to be executed until the END instruction if the evaluation of the associated IF instruction, and possible associated ELSE_IF, does not apply.
Example
IF Z_PAYMENT_CODE = *BLANK
RETURN
ELSE
* payment code is not blank
CHAIN PAYMENTS
IF PAYMENTS DOES_NOT_EXIST
PREPARE_MSG 0090 Z_PAYMENT_CODE
ANOMALY
ELSE
* payment code exists
IF *LOCKED = '1'
PREPARE_MSG 0002 Z_PAYMENT_CODE
ANOMALY
ELSE
* payment record is not locked
PRESENT PAYMENTS
END
END
END