Dumping jobs to tape in server mode

The following example shows how to dump jobs to tape when dump job is in server mode. The first thing that needs to be done is to *CALL the dump job DSP; then a standard labeled tape is created on device 560. Because device 560 is defined as a JES3 managed device, it must be varied online as an execution device to the global processor (SY1).

*V,560,ON,SY1

IAT8180 0560     VARIED ONLINE  TO JES3 ON SY1

*X,DJ,OUT=560,LABEL=SL,SERVER=YES   
Instead of using a specific device, a generic or esoteric device name could have been specified on the *CALL command. In this case, the device name must be enclosed in parentheses:
*X,DJ,OUT=(3490),LABEL=SL,SERVER=YES   
or
*X,DJ,OUT=(LDE10435),SERVER=YES
As a result of the *CALL command, a dump job server address space is started. The dump job server address space initializes and allocates the tape device. The tape device is allocated with deferred mounting so you will not see any IAT5210 messages asking the operator to mount the tape if this is a JES3 managed device. A mount message (IEC501A) will be issued when a *START,DJ command is issued and the tape data set is opened.
IAT6306 JOB (JOB00033) IS DJ      , CALLED BY 01

IAT6100 ( DEMSEL ) JOB IEESYSAS (JOB00034), PRTY=15, ID=*UNKNOWN

SY1 IEESYSAS  IEF403I IEESYSAS - STARTED - TIME=16.11.04

IAT5110 JOB IEESYSAS (JOB00034) GET 255 T SCRTCH ,SL JES3.DJ.D1998091.T163039
The job name of the dump job server address space is DJ followed by the job number of the DJ DSP that started the server address space. To display information about the dump job server address space, issue one of the following commands:
D A,DJ*  or  D A,DJ000033
SY1         IEE115I 16.12.03 1998.049 ACTIVITY 351
 JOBS     M/S    TS USERS    SYSAS    INITS   ACTIVE/MAX VTAM     OAS
00000    00006    00001      00026    00003    00001/00300       00001
 DJ000033 DJ000033 IEFPROC  NSW  *   A=0024   PER=NO   SMC=000
                                     PGN=N/A  DMN=N/A  AFF=NONE
                                     CT=000.093S  ET=058.661S
                                     WUID=JOB00034 USERID=++++++++
                                     WKL=SYSTEM   SCL=SYSTEM   P=1
                                     RGP=N/A      SRVR=NO  QSC=NO
                                     ADDR SPACE ASTE=034BC900


*I J=34
IAT8674 JOB IEESYSAS (JOB00034) P=15 CL=A         R=(512K,512K),
 MAIN(EXECUTING-SY1) 
After the dump job server address space has successfully initialized, dump job issues the messages below to show that it is ready to begin dumping jobs to tape. Message IAT7272 contains the name of the tape data set that will contain the jobs that are dumped to tape. This data set name must be specified on the *CALL,DJ command when you restore the jobs from tape.
IAT7272 DJ0560 (JOB00033): OUTDSN=JES3.DJ.D1998091.T163039

IAT7213 DJ0560 (JOB00033): UP AND RUNNING; OUTPUT ON UNIT 0560, DEVICE MVS 0560

*IAT7228 ISSUE START OR CANCEL FOR DJ (JOB00033) (0560)
The data set name that is generated is different for standard label tapes versus unlabeled tapes. For standard label tapes, the data set name has the following format, where jesn is the JES3 subsystem name.
jesn.DJ.Dyyyyddd.Thhmmss
For unlabeled tapes, the data set name is not unique and has the following format, where jesn is the JES3 subsystem name.
jesn.DJOUT
To dump jobs to tape, issue the *START,DJ command and specify which jobs you want dumped. In the example that follows, jobs in priority 4 will be dumped to tape:
*S,DJ,P=4 
As a result of the *START command, dump job dumps the requested jobs to tape:
*IEC501A M 0560,TAPVOL,SL,,IEESYSAS,DJ000034 
tape now mounted
IAT7229 DJ0560 (JOB00033): SUCCESSFULLY DUMPED JOB JOB51    (JOB33436)
IAT7450 JOB JOB51    (JOB33436) PURGED
IAT7229 DJ0560 (JOB00033): SUCCESSFULLY DUMPED JOB JOB33    (JOB33435)
IAT7450 JOB JOB33    (JOB33435) PURGED
IAT7229 DJ0560 (JOB00033): SUCCESSFULLY DUMPED JOB JOB24    (JOB33434)
IAT7450 JOB JOB24    (JOB33434) PURGED
   .
   .
   .
