//TXTWKR01 JOB (GCC),'File I/O Test',NOTIFY=@05054,CLASS=A,MSGCLASS=H, // MSGLEVEL=(1,1),REGION=4M,TIME=1440 //STEP1 EXEC GCCCG,INFILE='@05054.SRCLIB.C(TXTWKR01)' //GO.TESTDD DD DSN=@05054.DATA(TESTMEM),DISP=SHR, // DCB=(RECFM=FB,LRECL=80,BLKSIZE=0,DSORG=PS)