DUTAS re-platformed to Raincode - Initial Source Code

This commit is contained in:
Neeraj Kumar
2025-07-21 07:44:09 -04:00
commit ca3572c5df
2773 changed files with 798221 additions and 0 deletions

View File

@ -0,0 +1,23 @@
DEL-
DOESTAX.DEVL.TEMP.TAXCOPY-
NOERASE
IF LASTCC=8 THEN-
SET MAXCC=0
DEFINE-
CLUSTER(-
NAME (DOESTAX.DEVL.TEMP.TAXCOPY)-
KEYS (4,0)-
RECSZ (314,314)-
CYL (30,10)-
FREESPACE (0 0)-
SHR (2,3)-
SPEED-
VOL (DES39Q)-
UNQ)-
DATA -
(NAME(DOESTAX.DEVL.TEMP.TAXCOPY.DATA))-
INDEX -
(NAME(DOESTAX.DEVL.TEMP.TAXCOPY.INDEX)-
CISZ(1024))