//APSIVP   JOB 'acct. #','name',MSGLEVEL=(1,1)
//STEP1    EXEC PGM=IEBGENER
//*
//************************************************************
//*  THIS IVP IS DESIGNED TO VERIFY THAT PSF HAS BEEN        *
//*  INSTALLED CORRECTLY FOR PRINTERS SUPPORTED BY PSF       *
//*                                                          *
//*  NOTE:                                                   *
//*  IF THIS IVP JOB IS BEING RUN FOR A 3800 PRINTER,        *
//*  COMMENT OUT THE FIRST 'OUTPUT1' STATEMENT, AND          *
//*  UNCOMMENT THE SECOND 'OUTPUT1' STATEMENT.               *
//************************************************************
//*
//SYSIN    DD DUMMY
//SYSPRINT DD SYSOUT=*
//OUTPUT1  OUTPUT FORMDEF=A10110    /* <-- SEE NOTE ABOVE   */
//*OUTPUT1  OUTPUT FORMDEF=0101     /* <-- SEE NOTE ABOVE   */
//SYSUT2   DD SYSOUT=A,
//            OUTPUT=*.OUTPUT1,
//            DCB=(RECFM=VBA,BLKSIZE=8509)
//SYSUT1   DD DSN=SYS1.PSEGLIB(S1IVP),DISP=SHR
/*