Example 23: Using MODIFY to update rows in SYSCOPY

//ACPEX23  JOB (PACP),'EXAMPLE 23',CLASS=Q,MSGCLASS=X,NOTIFY=&SYSUID
//**********************************************************************
//*
//* Use MODIFY to update the device type for remote copies in
//* SYSIBM.SYSCOPY.
//*
//**********************************************************************
//BMCCOPY  EXEC PGM=ACPMAIN,REGION=0M,
//            PARM='DGA,ACPEX23,NEW/RESET,MSGLEVEL(1)'
//STEPLIB  DD DISP=SHR,DSN=product.libraries
//         DD DISP=SHR,DSN=DB2.DSNEXIT
//         DD DISP=SHR,DSN=DB2.DSNLOAD
//ACPERROR DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSIN    DD *

  MODIFY TABLESPACE ACPEXDB1.SAMP2TS
    UPDATE
      SET DEVTYPE = RCART
    WHERE ICBACKUP = RP
      AND DEVTYPE = 3490
/*