DGAPGNER Job

Edit online

The following sample JCL is provided in the Install Process Library, SDGASAMP. This example is the DGAPGNER job that is submitted by DGADTSUB in STEP 04 of the preceding Process example. Because it runs on the SNODE, it shows how you can print files back into the JES spool at the remote site.

If IBM® Connect:Direct® Spool Transfer is enabled at the remote site, use IBM Connect:Direct to transfer output back into the JES spool. Refer to Output to the JES Reader.

CAUTION:

When you use this JCL to test your own VPS, a print loop can occur if you use the symbolic &DEST on the same VPS system from which you submitted the print job.

//&JOBNM     JOB (00000),&PGMR,PRTY=12,TIME=(10),
//REGION=4096K,MSGLEVEL=(1,1),MSGCLASS=X 
//*
//STEP01   EXEC PGM=IEBGENER
//SYSPRINT  DD SYSOUT=*
//SYSIN     DD DUMMY
//SYSUT1    DD DSN=&INPUT,
//          DISP=(OLD,DELETE,KEEP)
//SYSUT2    DD SYSOUT=&CLASS,COPIES=&COPIES,DEST=&DEST
//*
//*ADDR1=&ADDR1
//*ADDR2=&ADDR2
//*ADDR3=&ADDR3
//*ADDR4=&ADDR4
//*BLDG=&BLDG
//*BURST=&BURST
//*CHARS=&CHARS
//*CKPTL=&CKPTL
//*CKPTP=&CKPTP
//*CKPTS=&CKPTS
//*CLASS=&CLASS
//*CMOD=&CMOD
//*CMTTC=&CMTTC
//*CNTL=&CNTL
//*COMPACT=&COMPACT
//*COPIES=&COPIES
//*COPYG=&COPYG
//*DATCK=&DATCK
//*DEFAULT=&DEFAULT
//*DEPT=&DEPT
//*DEST=&DEST
//*FCB=&FCB
//*FLASH=&FLASH
//*FLSCT=&FLSCT
//*FMDEF=&FMDEF
//*FORM=&FORM
//*GROUPID=&GROUPID
//*HOLD=&HOLD
//*INDEX=&INDEX
//*INPUT=&INPUT
//*JACCT=&JACCT
//*JESDS=&JESDS
//*JNOTIFY=&JNOTIFY
//*JOBID=&JOBID
//*JOBNM=&JOBNM
//*JPNAME=&JPNAME
//*JPROC=&JPROC
//*JROOM=&JROOM
//*JSECL=&JSECL
//*LINDEX=&LINDEX
//*LINECT=&LINECT
//*NAME=&NAME
//*NOTIFY1=&NOTIFY1
//*NOTIFY2=&NOTIFY2
//*NOTIFY3=&NOTIFY3
//*NOTIFY4=&NOTIFY4
//*OPTCD=&OPTCD
//*PGDEF=&PGDEF
//*PIMCT=&PIMCT
//*PIMSG=&PIMSG
//*PRMODE=&PRMODE
//*PRTY=&PRTY
//*ROOM=&ROOM
//*STEPDD=&STEPDD
//*STEPNM=&STEPNM
//*SUBNAME=&SUBNAME
//*THRES=&THRES
//*TITLE=&TITLE
//*TRC=&TRC
//*UCS=&UCS
//*UDATA01=&UDATA01
//*UDATA02=&UDATA02
//*UDATA03=&UDATA03
//*UDATA04=&UDATA04
//*UDATA05=&UDATA05
//*UDATA06=&UDATA06
//*UDATA07=&UDATA07
//*UDATA08=&UDATA08
//*UDATA09=&UDATA09
//*UDATA10=&UDATA10
//*UDATA11=&UDATA11
//*UDATA12=&UDATA12
//*UDATA13=&UDATA13
//*UDATA14=&UDATA14
//*UDATA15=&UDATA15
//*UDATA16=&UDATA16
//*ULIB1=&ULIB1
//*ULIB2=&ULIB2
//*ULIB3=&ULIB3
//*ULIB4=&ULIB4
//*ULIB5=&ULIB5
//*ULIB6=&ULIB6
//*ULIB7=&ULIB7
//*ULIB8=&ULIB8
//*VPSDSN=&VPSDSN
//*WRITER=&WRITER
//*WTR=&WTR