//JOB008W JOB
//EBMOUT1 DD DSN=JOB008.PPF,DISP=(SHR,DELETE,DELETE)
//STEPW EXEC PGM=CBWRITE1
