Adis で Panels の使用を中断します。
x"AF" function 62 は、パネルが必要でない場合に、画面への直接書き込みを可能にするために、Adis による Panels の使用を中断します。
この機能を使用する前に、x"AF" function 49 を使用し、Panels を使用するために Adis を初期化する必要があります。
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.
説明:
Adis が Panels を処理するために初期化されていない場合は、値 255 が suspend-function に返されます。