IBM DS6000 Manual Do Utilizador

Página de 578
354
 
IBM System Storage DS6000 Series: Copy Services with IBM System z
Example 26-16   Simulate primary site failure through CGROUP FREEZE
//* ---------------------------- TSO ------------ FAILO  (2) ----- ***  
//* SIMULATE PRIMARY FAILURE WITH CGROUP FREEZE/RUN                ***  
//* HARDER PRIMARY FAILURE THROUGH VARY OFFLINE,FORCE              ***  
//* -------------------------------------------------------------- ***  
//FREEZE  EXEC PGM=IKJEFT01                                             
//SYSPRINT  DD SYSOUT=*                                                 
//SYSTSPRT  DD SYSOUT=*                                                 
//SYSTSIN   DD DDNAME=SYSIN                                             
                                                                        
 CGROUP    DEVN (X'2C00')                      +                        
           PRIM (X'2C00' 27131 X'0C')          +                        
           SEC  (X'3C00' 73081 X'0C')          +                        
           FREEZE                                                       
                                                                        
 CGROUP    DEVN (X'2D00')                      +                        
           PRIM (X'2D00' 27131 X'0D')          +                        
           SEC  (X'3D00' 73081 X'0D')          +                        
           FREEZE                                                       
                                                                        
//* -------------------------------------------------------------- ***  
//RUN     EXEC PGM=IKJEFT01                                             
//SYSPRINT  DD SYSOUT=*                                                 
//SYSTSPRT  DD SYSOUT=*                                                 
//SYSTSIN   DD DDNAME=SYSIN                                             
                                                                        
 CGROUP    DEVN (X'2C00')                      +                        
           PRIM (X'2C00' 27131 X'0C')          +                        
           SEC  (X'3C00' 73081 X'0C')          +                        
           RUN                                                          
                                                                        
 CGROUP    DEVN (X'2D00')                      +                        
           PRIM (X'2D00' 27131 X'0D')          +                        
           SEC  (X'3D00' 73081 X'0D')          +                        
           RUN 
CGROUP FREEZE immediately removes the paths between the primary and secondary 
LSSs. An immediate CGROUP RUN command would end a potential extended long busy 
(ELB) timer. Note that ELB is not possible and not useful for Global Copy.
26.4.2  Stop a Global Mirror session
When the local storage disk subsystem is still operational, you may explicitly stop the Global 
Mirror session; see Example 26-17.
Example 26-17   Stop Global Mirror session when local site is still accessible
//* ------------------ TSO --------------------------------------- *** 
//* Terminate GM session number X'01'                              *** 
//* -------------------------------------------------------------- ***  
//TERM    EXEC PGM=IKJEFT01                                           
//SYSPRINT  DD SYSOUT=*                                             
//SYSTSPRT  DD SYSOUT=*                                             
//SYSTSIN   DD DDNAME=SYSIN                                       
                                                             
  RSESSION   SNBR(01) VOLSER(XX2C00)           +                
             ACTION(STOP)                      +               
             LSSTYPE(CKD) LSSNBR(0C)           +                
             ESSSERIAL(27131)                  +