//P53A  JOB  (ACCOUNT),'DEFRAG VOLUME',CLASS=A,MSGCLASS=H,
//    REGION=300M,NOTIFY=&SYSUID,MSGLEVEL=(1,1)
//*                                                                             
//STEP1  EXEC  PGM=ADRDSSU,REGION=2048K                                         
//SYSPRINT DD  SYSOUT=*                                                        
//INVOL1   DD  VOL=SER=Z9DIS6,UNIT=3390,DISP=OLD                              
//SYSIN    DD    *     
  DEFRAG DDNAME(INVOL1) -                                              
     MAXMOVE(9999,2) PASSDELAY(10) -                              
     FASTREP(PREF) -                                              
     WAIT(2,3)  
/*
//