Filter
Top Products
Chapter 26. Global Mirror examples 359
MSGREQ(NO) CRIT(NO) +
OPTION(XD) CASCADE(NO)
CESTPAIR DEVN (X'3D01') +
PRIM (X'3D00' 73081 X'01' X'0D') +
SEC (X'2D00' 27131 X'01' X'0D') +
ACTION(FAILBACK) +
MSGREQ(NO) CRIT(NO) +
OPTION(XD) CASCADE(NO)
26.4.10 Return to the local site and resume Global Mirror
At some time you will plan to return the application to the local site. This requires first that you
quiesce the application at the remote site. Then, you execute an ACTION(FAILOVER)/
ACTION(FAILBACK) command sequence to the A volumes. This changes the Global Copy
direction, and leaves the A and B volumes in the same state as they originally were, before
the outage occurred. These commands are very quick because there is no data to replicate.
Example 26-23 shows the failover/failback sequence that is performed on the A volumes.
Example 26-23 Failover and Failback operations to the A volumes
//* ---------------------------- TSO --------- FAILOVER ---------- ***
//* ESTABLISH Global Copy PAIR(S) FAILOVER A -> B ***
//* -------------------------------------------------------------- ***
//EPAIRFO EXEC PGM=IKJEFT01
//SYSPRINT DD SYSOUT=*
//SYSTSPRT DD SYSOUT=*
//SYSTSIN DD DDNAME=SYSIN
CESTPAIR DEVN (X'2C00') +
PRIM (X'2C00' 27131 X'00' X'0C') +
SEC (X'3C00' 73081 X'00' X'0C') +
ACTION(FAILOVER) +
MSGREQ(NO) CRIT(NO) +
OPTION(XD) CASCADE(NO)
CESTPAIR DEVN (X'2D00') +
PRIM (X'2D00' 27131 X'00' X'0D') +
SEC (X'3D00' 73081 X'00' X'0D') +
ACTION(FAILOVER) +
MSGREQ(NO) CRIT(NO) +
OPTION(XD) CASCADE(NO)
CESTPAIR DEVN (X'2D01') +
PRIM (X'2D00' 27131 X'01' X'0D') +
SEC (X'3D00' 73081 X'01' X'0D') +
ACTION(FAILOVER) +
MSGREQ(NO) CRIT(NO) +
OPTION(XD) CASCADE(NO)
//* ---------------------------- TSO ----------------------------- ***
//* ESTABLISH Global Copy PAIR(S) FAILBACK A -> B ***
//* -------------------------------------------------------------- ***
//EPAIRFB EXEC PGM=IKJEFT01
//SYSPRINT DD SYSOUT=*
//SYSTSPRT DD SYSOUT=*
//SYSTSIN DD DDNAME=SYSIN
CESTPAIR DEVN (X'2C00') +