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

70
Copybook/DTSIZ453.cpy Normal file
View File

@ -0,0 +1,70 @@
00001 05 DET1-LINE-1. 11/15/05
00002 10 FILLER PIC X(01) VALUE SPACES. DTSIZ453
00003 10 FILLER PIC X(06) VALUE LV001
00004 'As of '. DTSIZ453
00005 10 WS-SHORT-TEXT-AS-OF-DATE PIC X(12). DTSIZ453
00006 10 FILLER PIC X(39) VALUE DTSIZ453
00007 ', we have not received your District of'. DTSIZ453
00008 10 FILLER PIC X(11) VALUE DTSIZ453
00009 ' Columbia '. DTSIZ453
00010 DTSIZ453
00011 05 DET1-LINE-2. DTSIZ453
00012 10 FILLER PIC X(01) VALUE SPACES. DTSIZ453
00013 10 FILLER PIC X(33) VALUE DTSIZ453
00014 'Unemployment Insurance Annual Con'. DTSIZ453
00015 10 FILLER PIC X(39) VALUE DTSIZ453
00016 'tribution and Wage Report covering'. DTSIZ453
00017 DTSIZ453
00018 DTSIZ453
00019 05 MC-LIT-YEAR PIC X(40) DTSIZ453
00020 VALUE 'the Calendar year '. DTSIZ453
00021 05 MC-LIT-THIS-REPORT-WAS PIC X(40) DTSIZ453
00022 VALUE 'The report was due by '. DTSIZ453
00023 05 MC-LIT-WE-RECEIVED-NO PIC X(40) DTSIZ453
00024 VALUE 'We received no response to the notice '. DTSIZ453
00025 05 MC-LIT-MAILED-ON PIC X(40) DTSIZ453
00026 VALUE 'mailed on '. DTSIZ453
00027 05 MC-LIT-TO-US PIC X(40) DTSIZ453
00028 VALUE 'to us by '. DTSIZ453
00029 05 MC-LIT-PAYMENT-DUE PIC X(40) DTSIZ453
00030 VALUE 'with any report and/or payment due. '. DTSIZ453
00031 DTSIZ453
00032 05 MC-LIT-BY-5 PIC X(40) DTSIZ453
00033 VALUE 'If we do not receive a response by 5:00 '. DTSIZ453
00034 05 MC-LIT-BY-PM PIC X(40) DTSIZ453
00035 VALUE 'PM '. DTSIZ453
00036 DTSIZ453
00037 05 MC-LIT-A-ESTIMATE-TAX PIC X(40) DTSIZ453
00038 VALUE 'we will estimate your tax obligation. '. DTSIZ453
00039 DTSIZ453
00040 05 MC-LIT-A-QUESTIONS PIC X(40) DTSIZ453
00041 VALUE 'If you have any questions, please call '. DTSIZ453
00042 DTSIZ453
00043 05 PARA-LINE-1. DTSIZ453
00044 10 FILLER PIC X(01) VALUE SPACES. DTSIZ453
00045 10 PARAGRAPH-LINE-1 PIC X(76). DTSIZ453
00046 DTSIZ453
00047 05 PARA-LINE-2. DTSIZ453
00048 10 FILLER PIC X(01) VALUE SPACES. DTSIZ453
00049 10 PARAGRAPH-LINE-2 PIC X(76). DTSIZ453
00050 DTSIZ453
00051 05 PARA-LINE-3. DTSIZ453
00052 10 FILLER PIC X(01) VALUE SPACES. DTSIZ453
00053 10 PARAGRAPH-LINE-3 PIC X(76). DTSIZ453
00054 DTSIZ453
00055 05 VAR-LINE-1. DTSIZ453
00056 10 FILLER PIC X(46) VALUE SPACES. DTSIZ453
00057 10 WS-LONG-YEAR10 PIC X(04). DTSIZ453
00058 10 FILLER PIC X(35) VALUE SPACES. DTSIZ453
00059 05 VAR-LINE-2. DTSIZ453
00060 10 FILLER PIC X(42) VALUE SPACES. DTSIZ453
00061 10 RPT-DUE-DATE11 PIC X(18) VALUE SPACES. DTSIZ453
00062 05 VAR-LINE-3. DTSIZ453
00063 10 FILLER PIC X(01) VALUE SPACES. DTSIZ453
00064 10 RPT-CALL-PHONE PIC X(14) VALUE SPACES. DTSIZ453
00065 10 FILLER PIC X(01) VALUE '.'. DTSIZ453
00066 05 VAR-LINE-4. DTSIZ453
00067 10 FILLER PIC X(26) VALUE SPACES. DTSIZ453
00068 10 WS-LONG-YEAR13 PIC X(04). DTSIZ453
00069 10 FILLER PIC X(35) VALUE SPACES. DTSIZ453
00070 DTSIZ453