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