PERFORM RMP--DFI-PANELNAME
This standard run-time function prevents input to a field/control that was specified as allowing input in the Panel Editor. Many times a certain field/control should be input, or not input, based on the value of another field/control. This standard run-time function allows a field/control to be disabled for input at run-time execution, rather than at panel creation time, increasing the flexibility of the EXECUTE EVENT standard run-time function.
The program must set the name of the field/control to be disabled in RMP--FIELD-NAME. If the field/control occurs more than once, all occurrences of the field/control will be disabled.
RMP--SUPPRESS-EVENT-RESET can be set to TRUE to prevent RMP--NEXT-FIELD and RMP--NEXT-OCCUR from being reset.
The values of RMP--NEXT-FIELD and RMP--NEXT-OCCUR are reset, based upon the new input status of the fields/controls on the panel.
Status value | Description |
---|---|
0 | The function executed successfully. |
1 | The field/control name is invalid. |
5 | The panel is not in this library |
6 | The library does not exist. |
14 | A COBOL input/output error was encountered on the panel library during execution of this function. To determine the exact nature of the I/O error, use the C$RERR subprogram. |