6 lines
281 B
Plaintext
6 lines
281 B
Plaintext
//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)
|