DUTAS re-platformed to Raincode - Initial Source Code

2025-07-21 07:44:09 -04:00
commit ca3572c5df
2773 changed files with 798221 additions and 0 deletions
--- a/Procs/JIMLBL04
+++ b/Procs/JIMLBL04
@ -0,0 +1,15 @@
+//*                                                                     00120000
+//DOESLBLP EXEC PGM=DOESLABL,        /* PRINT DOES LABELS               00131001
+//             COND=(0,LT),                                             00140000
+//             REGION=4096K                                             00150000
+//DOESVRI1 DD  DSN=&&LBL901,                                            00150101
+//             DISP=(OLD,DELETE,DELETE)                                 00150201
+//SYSOUT   DD  SYSOUT=*                                                 00151000
+//SYSABOUT DD  SYSOUT=*                                                 00152000
+//SYSABEND DD  SYSOUT=*                                                 00153000
+//CAIMRPTS DD  SYSOUT=*                                                 00154000
+//DOESLBL1 DD  SYSOUT=(C),                                              00155101
+//             FCB=P104,                                                00155201
+//             DEST=U@PRT155,                                           00155302
+//             HOLD=&LHOLD.                                             00155403
+//**                                                                    00157001