オフコン練習帳

システムサブルーチンでのプリンタ番号の変更について

投稿者： Tama 投稿日時： 2006-3-10 10:28:00


FILE-CONTRO.
  SELECT  PR  ASSIGN  TO  PR-PRN999-{フォーム名}.


WORKING-STORAGE   SECTION.     

  77 PRN-DATA1  PIC  X(6)  VALUE  "PRN123".
  77 PRN-DATA2  PIC  X(6)  VALUE  "      ".
　　　　　　　　　　　　　　　　　　　　　　↑空白６つです

PROCEDURE DIVISION.

  CALL "CBLASGN"  USING  PR PRN-DATA1  PRN-DATA2.

上記のような記述でプログラム実行時にプリンタ番号を
変更しているのですがフォームが出力されません。
装置アドレスを変更しているのが原因だとは思うのです
がどのように記述すればよいのかで行き詰っています、
回避策を教えて頂けないでしょうか。

名前※
題名
メッセージ	サンプル [もっと...]
パスワード※
オプション	※印の項目をクッキーに保存