Using IMS Image Copy 2 allows the user to use ADRDSSU to backup their databases with interface to

DBRC (notification of an UIC is not necessary). At the completion of the image copy, it will be recorded

in the Recons as an SMSNOCIC copy

1. Databases MUST BE registered with DBRC
2. Only a single database can be backed up in a single step

IMS version 8 will allow you backup multiple databases in a single step

3. You can create up to 4 copies, but only the first two copies are registered with DBRC

//IMAGE01 EXEC TIC2

//D73T03G1 DD DSN=V9747.D73T03G1,DISP=OLD

//D3G1 DD DSN=D9747.D73T03G1.SNAP,

// DISP=(,CATLG,DELETE),

// MGMTCLAS=TESTMGM,SPACE=(CYL,(5,1),RLSE),

// DCB=D0744.CICDSCB

//B3G1 DD DSN=D9747.D73T03G1.SNAP1,

// DISP=(,CATLG,DELETE),

// MGMTCLAS=TESTMGM,SPACE=(CYL,(5,1),RLSE),

// DCB=D0744.CICDSCB

//SYSIN DD *

2 D73T03 D73T03G1 D3G1 B3G1 XL

Use proc TIC2 for test and PIC2 for production

Control Card Column

1 unused

2 number of copies (1-4)

3 unused

4-11 DBDname

13-20 Input Ddname

22-29 1st copy Ddname

31-38 2nd copy Ddname

40-47 3rd copy Ddname

49-56 4th copy Ddname

58 database access (X=exclusive, S=Shared)

59 database release (L=logical - available for update after logical copy

P=physical - available for update after physical copy)

60 compression control (C=compress, blank=no compress)

73-80 user comment

ADR801I (001)-DTDSC(01), DATA SET FILTERING IS COMPLETE. 1 OF 1 DATA SETS WERE SELECTED: 0 FAILED SERIALIZATION AND

0 FAILED FOR

OTHER REASONS.

ADR734I (001)-DTDSC(01), 2002.018 14:58:50 CONCURRENT COPY INITIALIZATION SUCCESSFUL FOR 1 OF 1 SELECTED DATA SETS.

SERIALIZATION

FOR THIS DATA IS RELEASED IF DFSMSDSS HELD IT. THE INTERMEDIATE RETURN CODE IS 0000.

ADR454I (001)-DTDSC(01), THE FOLLOWING DATA SETS WERE SUCCESSFULLY PROCESSED

CLUSTER NAME V9747.D73T03G1

CATALOG NAME ICAT.D0976

COMPONENT NAME V9747.D73T03G1.DATA

ADR006I (001)-STEND(02), 2002.018 14:58:53 EXECUTION ENDS

ADR013I (001)-CLTSK(01), 2002.018 14:58:53 TASK COMPLETED WITH RETURN CODE 0000

ADR012I (SCH)-DSSU (01), 2002.018 14:58:53 DFSMSDSS PROCESSING COMPLETE. HIGHEST RETURN CODE IS 0000

DSP0021I RECON DATA SETS SUCCESSFULLY UPDATED

DFS339I FUNCTION IM HAS COMPLETED NORMALLY RC=00

Once message ADR734I (002)-DTDSC(01), 2002.018 14:28:50 CONCURRENT COPY INITIALIZATION SUCCESSFULL is issued, the logical copy has completed and you may begin

your update processes.

You would use the same recovery JCL for recovery with an image copy 2 backups as you would for

an image copy backup.

//STEP01 EXEC PGM=IDCAMS

//SYSPRINT DD SYSOUT=*

//SYSOUT DD SYSOUT=*

//SYSIN DD *

DEL V9747.D73T03G1

DEFINE CLUSTER (NAME(V9747.D73T03G1) -

MGMTCLAS(TESTMGM) NONINDEXED UNIQUE -

CYL(5 1) RECSZ(4089 4089) SPEED SHR(2 3)) -

DATA (NAME(V9747.D73T03G1.DATA) CISZ(4096))

//* RECOVER BUSINESS UNIT DATABASE DATA

//*--------------------------------------------------------------------------

//STEP02 EXEC TRECOV,DBD=D73T03

//STEP1.STEPLIB DD DSN=IMSESA.TESTCTL.RESLIB,DISP=SHR

