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.

Required Parameters

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.

Optional Parameters

RMP--SUPPRESS-EVENT-RESET can be set to TRUE to prevent RMP--NEXT-FIELD and RMP--NEXT-OCCUR from being reset.

Returned Values

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.

Additional Usage Notes

  • This standard run-time function resets the next field/control to be entered because generally the standard run-time function is used within an event loop and the new input status of the field/control should take effect immediately.
  • An inverse standard run-time function, ENABLE FIELD FOR INPUT, is also available.


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.