//DSFINIT  JOB 'SYSTEMS',CLASS=B,MSGCLASS=X,MSGLEVEL=(1,1)      
//DSF1     EXEC PGM=ICKDSF,REGION=1024K                         
//SYSPRINT DD  SYSOUT=*                                         
//SYSIN    DD  *                                                
      INIT UNIT(1900) VOLID(SP1900) PRG -                       
      DEVTYPE(3390) VTOC(0,1,195) INDEX(014,0,45) NOVERIFY