326 IBM System Storage DS6000 Series: Copy Services with IBM System z
Example 24-35 Remove session from LSS with ICKDSF
//* -------------------------------------------------------------- ***
//CLOSESS EXEC PGM=ICKDSF
//SYSPRINT DD SYSOUT=*
//DD01 DD UNIT=3390,VOL=SER=AA6000,DISP=SHR
//SYSIN DD *
PPRCOPY DDNAME(DD01) DEFSESS -
SESSNO(001) -
CLOSE
/*
Now, in the next steps, we will remove the FlashCopy relationships, and later we will delete
the Global Copy pairs that belonged to the Global Mirror session we just deleted.
24.5.13 Withdraw FlashCopy relationships
Example 24-36 shows an ICKDSF example for removing the FlashCopy relationships
between the B and C volumes.
Example 24-36 Withdraw FlashCopy relationships between B and C volumes with ICKDSF
//* -------------------------------------------------------------- ***
//* FLASHCOPY WITHDRAW (B -> C VOLUME RELATIONSHIP) inband ***
//* -------------------------------------------------------------- ***
//* 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',0003) /* C VOLUME */
FC DDNAME(DD02) WD /* WITHDRAW */ -
SRCVOL (X'00',X'01',0002,AAVCA) /* B VOLUME */ -
TGTVOL (X'01',X'01',0003) /* C VOLUME */
FC DDNAME(DD03) WD /* WITHDRAW */ -
SRCVOL (X'00',X'02',0002,AAVCA) /* B VOLUME */ -
TGTVOL (X'01',X'02',0003) /* C VOLUME */
FC DDNAME(DD04) WD /* WITHDRAW */ -
SRCVOL (X'00',X'03',0002,AAVCA) /* B VOLUME */ -
TGTVOL (X'01',X'03',0003) /* C VOLUME */
Note that we execute the FLASHCOPY WITHDRAW (or FC WD) command at the local site,
to the Global Copy primary volumes. The primary volumes are identified by the JCL DD
statement that is pointed to by the DDNAME parameter of the FC command; see
Example 24-36. This is an inband FlashCopy command. Through the SRCVOL and the
TGTVOL parameters, we identify the FlashCopy source and target volumes at the remote
site. This command will end the FlashCopy relationship between the B and C volumes.