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

100
Copybook/DTSIL102.cpy Normal file
View File

@ -0,0 +1,100 @@
00001 ***** 09/18/07
00002 * DTSIL102
00003 * DTSIL102 LATE PAYMENT PENALTY CHARGED/WAIVER LV015
00004 * MODULE LINKAGE. DTSIL102
00005 * DTSIL102
00006 * DTSIL102
00007 * 11/14/1998 CREATED FOR DC. EHH DTSIL102
00008 * DTSIL102
00009 * 07/28/1999 ADDED L102-TAX-DUE-DATE AND DTSIL102
00010 * L102-RPT-DUE-DATE. EHH DTSIL102
00011 * DTSIL102
00012 * 05/08/2000 ADDED LEVEL 88 TO TEST FOR VALID DTSIL102
00013 * OPTION. GD DTSIL102
00014 * DTSIL102
00015 * 06/13/2000 ADDED EMP CLASS AND TIMELY SELF- DTSIL102
00016 * INSURED PAYMENT AMOUNT. GD DTSIL102
00017 * DTSIL102
00018 * 12/15/2003 ADDED ELECTRONIC REPORT INDICATOR - DTSIL102
00019 * SYSTEM WILL ASSESS PENALTY FOR LATE DTSIL102
00020 * REPORTS SUBMITTED ELECTRONICALLY DTSIL102
00021 * WITHOUT WAITING FOR THE QUARTER TO DTSIL102
00022 * BE DECLARED DELINQUENT. GD DTSIL102
00023 * DTSIL102
00024 * 03/21/2005 REMOVED ELECTRONIC REPORT INDICATOR. DTSIL102
00025 * THE SYSTEM NOW ASSESSES PENALTY FOR DTSIL102
00026 * LATE REPORTS WHEN THEY ARE PROCESSED. DTSIL102
00027 * ADDED L102-DELINQUENT-RUN-88 TO DTSIL102
00028 * L102-OPTION. THE DELINQUENCY PROCESS DTSIL102
00029 * NOW ASSESSES PENALTY. DTSIL102
00030 * (DIR 107) GD DTSIL102
00031 * DTSIL102
00032 * 09/06/2007 ADDED CURRENT RUN DATE - TO DETERMINE DTSIL102
00033 * WHETHER TO CHECK A TIMELY SELF-INSURED DTSIL102
00034 * REPORT FOR PAYMENT IN FULL. GD DTSIL102
00035 * DTSIL102
00036 ***** DTSIL102
00037 DTSIL102
00038 10 L102-OPTION PIC X(01). DTSIL102
00039 88 L102-PEN-ASSESSMENT-RUN-88 VALUE '1'. DTSIL102
00040 88 L102-ORIGINAL-RPT-88 VALUE '2'. DTSIL102
00041 88 L102-NSF-PAY-REVERSAL-88 VALUE '3'. DTSIL102
00042 88 L102-ESTIMATED-RPT-88 VALUE '4'. DTSIL102
00043 88 L102-DELINQUENCY-RUN-88 VALUE '5'. DTSIL102
00044 88 L102-OPTION-VALID-88 VALUE '1' '2' DTSIL102
00045 '3' '4' '5'. DTSIL102
00046 DTSIL102
00047 DTSIL102
00048 10 L102-TRAN-AREA. DTSIL102
00049 15 L102-EMP-CLASS PIC X(01). DTSIL102
00050 88 L102-CLASS-RATED-88 VALUE 'R'. DTSIL102
00051 88 L102-CLASS-SELF-INS-88 VALUE 'S'. DTSIL102
00052 DTSIL102
00053 15 L102-TRAN-RECEIVED-DATE PIC S9(09) COMP-3. DTSIL102
00054 DTSIL102
00055 15 L102-WAIVE-LATE-PEN-IND PIC X(01). DTSIL102
00056 88 L102-WAIVE-LATE-PEN-YES-88 VALUE 'Y'. DTSIL102
00057 88 L102-WAIVE-LATE-PEN-NO-88 VALUE 'N'. DTSIL102
00058 DTSIL102
00059 10 L102-LAST-PEN-ASSESSED-YRQ PIC S9(05) COMP-3. DTSIL102
00060 DTSIL102
00061 DTSIL102
00062 10 L102-OR-RECEIVED-DATE PIC S9(09) COMP-3. DTSIL102
00063 DTSIL102
00064 10 L102-CURR-RUN-DATE PIC S9(09) COMP-3. DTSIL102
00065 DTSIL102
00066 10 L102-FROM-MQTR-AREA. DTSIL102
00067 15 L102-MQTR-YRQ PIC S9(05) COMP-3. DTSIL102
00068 DTSIL102
00069 15 L102-TAX-DUE-DATE PIC S9(09) COMP-3. DTSIL102
00070 DTSIL102
00071 15 L102-RPT-DUE-DATE PIC S9(09) COMP-3. DTSIL102
00072 DTSIL102
00073 15 L102-LATE-PEN-CHARGED-AMT PIC S9(09)V9(02) COMP-3. DTSIL102
00074 DTSIL102
00075 15 L102-TAX-CHARGED-AMT PIC S9(09)V9(02) COMP-3. DTSIL102
00076 DTSIL102
00077 15 L102-TAX-BALANCE-AMT PIC S9(09)V9(02) COMP-3. DTSIL102
00078 DTSIL102
00079 15 L102-TIMELY-SI-PAY-AMT PIC S9(09)V9(02) COMP-3. DTSIL102
00080 DTSIL102
00081 15 L102-PEN-AREA. DTSIL102
00082 20 L102-PEN-CHARGE-IND PIC X(01). DTSIL102
00083 88 L102-PEN-CHARGE-MANUAL-88 VALUE 'M'. DTSIL102
00084 88 L102-PEN-CHARGE-AUTO-88 VALUE 'A'. DTSIL102
00085 DTSIL102
00086 20 L102-WAIVE-PEN-SPAN. DTSIL102
00087 25 L102-WAIVE-PEN-START-DATE DTSIL102
00088 PIC S9(09) COMP-3. DTSIL102
00089 25 L102-WAIVE-PEN-END-DATE DTSIL102
00090 PIC S9(09) COMP-3. DTSIL102
00091 DTSIL102
00092 DTSIL102
00093 10 L102-RETURN-AREA. DTSIL102
00094 15 L102-LATE-PEN-CHARGE-CHNG DTSIL102
00095 PIC S9(09)V9(02) COMP-3. DTSIL102
00096 DTSIL102
00097 15 L102-LATE-PEN-WAIVE-CHNG DTSIL102
00098 PIC S9(09)V9(02) COMP-3. DTSIL102
00099 DTSIL102
00100 10 FILLER PIC X(52). DTSIL102