DUTAS re-platformed to Raincode - Initial Source Code
This commit is contained in:
Neeraj Kumar
216
Copybook/DTSIZ316.cpy
Normal file
216
Copybook/DTSIZ316.cpy
Normal file
@ -0,0 +1,216 @@
|
||||
00001 *Modified: zl1 10/05/06
|
||||
00002 *Date: 02/04/00 DTSIZ316
|
||||
00003 *Modified: zl1 for section 51 from 46 LV138
|
||||
00004 *Date: 03/30/05 DTSIZ316
|
||||
00005 SKIP2 DTSIZ316
|
||||
00006 01 REPORT-PART1. DTSIZ316
|
||||
00007 05 RP1-LINE-1. DTSIZ316
|
||||
00008 10 FILLER PIC X(01) VALUE SPACE. DTSIZ316
|
||||
00009 10 FILLER PIC X(80) VALUE SPACES. DTSIZ316
|
||||
00010 05 RP1-LINE-2. DTSIZ316
|
||||
00011 10 FILLER PIC X(01) VALUE SPACE. DTSIZ316
|
||||
00012 10 FILLER PIC X(39) VALUE DTSIZ316
|
||||
00013 'Section 51-104 Subsection (M)(2) states'. DTSIZ316
|
||||
00014 10 FILLER PIC X(01) VALUE SPACE. DTSIZ316
|
||||
00015 10 FILLER PIC X(1) VALUE quote. DTSIZ316
|
||||
00016 10 FILLER PIC X(45) VALUE DTSIZ316
|
||||
00017 'If an employer liable to pay contribution, or'. DTSIZ316
|
||||
00018 05 RP1-LINE-3. DTSIZ316
|
||||
00019 10 FILLER PIC X(01) VALUE SPACE. DTSIZ316
|
||||
00020 10 FILLER PIC X(40) VALUE DTSIZ316
|
||||
00021 'payment in lieu of contributions under s'. DTSIZ316
|
||||
00022 10 FILLER PIC X(46) VALUE DTSIZ316
|
||||
00023 'ection 46-103(h), fails to file on or before '. DTSIZ316
|
||||
00024 05 RP1-LINE-4. DTSIZ316
|
||||
00025 10 FILLER PIC X(01) VALUE SPACE. DTSIZ316
|
||||
00026 10 FILLER PIC X(40) VALUE DTSIZ316
|
||||
00027 'the prescribed date, a wage report for p'. DTSIZ316
|
||||
00028 10 FILLER PIC X(46) VALUE DTSIZ316
|
||||
00029 'urposes of determining the amount of contri-'. DTSIZ316
|
||||
00030 05 RP1-LINE-5. DTSIZ316
|
||||
00031 10 FILLER PIC X(01) VALUE SPACE. DTSIZ316
|
||||
00032 10 FILLER PIC X(40) VALUE DTSIZ316
|
||||
00033 'butions due under this chapter or if suc'. DTSIZ316
|
||||
00034 10 FILLER PIC X(46) VALUE DTSIZ316
|
||||
00035 'h a wage report when filed is deemed by the'. DTSIZ316
|
||||
00036 05 RP1-LINE-6. DTSIZ316
|
||||
00037 10 FILLER PIC X(01) VALUE SPACE. DTSIZ316
|
||||
00038 10 FILLER PIC X(40) VALUE DTSIZ316
|
||||
00039 'Director to be incorrect and insufficien'. DTSIZ316
|
||||
00040 10 FILLER PIC X(46) VALUE DTSIZ316
|
||||
00041 't, then the employer shall file a correct and '. DTSIZ316
|
||||
00042 05 RP1-LINE-7. DTSIZ316
|
||||
00043 10 FILLER PIC X(01) VALUE SPACE. DTSIZ316
|
||||
00044 10 FILLER PIC X(40) VALUE DTSIZ316
|
||||
00045 'sufficient report within 10 days after t'. DTSIZ316
|
||||
00046 10 FILLER PIC X(48) VALUE DTSIZ316
|
||||
00047 'he Director requires same by written notice, '. DTSIZ316
|
||||
00048 05 RP1-LINE-8. DTSIZ316
|
||||
00049 10 FILLER PIC X(01) VALUE SPACE. DTSIZ316
|
||||
00050 10 FILLER PIC X(40) VALUE DTSIZ316
|
||||
00051 'and upon failure to do so, the Director '. DTSIZ316
|
||||
00052 10 FILLER PIC X(41) VALUE DTSIZ316
|
||||
00053 'shall assess the amount of contributions,'. DTSIZ316
|
||||
00054 05 RP1-LINE-9. DTSIZ316
|
||||
00055 10 FILLER PIC X(01) VALUE SPACE. DTSIZ316
|
||||
00056 10 FILLER PIC X(40) VALUE DTSIZ316
|
||||
00057 'interest, and penalties due from such em'. DTSIZ316
|
||||
00058 10 FILLER PIC X(47) VALUE DTSIZ316
|
||||
00059 'ployer on the basis of such information as the'. DTSIZ316
|
||||
00060 05 RP1-LINE-10. DTSIZ316
|
||||
00061 10 FILLER PIC X(01) VALUE SPACE. DTSIZ316
|
||||
00062 10 FILLER PIC X(40) VALUE DTSIZ316
|
||||
00063 'Director may be able to obtain, and shal'. DTSIZ316
|
||||
00064 10 FILLER PIC X(47) VALUE DTSIZ316
|
||||
00065 'l give written notice of such assessment to '. DTSIZ316
|
||||
00066 05 RP1-LINE-11. DTSIZ316
|
||||
00067 10 FILLER PIC X(01) VALUE SPACE. DTSIZ316
|
||||
00068 10 FILLET PIC X(40) VALUE DTSIZ316
|
||||
00069 'the enployer. Accordingly, you are noti'. DTSIZ316
|
||||
00070 10 FILLER PIC X(47) VALUE DTSIZ316
|
||||
00071 'fied that assessment have been made in the '. DTSIZ316
|
||||
00072 05 RP1-LINE-12. DTSIZ316
|
||||
00073 10 FILLER PIC X(01) VALUE SPACE. DTSIZ316
|
||||
00074 10 FILLER PIC X(44) VALUE DTSIZ316
|
||||
00075 'following amounts and for the period shown.'. DTSIZ316
|
||||
00076 10 FILLER PIC X(01) VALUE QUOTE. DTSIZ316
|
||||
00077 SKIP2 DTSIZ316
|
||||
00078 01 REPORT-DATA. DTSIZ316
|
||||
00079 05 RPA-LINE-1 PIC X(133) VALUE SPACES. DTSIZ316
|
||||
00080 05 RPA-LINE-2. DTSIZ316
|
||||
00081 10 FILLER PIC X(05) VALUE SPACES. DTSIZ316
|
||||
00082 10 FILLER PIC X(40) VALUE DTSIZ316
|
||||
00083 'TYPE OF TAX AMOUNT OF '. DTSIZ316
|
||||
00084 10 FILLER PIC X(40) VALUE DTSIZ316
|
||||
00085 ' INTEREST TO '. DTSIZ316
|
||||
00086 05 RPA-LINE-3. DTSIZ316
|
||||
00087 10 FILLER PIC X(05) VALUE SPACES. DTSIZ316
|
||||
00088 10 FILLER PIC X(38) VALUE DTSIZ316
|
||||
00089 ' TAX PERIOD TAX '. DTSIZ316
|
||||
00090 10 FILLER PIC X(40) VALUE DTSIZ316
|
||||
00091 'PENALTY DATE TOTAL '. DTSIZ316
|
||||
00092 05 RPA-LINE-4 PIC X(133) VALUE SPACES. DTSIZ316
|
||||
00093 05 RPA-LINE-5. DTSIZ316
|
||||
00094 10 FILLER PIC X(07) VALUE SPACES. DTSIZ316
|
||||
00095 10 WS-TYPE-OF-TAX PIC X(03). DTSIZ316
|
||||
00096 10 FILLER PIC X(05) VALUE SPACES. DTSIZ316
|
||||
00097 10 WS-YRQ PIC X(06). DTSIZ316
|
||||
00098 10 FILLER PIC X(01) VALUE SPACE. DTSIZ316
|
||||
00099 10 WS-RPA-TAX-DUE PIC Z,ZZZ,ZZ9.99. DTSIZ316
|
||||
00100 10 FILLER PIC X(04) VALUE SPACES. DTSIZ316
|
||||
00101 10 WS-PEN-CHARGED-AMT PIC Z,ZZZ,ZZ9.99. DTSIZ316
|
||||
00102 10 FILLER PIC X(04) VALUE SPACES. DTSIZ316
|
||||
00103 10 WS-INT-CHARGED-AMT PIC Z,ZZZ,ZZ9.99. DTSIZ316
|
||||
00104 10 FILLER PIC X(03) VALUE SPACES. DTSIZ316
|
||||
00105 10 WS-TOTAL-DUE PIC Z,ZZZ,ZZ9.99. DTSIZ316
|
||||
00106 05 RPA-LINE-6 PIC X(133) VALUE SPACES. DTSIZ316
|
||||
00107 05 RPA-LINE-7. DTSIZ316
|
||||
00108 10 FILLER PIC X(01) VALUE SPACE. DTSIZ316
|
||||
00109 10 FILLER PIC X(40) VALUE DTSIZ316
|
||||
00110 ' THE FOREGOING ESTIMATED AMOUNTS OF TAX'. DTSIZ316
|
||||
00111 10 FILLER PIC X(47) value DTSIZ316
|
||||
00112 ', PENALTY, AND INTEREST ARE DUE AND PAYABLE'. DTSIZ316
|
||||
00113 05 RPA-LINE-8. DTSIZ316
|
||||
00114 10 FILLER PIC X(01) VALUE SPACE. DTSIZ316
|
||||
00115 10 FILLER PIC X(40) VALUE DTSIZ316
|
||||
00116 'IMMEDIATELY AND COLLECTION THEREOF BY DI'. DTSIZ316
|
||||
00117 10 FILLER PIC X(48) VALUE DTSIZ316
|
||||
00118 'STRAINT AS PROVIDED BY LAW. Penalty is imposed'. DTSIZ316
|
||||
00119 05 RPA-LINE-9. DTSIZ316
|
||||
00120 10 FILLER PIC X(01) VALUE SPACE. DTSIZ316
|
||||
00121 10 FILLER PIC X(40) VALUE DTSIZ316
|
||||
00122 'for failure to file your tax return time'. DTSIZ316
|
||||
00123 10 FILLER PIC X(47) VALUE DTSIZ316
|
||||
00124 'ly. Interest is imposed from the date tax was'. DTSIZ316
|
||||
00125 05 RPA-LINE-10. DTSIZ316
|
||||
00126 10 FILLER PIC X(01) VALUE SPACE. DTSIZ316
|
||||
00127 10 FILLER PIC X(44) VALUE DTSIZ316
|
||||
00128 'required to be paid to the date of payment.'. DTSIZ316
|
||||
00129 05 RPA-LINE-11 PIC X(133) VALUE SPACES. DTSIZ316
|
||||
00130 05 RPA-LINE-12. DTSIZ316
|
||||
00131 10 FILLER PIC X(01) VALUE SPACE. DTSIZ316
|
||||
00132 10 FILLER PIC X(40) VALUE DTSIZ316
|
||||
00133 ' If you wish to appeal this deficiency '. DTSIZ316
|
||||
00134 10 FILLER PIC X(47) VALUE DTSIZ316
|
||||
00135 'assessment, you are instructed to follow the '. DTSIZ316
|
||||
00136 05 RPA-LINE-13. DTSIZ316
|
||||
00137 10 FILLER PIC X(01) VALUE SPACE. DTSIZ316
|
||||
00138 10 FILLER PIC X(40) VALUE DTSIZ316
|
||||
00139 'procedure set forth. However, in no eve'. DTSIZ316
|
||||
00140 10 FILLER PIC X(47) VALUE DTSIZ316
|
||||
00141 'nt will the collection of amounts involved be'. DTSIZ316
|
||||
00142 05 RPA-LINE-14. DTSIZ316
|
||||
00143 10 FILLER PIC X(01) VALUE SPACE. DTSIZ316
|
||||
00144 10 FILLER PIC X(41) VALUE DTSIZ316
|
||||
00145 'postponed or delayed pending final determ'. DTSIZ316
|
||||
00146 10 FILLER PIC X(47) VALUE DTSIZ316
|
||||
00147 'ination of any appeal. '. DTSIZ316
|
||||
00148 DTSIZ316
|
||||
00149 01 REPORT-PART2. DTSIZ316
|
||||
00150 05 RP2-LINE-1 PIC X(133) VALUE SPACES. DTSIZ316
|
||||
00151 05 RP2-LINE-2. DTSIZ316
|
||||
00152 10 FILLER PIC X(18) VALUE SPACES. DTSIZ316
|
||||
00153 10 FILLER PIC X(40) VALUE DTSIZ316
|
||||
00154 'PROCEDURE FOR PROTESTING DEFICIENCY ASSE'. DTSIZ316
|
||||
00155 10 FILLER PIC X(06) VALUE DTSIZ316
|
||||
00156 'SSMENT'. DTSIZ316
|
||||
00157 05 RP2-LINE-3 PIC X(133) VALUE SPACES. DTSIZ316
|
||||
00158 05 RP2-LINE-4. DTSIZ316
|
||||
00159 10 FILLER PIC X(01) VALUE SPACE. DTSIZ316
|
||||
00160 10 FILLER PIC X(40) VALUE DTSIZ316
|
||||
00161 ' Within fifteen (15) days from the date'. DTSIZ316
|
||||
00162 10 FILLER PIC X(48) VALUE DTSIZ316
|
||||
00163 ' of this notice you must file a protest in '. DTSIZ316
|
||||
00164 05 RP2-LINE-5. DTSIZ316
|
||||
00165 10 FILLER PIC X(01) VALUE SPACE. DTSIZ316
|
||||
00166 10 FILLER PIC X(40) VALUE DTSIZ316
|
||||
00167 'writing and show cause or reason why you'. DTSIZ316
|
||||
00168 10 FILLER PIC X(49) VALUE DTSIZ316
|
||||
00169 ' object to the assessment. A hearing will be '. DTSIZ316
|
||||
00170 05 RP2-LINE-6. DTSIZ316
|
||||
00171 10 FILLER PIC X(01) VALUE SPACE. DTSIZ316
|
||||
00172 10 FILLER PIC X(40) VALUE DTSIZ316
|
||||
00173 'granted upon request, and a final determ'. DTSIZ316
|
||||
00174 10 FILLER PIC X(47) VALUE DTSIZ316
|
||||
00175 'ination on your protest will be made as quickly'.DTSIZ316
|
||||
00176 05 RP2-LINE-7. DTSIZ316
|
||||
00177 10 FILLER PIC X(01) VALUE SPACE. DTSIZ316
|
||||
00178 10 FILLER PIC X(40) value DTSIZ316
|
||||
00179 'as practicable. '. DTSIZ316
|
||||
00180 05 RP2-LINE-8 PIC X(133) VALUE SPACES. DTSIZ316
|
||||
00181 05 RP2-LINE-9. DTSIZ316
|
||||
00182 10 FILLER PIC X(35) VALUE DTSIZ316
|
||||
00183 ' The protest must be mailed to: '. DTSIZ316
|
||||
00184 10 FILLER PIC X(40) VALUE DTSIZ316
|
||||
00185 'Mr. Frank Orlando, Associate Director'. DTSIZ316
|
||||
00186 05 RP2-LINE-10. DTSIZ316
|
||||
00187 10 FILLER PIC X(35) VALUE SPACES. DTSIZ316
|
||||
00188 10 FILLER PIC X(40) VALUE DTSIZ316
|
||||
00189 'D.C. Department of Employment Services'. DTSIZ316
|
||||
00190 05 RP2-LINE-11. DTSIZ316
|
||||
00191 10 FILLER PIC X(35) VALUE SPACES. DTSIZ316
|
||||
00192 10 FILLER PIC X(40) VALUE DTSIZ316
|
||||
00193 'Office of Unemployment Compensation'. DTSIZ316
|
||||
00194 05 RP2-LINE-12. DTSIZ316
|
||||
00195 10 FILLER PIC X(35) VALUE SPACES. DTSIZ316
|
||||
00196 10 FILLER PIC X(40) VALUE DTSIZ316
|
||||
00197 '609 H Street, N.E. Room 362'. DTSIZ316
|
||||
00198 05 RP2-LINE-13. DTSIZ316
|
||||
00199 10 FILLER PIC X(35) VALUE SPACES. DTSIZ316
|
||||
00200 10 FILLER PIC X(40) VALUE DTSIZ316
|
||||
00201 'Washington, D.C. 20002'. DTSIZ316
|
||||
00202 05 RP2-LINE-14. DTSIZ316
|
||||
00203 10 FILLER PIC X(02) VALUE SPACES. DTSIZ316
|
||||
00204 10 FILLER PIC X(12) VALUE DTSIZ316
|
||||
00205 'Sincerely,'. DTSIZ316
|
||||
00206 05 RP2-LINE-15. DTSIZ316
|
||||
00207 10 FILLER PIC X(02) VALUE SPACES. DTSIZ316
|
||||
00208 10 FILLER PIC X(40) VALUE DTSIZ316
|
||||
00209 'Bobby Tucker, Chief Tax Division'. DTSIZ316
|
||||
00210 05 RP2-LINE-16. DTSIZ316
|
||||
00211 10 FILLER PIC X(02) VALUE SPACES. DTSIZ316
|
||||
00212 10 FILLER PIC X(24) VALUE DTSIZ316
|
||||
00213 '(202) 698-7550 - OFFICE '. DTSIZ316
|
||||
00214 10 FILLER PIC X(21) VALUE DTSIZ316
|
||||
00215 '(202) 698-5706 - FAX'. DTSIZ316
|
||||
00216 SKIP2 DTSIZ316
|
||||
Reference in New Issue
Block a user