JCL para Iniciar DASDs

Aqui les dejo un JCL para inicializar DASDs

NOTA: Para correr este JCL el DASD debe estar offline, esto se hace usando el comando V ****,offline (**** numero del DASD)

UNITADDRESS = direccion de la unidad a inicializar
VERIFY = Nombre del VOLSER a inicializar
VOLID = Nombre del VOLSER a inicializar


=COLS> ----+----1----+----2----+----3----+----4----+----5----+----6----+----7--
****** ***************************** Top of Data ******************************
000100 //NOMBREJO JOB 'DASD INIT',
000200 // MSGCLASS=Y,CLASS=P,NOTIFY=&SYSUID
000300 //STEP1 EXEC PGM=ICKDSF
000400 //SYSPRINT DD SYSOUT=*
000500 //SYSIN DD *
000600 INIT UNITADDRESS(0300) VERIFY(TPSYS1) VOLID(TPSYS1) VTOC(0,1,51) -
000700 INDEX(3,7,8)