Chapter 26. Global Mirror examples 347
Example 26-7 Define paths for Global Copy from A to B
//* ---------------------------- TSO ----------------------------- ***
//* ESTABLISH PATH(S) for Global Copy pairs ***
//* -------------------------------------------------------------- ***
//EPATHS EXEC PGM=IKJEFT01
//SYSPRINT DD SYSOUT=*
//SYSTSPRT DD SYSOUT=*
//SYSTSIN DD DDNAME=SYSIN
CQUERY DEVN (X'2C00') PATHS
CESTPATH DEVN (X'2C00') +
PRIM (X'2C00' 5005076303FFC228 X'0C') +
SEC (X'3C00' 5005076303FFC422 X'0C') +
LINK (X'00300030' X'01300130' +
X'02300230' X'03310330') CGROUP(NO)
CQUERY DEVN (X'2C00') PATHS
CQUERY DEVN (X'2D00') PATHS
CESTPATH DEVN (X'2D00') +
PRIM (X'2D00' 5005076303FFC228 X'0D') +
SEC (X'3D00' 5005076303FFC422 X'0D') +
LINK (X'00300030' X'01300130' +
X'02300230' X'03310330') CGROUP(NO)
CQUERY DEVN (X'2D00') PATHS
Verify, using query commands, that all paths have been defined and are operational. In our
case, even though the previous path definition commands had completed successfully, a
subsequent CQUERY reveals that there is a problem with one of the paths; see
Example 26-8.
Example 26-8 Verify successful path creation
*************** PPRC REMOTE COPY CQUERY - PATHS ********************
* PRIMARY UNIT: SERIAL#= 000000027131 SSID= 2C00 SS= 2107 LSS= 0C *
* FIRST SECOND THIRD FOURTH *
* SECONDARY SECONDARY SECONDARY SECONDARY *
*SERIAL NO: 000000073081 ............ ............ ............ *
* SSID LSS: 3C00 0C ....... ....... ....... *
* PATHS: 4 0 0 0 *
* PFCA SFCA S* SAID DEST S* SAID DEST S* SAID DEST S* *
* --------- -- --------- -- --------- -- --------- -- *
* 1: 0030 0030 13 ---- ---- 00 ---- ---- 00 ---- ---- 00 *
* 2: 0130 0130 13 ---- ---- 00 ---- ---- 00 ---- ---- 00 *
* 3: 0230 0230 13 ---- ---- 00 ---- ---- 00 ---- ---- 00 *
* 4: 0331 0330 14 ---- ---- 00 ---- ---- 00 ---- ---- 00 *
* SUBSYSTEM WWNN LIC LEVEL *
* ----------- ---------------- ----------- *
* PRIMARY.... 5005076303FFC228 5.0.03.0097 *
* SECONDARY.1 5005076303FFC422 *
* *
* S* = PATH STATUS: *
* 00=NO PATH 01=ESTABLISHED ESCON 02=INIT FAILED *
* 03=TIME OUT 04=NO RESOURCES AT PRI 05=NO RESOURCES AT SEC*
* 06=SERIAL# MISMATCH 07=SEC SSID MISMATCH 08=ESCON LINK OFFLINE *
* 09=ESTABLISH RETRY 0A=PATH ACTIVE TO HOST 0B=PATH TO SAME CLUSTR*
* 10=CONFIG ERROR FF=UNABLE TO DETERMINE *
* 13=ESTABL FIBRE PTH 14=FIBRE PATH DOWN 15=FIBRE RETRY EXCEED *
* 16=SEC ADPTR INCPBL 17=SEC ADPTR UNAVAIL 18=FIBRE LOGIN EXCEED *
********************************************************************