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

23
Copybook/DTSIZ10D.cpy Normal file
View File

@ -0,0 +1,23 @@
00001 *************************************************************** 01/11/05
00002 * SECOND COPY BOOK FOR dtsbr115 FOR HOLDING MIXED CASE DTSIZ10D
00003 *************************************************************** LV015
00004 05 WS-WORD-GROUP0 PIC X(41) DTSIZ10D
00005 VALUE 'please contact your field representative,'. DTSIZ10D
00006 05 WS-WORD-GROUP1 PIC X(40) DTSIZ10D
00007 VALUE 'at '. DTSIZ10D
00008 05 WS-WORD-GROUP2 PIC X(40) DTSIZ10D
00009 VALUE 'to answer your questions or to '. DTSIZ10D
00010 05 WS-WORD-GROUP3 PIC X(40) DTSIZ10D
00011 VALUE 'schedule an appointment. '. DTSIZ10D
00012 05 WS-WORD-GROUP4 PIC X(40) DTSIZ10D
00013 VALUE ' '. DTSIZ10D
00014 05 WS-WORD-GROUP5 PIC X(40) DTSIZ10D
00015 VALUE ' '. DTSIZ10D
00016 05 WS-WORD-GROUP6 PIC X(46) DTSIZ10D
00017 VALUE ' '. DTSIZ10D
00018 05 WS-WORD-GROUP7 PIC X(40) DTSIZ10D
00019 VALUE ' '. DTSIZ10D
00020 05 WS-WORD-GROUP8 PIC X(46) DTSIZ10D
00021 VALUE ' '. DTSIZ10D
00022 05 WS-WORD-GROUP9 PIC X(40) DTSIZ10D
00023 VALUE ' '. DTSIZ10D