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

51
Copybook/DTSIZ43A.cpy Normal file
View File

@ -0,0 +1,51 @@
00001 *************************************************************** 10/04/99
00002 * SECOND COPY BOOK FOR DTSBR434 FOR HOLDING MIXED CASE DTSIZ43A
00003 *************************************************************** LV022
00004 05 WS-WORD-GROUP0 PIC X(40) DTSIZ43A
00005 VALUE 'Business Tax Bureau '. DTSIZ43A
00006 05 WS-WORD-GROUP1 PIC X(40) DTSIZ43A
00007 VALUE ' I, '. CL*17
00008 05 WS-WORD-GROUP2 PIC X(40) DTSIZ43A
00009 VALUE ', representing the above named business '. CL*22
00010 05 WS-WORD-GROUP3 PIC X(40) DTSIZ43A
00011 VALUE 'do hereby acknowledge its indebtedness '. CL*10
00012 05 WS-WORD-GROUP3a PIC X(40) CL*22
00013 VALUE ', do hereby acknowledge my indebtedness '. CL*22
00014 05 WS-WORD-GROUP4 PIC X(40) DTSIZ43A
00015 VALUE 'to the Department of Employment '. CL*17
00016 05 WS-WORD-GROUP5 PIC X(40) DTSIZ43A
00017 VALUE 'Services, Office of Unemployment '. CL*17
00018 05 WS-WORD-GROUP6 PIC X(40) CL*17
00019 VALUE 'Compensation, in the amount of '. CL*19
00020 05 WS-WORD-GROUP7 PIC X(46) CL**9
00021 VALUE 'which represents unpaid contribution(s),'. CL*10
00022 05 WS-WORD-GROUP8 PIC X(40) CL**4
00023 VALUE 'interest and penalties for the quarter(s'. CL*15
00024 05 WS-WORD-GROUP9 PIC X(40) CL*10
00025 VALUE ') ending: '. CL*15
00026 05 WS-WORD-GROUP10 PIC X(40) CL*18
00027 VALUE ' The aforesaid business agrees to '. CL*17
00028 05 WS-WORD-GROUP10a PIC X(40) CL*19
00029 VALUE ' I agree to '. CL*19
00030 05 WS-WORD-GROUP11 PIC X(40) CL*18
00031 VALUE 'pay '. CL*17
00032 05 WS-WORD-GROUP12 PIC X(40) CL*18
00033 VALUE 'beginning '. CL*17
00034 05 WS-WORD-GROUP13 PIC X(40) CL*18
00035 VALUE 'and a like amount '. CL*11
00036 05 WS-WORD-GROUP14 PIC X(40) CL*18
00037 VALUE 'thereafter until the total indebtness '. CL*10
00038 05 WS-WORD-GROUP15 PIC X(40) CL*18
00039 VALUE 'is liquidated. '. CL*10
00040 05 WS-WORD-GROUP16 PIC X(40) CL*21
00041 VALUE ' In further consideration of this '. CL*21
00042 05 WS-WORD-GROUP17 PIC X(40) CL*21
00043 VALUE 'agreement, '. CL*21
00044 05 WS-WORD-GROUP18 PIC X(40) CL*21
00045 VALUE 'as an agent for the business, '. CL*21
00046 05 WS-WORD-GROUP19 PIC X(40) CL*21
00047 VALUE 'I agree to file and to pay all '. CL*21
00048 05 WS-WORD-GROUP20 PIC X(40) CL*21
00049 VALUE 'subsequent quarterly reports by the '. CL*21
00050 05 WS-WORD-GROUP21 PIC X(40) CL*21
00051 VALUE 'respective allotted due dates. '. CL*21