giteaadmin/DUTAS
4
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

DUTAS re-platformed to Raincode - Initial Source Code

Browse Source
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
Download Patch File Download Diff File Expand all files Collapse all files

26
Copybook/DTSIZ51B.cpy Normal file
View File

@ -0,0 +1,26 @@
00001 ***** 04/18/13
00002 * DTSIZ51B
00003 * dtsIZ51A MACBR417 MIXED CASE LITERALS. DONE AS A SEPARATE LV012
00004 * COPYLIB TO AVOID PUTTING MIXED CASE CODE INTO DTSIZ51B
00005 * MACBR417. DTSIZ51B
00006 * DTSIZ51B
00007 ***** DTSIZ51B
00008 DTSIZ51B
00009 05 MC-LIT-WAS-DUE-BY PIC X(24) CL**6
00010 VALUE 'This report was due by '. CL*11
00011 DTSIZ51B
00012 05 MC-LIT-IS-NOW-DEL PIC X(24) CL**6
00013 VALUE 'and is '. CL*12
00014 DTSIZ51B
00015 05 MC-LIT-QUARTER PIC X(20) CL**3
00016 VALUE 'quarter '. CL**3
00017 DTSIZ51B
00018 05 MC-LIT-NOTICE-TO-US PIC X(40) DTSIZ51B
00019 VALUE 'If we do not receive this report by '. CL**2
00020 DTSIZ51B
00021 05 MC-LIT-NOTICE-TO-US1 PIC X(48) CL*10
00022 VALUE 'with either your original report and payment or'. CL**9
00023 DTSIZ51B
00024 05 MC-LIT-NOTICE-TO-US2 PIC X(40) DTSIZ51B
00025 VALUE ' '. DTSIZ51B
00026 DTSIZ51B