DATASET FROM MT TO DISK

//***** WE GET DATASETS FROM TAPE
//RESTOREA JOB CLASS=A,MSGCLASS=H
//MTCOPY EXEC PGM=KBKARCS,REGION=6M
//SYSPRINT DD SYSOUT=*
//TAPE DD DSN=BACKUP.VOL01,
// VOL=SER=123456,DISP=(OLD,KEEP),
// LABEL=(1,SL),UNIT=MTL
//DISK DD VOL=SER=DASD01,DISP=OLD,UNIT=SYSDA
//SYSIN DD *
RESTORE DATASET(%),FROM(DD(TAPE)),TO(DD(DISK)),LIST