//DISCOSMS JOB CLASS=A,MSGCLASS=Q,MSGLEVEL=(1,1),NOTIFY=&SYSUID
//*                                                            
//ICKDSF EXEC PGM=ICKDSF,REGION=4096K                          
//SYSPRINT DD SYSOUT=*                                         
//SYSIN DD *                                                   
 INIT UNITADDRESS(0AA3) NOVERIFY VOLID(OVERF0) PURGE -         
 VTOC(0,1,150) INDEX(50,0,50) STORAGEGROUP                     
/*