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