ADRDSSU - Copy all versions of one GDG to another GDG

//STEP1    EXEC PGM=ADRDSSU                                    
//SYSPRINT  DD   SYSOUT=*                                      
//SYSIN     DD   *                                             
 COPY  -                                                       
   DATASET(                                         -             
   INCLUDE(                                          -             
   PCCAC.L04.DUDMAILO.**                   -             
   )                                                      -             
   )                                                      -             
   RENUNC(PCCAC.L04.DUDMAILO.**,    -             
   TCCAC.L04.DUDMAILO.**)                 -             
   CATALOG TGTGDS(ACTIVE)                                      
/*                                     


Before copying to another gdg, new gdg base has to be created