//DISKSMS JOB CLASS=A,MSGCLASS=Q,MSGLEVEL=(1,1),NOTIFY=&SYSUID //* //ICKDSF EXEC PGM=ICKDSF,REGION=4096K //SYSPRINT DD SYSOUT=* //SYSIN DD * INIT UNITADDRESS(0AA4) NOVERIFY VOLID(PRD002) PURGE - VTOC(0,1,149) INDEX(15,0,100) - STORAGEGROUP /*