Example 3: copying a dump created by using logical data set processing

//JOB3     JOB   accounting information,REGION=nnnnK
//STEP1    EXEC  PGM=ADRDSSU
//SYSPRINT DD    SYSOUT=A
//TAPE3    DD    UNIT=3480,VOL=SER=TAPE30,
//  LABEL=(1,SL),DISP=(OLD,KEEP),DSN=USER.BACKUP.REL3B
//OUTT3    DD    UNIT=3480,VOL=SER=TAPE31,
//  LABEL=(1,SL),DISP=(NEW,CATLG),DSN=USER.BACKUP.REL3B.A
//SYSIN    DD    *
 COPYDUMP -
   INDD(TAPE3)             /* DUMP TAPE TO BE COPIED    */ -
   OUTDD(OUTT3)            /* NEW DUMP TAPE             */
/*

Assume that a logical data set dump operation was used to create a dump tape, volume TAPE30. All dump data is copied.