x"AF" Function 1 - Disable or Enable Adis Indicators

Enables or disables Adis indicators or error messages.

When you use x"AF" function 49 to tell Adis that you are using Adis and Panels together, the function creates six predefined panels for you. Four of the panels are used to display Adis indicators (Insert, Replace, Auto-skip, and Off-end-of-field indicators). Another field is used for displaying Adis error messages. You might want to suppress these messages when you are using Panels.

Syntax:

call x"AF" using   indicators-fn
                   parameter 

Parameters:

indicators-fn pic x comp-x value 1. If an error occurs in the execution of this function, function-code is set to 255 on exit.
parameter A pic x(4) field containing one of the following values:
  • x"01322C01" To disable the error message panel.
  • x"03323803" To disable the indicator panels.
  • x"01322C02" To enable the error message panel.
  • x"03323800" To enable the indicator panels.