|
|
|
|
|
Table 58 Commands of the Rule Definition Screen
Command |
Description |
|---|---|
EDIT |
The EDIT command alternately enters and exits the Edit environment of the Rule Definition screen. The Edit environment provides ISPF-like line editing commands for the Rule Definition screen. For more information see Editing Rule Definitions in the IOA Edit Environment. |
CMNT |
The CMNT command (PF04/PF16) inserts comment lines after the current line. To insert a comment, type CMNT in the COMMAND field, position the cursor on the line before which comments should be inserted, and press Enter. For more information see Specifying Comments. |
LABEL |
The LABEL command alternately displays and hides the (empty) labels of ALWAYS and IF subparameters. These labels are used as rule processing flow reference points by statement DO GOTO. |
The Rule Definition screen in Figure 50 contains a LABEL specification (RULE_END).
Figure 50 Rule Definition Screen with the LABEL Specification
LIBRARY : CTB.PROD.RULES RULE : COMMIT1
COMMAND ===> SCROLL===> CRSR
+-----------------------------------------------------------------------------+
EXECUTE COMMIT UPON C
ON DATA
LABEL: RULE_END
IF DB_CURRENCY.SUM > 50000.00 C
DO SHOUT TO U-M18 URGENCY R
= PLEASE CHECK CURRENCY FILE; PROBLEMS WITH SUM
DO REMARK = SUM IS OVER 50000
DO COMMIT = NONE VAR C
DO TERMINAT = NOTOK COD 0055
DO
ELSE
DO REMARK = SUM IS NOT OVER 50000
DO TERMINAT = OK COD 0000
DO
(ENTER "ALWAYS", "IF")
===========================================================================
EXECUTE UPON C
ON
======= >>>>>>>>>>>>>>> END OF RULE DEFINITION PARAMETERS <<<<<<<<<<<<<<< =====
PLEASE FILL IN RULE DEFINITION. 15.22.09
Parent Topic |