aboutsummaryrefslogtreecommitdiffstats
path: root/bwbasic4.jcl
diff options
context:
space:
mode:
Diffstat (limited to 'bwbasic4.jcl')
-rw-r--r--bwbasic4.jcl32
1 files changed, 32 insertions, 0 deletions
diff --git a/bwbasic4.jcl b/bwbasic4.jcl
new file mode 100644
index 0000000..3ba3868
--- /dev/null
+++ b/bwbasic4.jcl
@@ -0,0 +1,32 @@
+//BWBGEN JOB CLASS=C,REGION=0K
+//*
+//CREATE EXEC PGM=IEFBR14
+//DD1 DD DSN=&&ZIPS,DISP=(,PASS),
+// DCB=(RECFM=U,LRECL=0,BLKSIZE=6233),
+// SPACE=(6233,(220,220,44)),UNIT=SYSALLDA
+//*
+//UNZIP1 PROC MINPREF='MINIZIP',BWBPREF='BWBASIC'
+//MINI EXEC PGM=MINIUNZ,PARM='dd:input dd:output'
+//STEPLIB DD DSN=&MINPREF..LINKLIB,DISP=SHR
+//INPUT DD DSN=&BWBPREF..ALLZIPS,DISP=SHR
+//OUTPUT DD DSN=&&ZIPS,DISP=(OLD,PASS)
+//SYSIN DD DUMMY
+//SYSPRINT DD SYSOUT=*
+//SYSTERM DD SYSOUT=*
+// PEND
+//*
+//UNZIP2 PROC IN=,OUT=,MINPREF='MINIZIP',BWBPREF='BWBASIC'
+//MINI EXEC PGM=MINIUNZ,PARM='-a dd:input dd:output'
+//STEPLIB DD DSN=&MINPREF..LINKLIB,DISP=SHR
+//INPUT DD DSN=&&ZIPS(&IN),DISP=(OLD,PASS)
+//OUTPUT DD DSN=&BWBPREF..&OUT,DISP=SHR
+//SYSIN DD DUMMY
+//SYSPRINT DD SYSOUT=*
+//SYSTERM DD SYSOUT=*
+// PEND
+//*
+//S1 EXEC UNZIP1
+//S2 EXEC UNZIP2,IN='BWBSRC',OUT='SOURCE'
+//S3 EXEC UNZIP2,IN='BWBINC',OUT='INCLUDE'
+//S4 EXEC UNZIP2,IN='BWBJCL',OUT='JCL'
+//
Un proyecto texto-plano.xyz