IAT7229 DJ0560 (JOB00033): SUCCESSFULLY DUMPED JOB JOB24    (JOB33434)
IAT7450 JOB JOB25    (JOB33433) PURGED
IAT7230 DJ0560 (JOB00033): DUMP PROCESSING COMPLETE FOR PRIORITY LEVEL 04
IAT7253 DJ0560 (JOB00033): 0000038 JOBS SUCCESSFULLY DUMPED TO TAPE
IAT7220 DJ0560 (JOB00033): FUNCTION COMPLETE ON UNIT 0560
*IAT7228 ISSUE START OR CANCEL FOR DJ (JOB00033) (0560)  
You can now issue additional *START,DJ commands to dump other jobs to tape. When you are finished dumping jobs to tape, you can cancel the DJ DSP. As a result, the dump job server address space will close the tape data set and end.
*C,DJ

IEF234E R 0560,TAPVOL,PVT,IEESYSAS,DJ000034
IEF471E FOLLOWING VOLUMES NO LONGER NEEDED BY IEESYSAS
        TAPVOL.
IEF404I IEESYSAS - ENDED - TIME=16.37.00
IAT7200 DJ0560 (JOB00033): DUMP JOB DSP TERMINATING
IAT7450 JOB DJ       (JOB00033) PURGED 
The following shows the dump job log that was created:
*X,DJ,SERVER=YES,OUT=560
> OUT DSN=JES3.DJ.D1998091.T163039 - TAPVOL
*S,DJ,P=4
IAT7226 DJ0560 (JOB00033): JOB JOB999   (JOB32766) CANNOT BE DUMPED - IS ACTIVE
IAT7229 DJ0560 (JOB00033): SUCCESSFULLY DUMPED JOB JOB21    (JOB33414)
IAT7229 DJ0560 (JOB00033): SUCCESSFULLY DUMPED JOB JOB12    (JOB33413)
IAT7229 DJ0560 (JOB00033): SUCCESSFULLY DUMPED JOB JOB30    (JOB33418)
IAT7229 DJ0560 (JOB00033): SUCCESSFULLY DUMPED JOB JOB3     (JOB33420)
IAT7229 DJ0560 (JOB00033): SUCCESSFULLY DUMPED JOB JOB6     (JOB33438)
   .
   .
   .
IAT7229 DJ0560 (JOB00033): SUCCESSFULLY DUMPED JOB JOB24    (JOB33434)
IAT7230 DJ0560 (JOB00033): DUMP PROCESSING COMPLETE FOR PRIORITY LEVEL 04
IAT7230 DJ0560 (JOB00033): DUMP PROCESSING COMPLETE FOR JOBS REQUEST
IAT7253 DJ0560 (JOB00033): 0000038 JOBS SUCCESSFULLY DUMPED TO TAPE
IAT7220 DJ0560 (JOB00033): FUNCTION COMPLETE ON UNIT 0560


*S,DJ,P=1
IAT7230 DJ0560 (JOB00033): DUMP PROCESSING COMPLETE FOR PRIORITY LEVEL 01
IAT7253 DJ0560 (JOB00033):      NO JOBS SUCCESSFULLY DUMPED TO TAPE
IAT7220 DJ0560 (JOB00033): FUNCTION COMPLETE ON UNIT 0560
*C,DJ
IAT7200 DJ0560 (JOB00033): DUMP JOB DSP TERMINATING