tk5-c90-projects/jcl/TXTWKR01.jcl

//TXTWKR01   JOB (GCC),'File I/O Example',
//             NOTIFY=@05054,CLASS=A,MSGCLASS=A,
//             MSGLEVEL=(1,1),REGION=4M,TIME=1440
//* Compile and Go Step
//STEP1 EXEC GCCCG,INFILE='@05054.SRCLIB.C(TXTWKR01)'
//GO.TESTDD DD DSN=@05054.DATA(TESTMEM),DISP=SHR
//
simple program to read/write a text file 2026-02-08 14:19:53 +00:00			`//TXTWKR01 JOB (GCC),'File I/O Example',`
fix file access issue 2026-02-08 14:50:44 +00:00			`// NOTIFY=@05054,CLASS=A,MSGCLASS=A,`
simple program to read/write a text file 2026-02-08 14:19:53 +00:00			`// MSGLEVEL=(1,1),REGION=4M,TIME=1440`
			`//* Compile and Go Step`
			`//STEP1 EXEC GCCCG,INFILE='@05054.SRCLIB.C(TXTWKR01)'`
fix file access issue 2026-02-08 14:50:44 +00:00			`//GO.TESTDD DD DSN=@05054.DATA(TESTMEM),DISP=SHR`
get the errno value 2026-02-08 14:59:34 +00:00			`//`