diff options
Diffstat (limited to 'bwbasic7.jcl')
-rw-r--r-- | bwbasic7.jcl | 45 |
1 files changed, 45 insertions, 0 deletions
diff --git a/bwbasic7.jcl b/bwbasic7.jcl new file mode 100644 index 0000000..a2e164b --- /dev/null +++ b/bwbasic7.jcl @@ -0,0 +1,45 @@ +//BWBGEN JOB CLASS=C,REGION=0K +//* +//RUNBW PROC BWBPREF='BWBASIC' +//BWBASIC EXEC PGM=BWBASIC,PARM='DD:INPUT' +//STEPLIB DD DSN=&BWBPREF..LINKLIB,DISP=SHR +//SYSIN DD DUMMY +//SYSPRINT DD SYSOUT=* +//SYSTERM DD SYSOUT=* +// PEND +//* +//RUNRE PROC BWBPREF='BWBASIC' +//BWBASIC EXEC PGM=RENUM,PARM='DD:INPUT' +//STEPLIB DD DSN=&BWBPREF..LINKLIB,DISP=SHR +//SYSIN DD DUMMY +//SYSPRINT DD SYSOUT=* +//SYSTERM DD SYSOUT=* +// PEND +//* +//CLEAN PROC BWBPREF='BWBASIC' +//DELETE EXEC PGM=IEFBR14 +//DD0 DD DSN=&BWBPREF..ALLZIPS,DISP=(MOD,DELETE), +// UNIT=SYSALLDA,SPACE=(TRK,(0)) +//DD3 DD DSN=&BWBPREF..NCALIB,DISP=(MOD,DELETE), +// UNIT=SYSALLDA,SPACE=(TRK,(0)) +// PEND +//* +//S1 EXEC RUNBW +//INPUT DD * +x = 1 +print "hello, world",x +x = 2 +print "hello, world",x +end +/* +//* +//S2 EXEC RUNRE +//INPUT DD * +5 hi +7 folks +9 there +/* +//EDITFL DD SYSOUT=* +//* +//S3 EXEC CLEAN +// |