Healing EPS pointers with the Copy function

The following example shows a control card that heals all pointers in all PSINDEX relationships while allowing online updates to the database:

//PLUSIN    DD *                                            
 COPY DBD(XIU0DBD) SWAP(Y) DBRC(Y) IDCAMS(MODEL) -          
      DYNALLOC(Y,Y,C) SHARE(Y,UPDATE) HEAL(Y) SECINDEX(ONLY)

The following example shows reports from the Copy function in BMCMSG:

BMC250634I DATABASE(XIU0NDX1) DD(XIU0X1AA) SEGMENT(EAPTEST1) SEGMENT COUNT(117) HEALED(62)
BMC180304I COPY DATABASE 'XIU0NDX1' ENDED. INDD(XIU0X1AA) OUTDD(SYS00033).      
BMC250634I DATABASE(XIU0NDX4) DD(XIU0X4AA) SEGMENT(EAPTEST4) SEGMENT COUNT(765) HEALED(367)
BMC250634I DATABASE(XIU0NDX2) DD(XIU0X2AA) SEGMENT(EAPTEST2) SEGMENT COUNT(765) HEALED(367)
BMC180304I COPY DATABASE 'XIU0NDX4' ENDED. INDD(XIU0X4AA) OUTDD(SYS00037).      
BMC180304I COPY DATABASE 'XIU0NDX2' ENDED. INDD(XIU0X2AA) OUTDD(SYS00034).      
BMC250634I DATABASE(XIU0NDX5) DD(XIU0X5CA) SEGMENT(EAPTEST5) SEGMENT COUNT(1393) HEALED(742)
BMC180304I COPY DATABASE 'XIU0NDX5' ENDED. INDD(XIU0X5CA) OUTDD(SYS00040).      
BMC250634I DATABASE(XIU0NDX3) DD(XIU0X3BA) SEGMENT(EAPTEST3) SEGMENT COUNT(2660) HEALED(1215)
BMC180304I COPY DATABASE 'XIU0NDX3' ENDED. INDD(XIU0X3BA) OUTDD(SYS00036).      
BMC250634I DATABASE(XIU0NDX5) DD(XIU0X5BA) SEGMENT(EAPTEST5) SEGMENT COUNT(5533) HEALED(2210)
BMC180304I COPY DATABASE 'XIU0NDX5' ENDED. INDD(XIU0X5BA) OUTDD(SYS00039).      
BMC250634I DATABASE(XIU0NDX5) DD(XIU0X5AA) SEGMENT(EAPTEST5) SEGMENT COUNT(7416) HEALED(2761)
BMC180304I COPY DATABASE 'XIU0NDX5' ENDED. INDD(XIU0X5AA) OUTDD(SYS00038).      
BMC250634I DATABASE(XIU0NDX3) DD(XIU0X3AA) SEGMENT(EAPTEST3) SEGMENT COUNT(11682) HEALED(4498)
BMC180304I COPY DATABASE 'XIU0NDX3' ENDED. INDD(XIU0X3AA) OUTDD(SYS00035).      
BMC250634I DATABASE(XIU0NDX6) DD(XIU0X6AA) SEGMENT(EAPTEST6) SEGMENT COUNT(143742) HEALED(57533)
BMC180304I COPY DATABASE 'XIU0NDX6' ENDED. INDD(XIU0X6AA) OUTDD(SYS00041).      
BMC180375I COMMAND COPY (1) ENDED

The following example heals an individual PSINDEX by naming the PSINDEX in the DBD keyword:

//PLUSIN    DD *                                            
 COPY DBD(XIU0NDX1) SWAP(Y) DBRC(Y) IDCAMS(MODEL) -          
      DYNALLOC(Y,Y,C) SHARE(Y,UPDATE) HEAL(Y)


Related topic

Healing-EPS-pointers-in-a-HALDB


 

Tip: For faster searching, add an asterisk to the end of your partial query. Example: cert*