//STEP1.DFSUDUMP DD DSN=D9747.D73T03G1.BKUP,DISP=OLD

//STEP1.DFSRESLB DD DSN=IMSESA.TESTCTL.RESLIB,DISP=SHR

//*--------------------------------------------------------------------------

//* IF FORWARD RECOVERY, SUPPLY ALL LOG TAPES OLDEST FIRST

//*DFSULOG DD DSN=D9747.IMS13.LOG,DISP=OLD

//*--------------------------------------------------------------------------

//D73003G1 DD DSN=V9747.D73T03G1,DISP=OLD

//SYSIN DD *

S D73T03 D73T03G1

DFS391I D A T A B A S E D A T A S E T R E C O V E R Y U T I L I T Y

S Y S I N C O N T R O L C A R D S

DFS391I S D73T03 D73T03G1

E N D O F S Y S I N C O N T R O L C A R D S

DFS391I **RECOVER DATA BASE D73T03 DDNAME D73T03G1

DFS323W FUNCTION RV WAS NOT SUPPLIED A CHANGE ACCUMULATION INPUT

PAGE 0001 5695-DF175 DFSMSDSS V1R5.0 DATA SET SERVICES 2002.024 08:50

RESTORE INDD(DFSUDUMP) -

DATASET(INCLUDE('V9747.D73T03G1')) -

REPLACE TOL(ENQF)

ADR101I (R/I)-RI01 (01), TASKID 001 HAS BEEN ASSIGNED TO COMMAND 'RESTORE '

ADR109I (R/I)-RI01 (01), 2002.024 08:50:12 INITIAL SCAN OF USER CONTROL STATEMENTS COMPLETED.

ADR050I (001)-PRIME(02), DFSMSDSS INVOKED VIA CROSS MEMORY APPLICATION INTERFACE

ADR016I (001)-PRIME(01), RACF LOGGING OPTION IN EFFECT FOR THIS TASK

ADR006I (001)-STEND(01), 2002.024 08:50:12 EXECUTION BEGINS

ADR780I (001)-TDDS (01), THE INPUT DUMP DATA SET BEING PROCESSED IS IN LOGICAL DATA SET FORMAT AND WAS CREATED BY

DFSMSDSS VERSION

1 RELEASE 5 MODIFICATION LEVEL 0

ADR442I (001)-FRLBO(01), DATA SET V9747.D73T03G1 PREALLOCATED, IN CATALOG ICAT.D0976, ON VOLUME(S): SMD141

ADR390I (001)-TDVSM(01), DATA SET V9747.D73T03G1 WAS SCRATCHED FROM SMD141 BECAUSE OF UNMATCHED SIZE. IT WILL BE

REALLOCATED

ADR711I (001)-NEWDS(01), DATA SET V9747.D73T03G1 HAS BEEN ALLOCATED USING STORCLAS BASE, NO DATACLAS, AND MGMTCLAS

TESTMGM

ADR940I (001)-TDLOG(01), DATA SET V9747.D73T03G1 BEING RESTORED WAS PROCESSED AS AN OPEN DATA SET WHEN IT WAS

DUMPED.

ADR489I (001)-TDLOG(02), CLUSTER V9747.D73T03G1 WAS RESTORED

CATALOG ICAT.D0976

COMPONENT V9747.D73T03G1.DATA

ADR454I (001)-TDLOG(01), THE FOLLOWING DATA SETS WERE SUCCESSFULLY PROCESSED

V9747.D73T03G1

ADR006I (001)-STEND(02), 2002.024 08:50:19 EXECUTION ENDS

ADR013I (001)-CLTSK(01), 2002.024 08:50:19 TASK COMPLETED WITH RETURN CODE 0000

ADR012I (SCH)-DSSU (01), 2002.024 08:50:19 DFSMSDSS PROCESSING COMPLETE. HIGHEST RETURN CODE IS 0000

DFS324W FUNCTION RV WAS NOT SUPPLIED AN INPUT LOG FILE

DFS2803I RECORD COUNT = 000000000 FOR DDNAME DFSUCUM

DFS2803I RECORD COUNT = 000000000 FOR DDNAME DFSULOG

DSP0021I RECON DATA SETS SUCCESSFULLY UPDATED

DFS339I FUNCTION RV HAS COMPLETED NORMALLY RC=00