call "PC_PRINTER_REDIRECTION_PROC" by value flags user-func
呼び出しプロトタイプ使用時 (「説明の読み方」を参照) | PIC | |
---|---|---|
flags | cblt-x4-comp5 | pic x(4) comp-5 |
user-func | cblt-ppointer | usage procedure pointer |
flags | 将来使用するために予約されています。0 に設定する必要があります。 |
user-func | プリンターを操作するプロシージャへのポインター |
説明:
このルーチンにより、標準 COBOL OPEN OUTPUT 構文および ASSIGN TO PRINTER 句を使用して、プリンターのフォントを設定および操作できます。
この呼び出しを正しく動作させるには、printer-redirection チューナーを設定する必要があります。
ランタイム システム エラー 166 を避けるには、プログラムで COBOL 句の局所記憶節を設定する必要があります。
PC_PRINTER_REDIRECTION_PROC を呼び出すと、user-func でポイントされたユーザー関数がランタイム システムに登録されます。
ユーザー関数は次の形式にする必要があります。
printer-handle は pic x(4) comp-5 データ項目として定義する必要があります。
OPEN 文でプリンターを開くと、このユーザー関数が呼び出され、プリンター ハンドルが printer-handle で返されます。その後、ユーザー関数で、PC_PRINTER_ ライブラリ ルーチンを使用してプリンターを操作できます。次の一連のイベントを決定するために、ユーザー関数からランタイム システムに値を返す必要があります。
正常に呼び出された場合は戻りコード 0 を返し、それ以外の場合は別の値を返すようにユーザー プロシージャをコーディングする必要があります。ユーザー関数からゼロ以外の値が返された場合、ランタイム システムはプリンターを閉じ、ユーザー関数を呼び出した OPEN OUTPUT 文でファイル状態 9/005 が返されます。