PRINT EJECT

PRINT EJECT displays specified information at the top of a new page of the output. Each time that it is executed, PRINT EJECT causes a page ejection.

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

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

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

This command does not read the active dataset. It is stored, pending execution with the next command that reads the dataset. See the topic Command Order for more information.

Release History

Release 16.0

• ENCODING subcommand added for Unicode support.

Example

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.