Filter
Top Products
Chapter 26. Global Mirror examples 369
Example 26-37 Remove volumes from a Global Mirror session with ICKDSF
//* -------------------------------------------------------------- ***
//REMOVE EXEC PGM=ICKDSF
//SYSPRINT DD SYSOUT=*
//DD01 DD UNIT=3390,VOL=SER=AA6000,DISP=SHR
//SYSIN DD *
PPRCOPY DDNAME(DD01) POPSESS -
REMOVE -
SESSNO (001) -
VOLCOUNT (1) -
RANGE (YES) -
RVOLLIST ((X'00',X'03'))
26.7.3 Withdraw FlashCopy relationships
We are going to withdraw the FlashCopy relationships between the B and C volumes using
ICKDSF inband commands. This means directing the FlashCopy withdraw command, and
the actual I/O, to the corresponding Global Copy primary volumes.
As Example 26-38 shows, this is done with the JCL DD statements identifying the
corresponding Global Copy primary volumes. The FlashCopy withdraw is actually directed to
the FlashCopy source volumes, which are identified by the SRCVOL parameters. The
FlashCopy target volumes are identified by the TGTVOL parameters.
Example 26-38 ICKDSF withdraw via an inband FlashCopy command
//* -------------------------------------------------------------- ***
//* FLASHCOPY WITHDRAW (B -> C VOLUME RELATIONSHIP) ***
//* -------------------------------------------------------------- ***
//* SRCVOL (X'LSS' X'CCA' X'SSID' SERIAL#) ***
//* TGTVOL (X'LSS' X'CCA' DEVICE#) ***
//* -------------------------------------------------------------- ***
//* -------------------------------------------------------------- ***
//WITHDRW EXEC PGM=ICKDSF
//SYSPRINT DD SYSOUT=*
//DD01 DD UNIT=3390,VOL=SER=AA6000,DISP=SHR
//DD02 DD UNIT=3390,VOL=SER=AA6001,DISP=SHR
//DD03 DD UNIT=3390,VOL=SER=AA6002,DISP=SHR
//DD04 DD UNIT=3390,VOL=SER=AA6003,DISP=SHR
//SYSIN DD *
FC DDNAME(DD01) WD /* WITHDRAW */ -
SRCVOL (X'00',X'00',0002,AAVCA) /* B VOLUME */ -
TGTVOL (X'01',X'00',6400) /* C VOLUME */
FC DDNAME(DD02) WD /* WITHDRAW */ -
SRCVOL (X'00',X'01',0002,AAVCA) /* B VOLUME */ -
TGTVOL (X'01',X'01',6401) /* C VOLUME */
FC DDNAME(DD03) WD /* WITHDRAW */ -
SRCVOL (X'00',X'02',0002,AAVCA) /* B VOLUME */ -
TGTVOL (X'01',X'02',6402) /* C VOLUME */
FC DDNAME(DD04) WD /* WITHDRAW */ -
SRCVOL (X'00',X'03',0002,AAVCA) /* B VOLUME */ -
TGTVOL (X'01',X'03',6403) /* C VOLUME */