Panels で使用するために Adis を初期化します。
x"AF" function 49 は、画面と同じ寸法のパネルを作成します。このパネルは自動的に使用可能になり、黒の背景に白の前景属性で埋められた領域です。画面はクリアされます。
この機能は、プログラムの最初に 1 回のみ呼び出します。
call x"AF" using init-panels-fn parameter
init-panels-fn | pic x comp-x value 49。 |
parameter | 任意の英数字データ項目。Adis は、そのサイズおよび内容を無視します。 |
01 init-panels-fn pic x comp-x value 49. 01 parameter pic x. ... call x"af" using init-panels-fn parameter
この呼び出しで作成されたパネルは、自動的に使用可能になり、画面から以前の内容をクリアします。そのパネルは、デフォルトの背景文字で埋められた領域です。デフォルトの属性設定は、黒の背景に白の前景です。すべての ACCEPT 文および DISPLAY 文は、他のパネルが指定されない限り、このパネルを操作します。この詳細については、「ACCEPT/DISPLAY 用のパネル指定」の機能を参照してください。この呼び出しで作成されるパネルの識別子 (Panel-ID) の値は、常に 0 です。
この呼び出しは、Adis で使用される 6 つのパネルを作成します。次のリストの最初のパネル以外は、すべて画面の下部に表示されます。
この 6 つのパネルは、プログラムでは使用できません。