//APSIVPDA JOB 'acct. #','name',MSGLEVEL=(1,1)
//STEP1    EXEC PGM=IEBGENER,REGION=750K
//*
//************************************************************
//*  THIS IVP IS DESIGNED TO VERIFY THAT PSF HAS BEEN        *
//*  INSTALLED CORRECTLY AND THAT YOUR INSTALLATION CAN      *
//*  USE A PRINTER IN DIRECT ATTACH MODE.                    *
//*                                                          *
//*  NOTE:                                                   *
//*  IF YOU PLAN ON RUNNING THIS IVP FOR A 3800 PRINTER,     *
//*  COMMENT OUT THE FIRST OCCURRENCES OF THE FOLLOWING      *
//*  STATEMENTS:                                             *
//*  'MSGDS', 'FONT01', 'FORMDEF', 'PAGEDEF' AND 'OUTPUT1'.  *
//*  THEN UNCOMMENT THE SECOND OCCURRENCES OF THE SAME       *
//*  STATEMENTS.                                             *
//************************************************************
//*
//MSGDS     OUTPUT FORMDEF=A10110   /* <-- SEE NOTE ABOVE   */
//*MSGDS     OUTPUT FORMDEF=0101    /* <-- SEE NOTE ABOVE   */
//FONT01 DD DSN=SYS1.FONTLIBB,      /* <-- SEE NOTE ABOVE   */
//*FONT01 DD DSN=SYS1.FONTLIB,      /* <-- SEE NOTE ABOVE   */
//          DISP=SHR                /* SYSTEM FONTS         */
//PSEG01 DD DSN=SYS1.PSEGLIB,       /* SYSTEM PAGE SEGMENTS */
//          DISP=SHR
//OLAY01 DD DSN=SYS1.OVERLIB,       /* SYSTEM OVERLAYS      */
//          DISP=SHR
//PDEF01 DD DSN=SYS1.PDEFLIB,       /* SYSTEM PAGEDEFS      */
//          DISP=SHR
//FDEF01 DD DSN=SYS1.FDEFLIB,       /* SYSTEM FORMDEFS      */
//          DISP=SHR
//*
//DAPRT1 CNTL
//DAPRT1  PRINTDEV FONTDD=*.FONT01, /* FONT LIBRARY DD      */
//        OVLYDD=*.OLAY01,          /* OVERLAY LIBRARY DD   */
//        PSEGDD=*.PSEG01,          /* SEGMENT LIBRARY DD   */
//        PDEFDD=*.PDEF01,          /* PAGEDEF LIBRARY DD   */
//        FDEFDD=*.FDEF01,          /* FORMDEF LIBRARY DD   */
//        MESSAGE=*.MSGDS,          /* MSG DATA SET OUTPUT  */
//        FORMDEF=A10110,           /* <-- SEE NOTE ABOVE   */
//*       FORMDEF=0101,             /* <-- SEE NOTE ABOVE   */
//        PAGEDEF=A06462,           /* <-- SEE NOTE ABOVE   */
//*       PAGEDEF=06080,            /* <-- SEE NOTE ABOVE   */
//        BUFNO=5,                  /* NO. WRITE DATA BUFFER*/
//        TRACE=NO,                 /* TRACE FLAG           */
//        PIMSG=YES                 /* ACCUM. DATA SET MSGS */
//DAPRT1 ENDCNTL
//*
//SYSIN     DD DUMMY
//SYSPRINT  DD SYSOUT=*
//*
//OUTPUT1   OUTPUT FORMDEF=A10110   /* <-- SEE NOTE ABOVE   */
//*OUTPUT1   OUTPUT FORMDEF=0101    /* <-- SEE NOTE ABOVE   */
//*
//************************************************************
//*  NOTE:                                                   *
//*  THE 'UNIT=' PARAMETER BELOW MUST BE UPDATED TO POINT TO *
//*  THE ADDRESS OF THE PRINTER THAT YOU ARE GOING TO USE AS *
//*  A DIRECT ATTACH PRINTER.                                *
//************************************************************
//*
//SYSUT2 DD UNIT=nnn,               /* <-- SEE NOTE ABOVE   */
//          CNTL=*.DAPRT1,
//          DCB=(RECFM=VBA,BLKSIZE=8509),
//          OUTPUT=(*.OUTPUT1)
//SYSUT1 DD DSN=SYS1.PSEGLIB(S1IVP),DISP=SHR
/*