Database Transportability › Create Command Files › Job 3 › Command Data Sets

Command Data Sets

Module SASSDT30 examines the BTI output (through ddname DBMLISTS) and produces card-image data sets containing the commands needed to accomplish the move. One control report is produced for each of the command data sets. The following are the data sets being created:

Details on the contents of these data sets and the examples of these control reports were given previously.

It is very likely that some of these data sets require some manual editing and changing before they can be used. For example, changing JCLID numbers must be taken care of by editing these data sets. The control reports closely mirror the contents of the data sets, including the generated sequence numbers. This makes it easier to locate specific commands requiring changes.

The card-image data sets must be preserved as necessary for subsequent use at whatever site is to process the commands.

DT30WORK is a work file used by SASSDT30. It must not have a DISP of MOD (the file is opened and closed multiple times).

If no [assign the PANVLT for your book] or CA Librarian JCL is being used, those data sets and their control reports may be DUMMYed or defined as NULLFILEs.

The following is a SASSDT30 execution JCL sample:

//jobname  JOB ......,REGION=4096K
//EXTRACT  EXEC PGM=SASSBSTR,REGION=1024K,PARM=batch-terminal-id
//JOBLIB   DD  DSN=cai.CAL2LOAD,DISP=SHR
//UCC7CMDS DD  DSN=ca7.communications.data.set,DISP=SHR
//SYSPRINT DD  DSN=&&DT30IN,DISP=(,PASS),UNIT=SYSDA,
//             SPACE=(CYL,(8,1),RLSE),DCB=(RECFM=FBA,LRECL=133,BLKSIZE=3990)
//SYSIN    DD  DSN=input.to.job3,DISP=(OLD,DELETE)
//*
//CREATE3  EXEC PGM=SASSDT30,COND=(O,NE,EXTRACT),
//             PARM='LOGON=operid[,password].............'
//SYSUDUMP DD  SYSOUT=x
//DBMLISTS DD  DSN=&&DT30IN,DISP=(OLD,DELETE)
//DBMADDS1 DD  DSN=batch.DBM.add.commands.part.1,DISP=(,CATLG),UNIT=SYSDA,
//             SPACE=(CYL,(5,1),RLSE),DCB=(RECFM=FB,LRECL=80,BLKSIZE=4000)
//DBMADDS2 DD  DSN=batch.DBM.add.commands.part.2,DISP=(,CATLG),UNIT=SYSDA,
//             SPACE=(CYL,(5,1),RLSE),DCB=(RECFM=FB,LRECL=80,BLKSIZE=4000)
//DBMDELTS DD  DSN=batch.DBM.delete.commands,DISP=(,CATLG),UNIT=SYSDA,
//             SPACE=(CYL,(1,1),RLSE),DCB=(RECFM=FB,LRECL=80,BLKSIZE=4000)
//DBMSTOPS DD  DSN=batch.DBM.disable.commands,DISP=(,CATLG),UNIT=SYSDA,
//             SPACE=(CYL,(2,1),RLSE),DCB=(RECFM=FB,LRECL=80,BLKSIZE=4000)
//DELPROCS DD  DSN=scratch.commands.for.procs,DISP=(,CATLG),UNIT=SYSDA,
//             SPACE=(CYL,(1,1),RLSE),DCB=(RECFM=FB,LRECL=80,BLKSIZE=4000)
//LIBRADDS DD  DSN=librarian.add.commands,DISP=(,CATLG),UNIT=SYSDA,
//             SPACE=(CYL,(1,1),RLSE),DCB=(RECFM=FB,LRECL=80,BLKSIZE=4000)
//LIBRDELS DD  DSN=librarian.delete.commands,DISP=(,CATLG),UNIT=SYSDA,
//             SPACE=(CYL,(1,1),RLSE),DCB=(RECFM=FB,LRECL=80,BLKSIZE=4000)
//PANVADDS DD  DSN=panvalet.add.commands,DISP=(,CATLG),UNIT=SYSDA,
//             SPACE=(CYL,(1,1),RLSE),DCB=(RECFM=FB,LRECL=80,BLKSIZE=4000)
//PANVDELS DD  DSN=panvalet.disable.commands,DISP=(,CATLG),UNIT=SYSDA,
//             SPACE=(CYL,(1,1),RLSE),DCB=(RECFM=FB,LRECL=80,BLKSIZE=4000)
//VRMXREFS DD  DSN=vrm.cross.reference.list,DISP=(,CATLG),UNIT=SYSDA,
//             SPACE=(CYL,(1,1),RLSE),DCB=(RECFM=FB,LRECL=80,BLKSIZE=4000)
//AGENTDIV DD  DSN=agentdiv.cross.reference.list,DISP=(,CATLG),UNIT=SYSDA,
//             SPACE=(CYL,(1,1),RLSE),DCB=(RECFM=FB,LRECL=172,BLKSIZE=0)
//DT30WORK DD  DISP=(,DELETE),UNIT=SYSDA,
//             SPACE=(CYL,1,1)),DCB=(RECFM=FBA,LRECL=133,BLKSIZE=3990)
//DT30CR01 DD  SYSOUT=x,DCB=BLKSIZE=133
//DT30CR02 DD  SYSOUT=x,DCB=BLKSIZE=133
//DT30CR03 DD  SYSOUT=x,DCB=BLKSIZE=133
//DT30CR04 DD  SYSOUT=x,DCB=BLKSIZE=133
//DT30CR05 DD  SYSOUT=x,DCB=BLKSIZE=133
//DT30CR06 DD  SYSOUT=x,DCB=BLKSIZE=133
//DT30CR07 DD  SYSOUT=x,DCB=BLKSIZE=133
//DT30CR08 DD  SYSOUT=x,DCB=BLKSIZE=133
//DT30CR09 DD  SYSOUT=x,DCB=BLKSIZE=133
//DT30CR10 DD  SYSOUT=x,DCB=BLKSIZE=133
//DT30CR11 DD  SYSOUT=x,DCB=BLKSIZE=133

More information:

Assumptions

Moving Jobs

Workstation Networks

Run at New Site