x"AF" function 62 - Adis での Panels の使用中断

Adis で Panels の使用を中断します。

x"AF" function 62 は、パネルが必要でない場合に、画面への直接書き込みを可能にするために、Adis による Panels の使用を中断します。

この機能を使用する前に、x"AF" function 49 を使用し、Panels を使用するために Adis を初期化する必要があります。

構文：

call x"AF" using  suspend-function
                  suspend-parameter

パラメーター：

`suspend-function`	pic x comp-x value 62。
`suspend-parameter`	次のいずれかの値を含む pic x comp-x value フィールド。 0 - Panels の使用を中断します。 1 - Panels の使用を再開します。

説明：

Adis が Panels を処理するために初期化されていない場合は、値 255 が suspend-function に返されます。

例：

 01 suspend-function     pic x comp-x value 62.
 01 suspend-parameter    pic x comp-x.
 ...
*   (Code to set up Adis to use Panels)
            ...
* Suspend Panels working
     move 0 TO suspend-parameter.
     call x"af" using suspend-function
                      suspend-parameter.
            ...
* Reactivate Panels working   
     move 1 TO suspend-parameter.
     call x"af" using suspend-function
                      suspend-parameter.