印刷 EJECT

PRINT EJECT は、指定された情報を出力の新しいページの上部に表示します。 実行されるたびに、 PRINT EJECT はページのイジェクトを行います。

PRINT EJECT [OUTFILE='file'] [ENCODING='encoding specification']
  [RECORDS={1}] [{NOTABLE}] 
           {n}   {TABLE  }

  /{1    } varlist [{col location [(format)]}] [varlist...] 
   {rec #}          {(format list)          }
                    {*                      }

 [/{2    }...] 
   {rec #}

このコマンドは、アクティブなデータ・セットを読み取りません。 これは保管され、データ・セットを読み取る次のコマンドで実行が保留されます。 詳しくは、トピック「 コマンドの順序 」を参照してください。

リリース履歴

リリース 16.0

  • Unicode をサポートするために ENCODING サブコマンドが追加されました。

DO IF $CASENUM EQ 1.
PRINT EJECT /'   NAME ' 1 'DEPT' 25 'HIRED' 30 '  SALARY' 35.
END IF.
PRINT / NAME DEPT *
        MOHIRED(T30,F2) '/' YRHIRED *
        SALARY (T35,DOLLAR8).
EXECUTE.