44 lines
3.4 KiB
COBOL
44 lines
3.4 KiB
COBOL
00001 ***** 04/01/13
|
|
00002 * DTSIFQTR
|
|
00003 * DTSIFQTR REFERENCE FILE 'QUARTER' RECORD DEFINITION. LV012
|
|
00004 * DTSIFQTR
|
|
00005 * 02-13-2013 REPLACED INTENT TO ESTIMATE DATE WITH DTSIFQTR
|
|
00006 * REIMBURSABLE LATE PENALTY ASSESSMENT DATE. DTSIFQTR
|
|
00007 * TICKET 1688 GD DTSIFQTR
|
|
00008 * DTSIFQTR
|
|
00009 ***** DTSIFQTR
|
|
00010 DTSIFQTR
|
|
00011 10 FQTR-KEY-AREA. DTSIFQTR
|
|
00012 15 FQTR-REC-TYPE PIC S9(04) COMP. DTSIFQTR
|
|
00013 88 FQTR-QTR-88 VALUE +11. DTSIFQTR
|
|
00014 15 FQTR-YRQ PIC S9(05) COMP-3. DTSIFQTR
|
|
00015 15 FQTR-KEY-FILLER PIC X(11). DTSIFQTR
|
|
00016 DTSIFQTR
|
|
00017 10 FQTR-DATA-AREA. DTSIFQTR
|
|
00018 15 FQTR-UC30-MASS-MAIL-DATE DTSIFQTR
|
|
00019 PIC S9(09) COMP-3. DTSIFQTR
|
|
00020 15 FQTR-SELF-INS-TAX-DUE-DATE DTSIFQTR
|
|
00021 PIC S9(09) COMP-3. DTSIFQTR
|
|
00022 15 FQTR-LATE-PEN-ASSESSED-DATE DTSIFQTR
|
|
00023 PIC S9(09) COMP-3. DTSIFQTR
|
|
00024 15 FQTR-UC30-FIRST-DEL-DATE DTSIFQTR
|
|
00025 PIC S9(09) COMP-3. DTSIFQTR
|
|
00026 15 FQTR-UC30-FINAL-DEL-DATE DTSIFQTR
|
|
00027 PIC S9(09) COMP-3. DTSIFQTR
|
|
00028 15 FQTR-UC30-FINAL-ACTION-DATE DTSIFQTR
|
|
00029 PIC S9(09) COMP-3. DTSIFQTR
|
|
00030 DTSIFQTR
|
|
00031 15 FQTR-SELF-INS-CHG-RUN-DATE DTSIFQTR
|
|
00032 PIC S9(09) COMP-3. DTSIFQTR
|
|
00033 15 FQTR-SELF-INS-LATE-PEN-DATE DTSIFQTR
|
|
00034 PIC S9(09) COMP-3. DTSIFQTR
|
|
00035 15 FQTR-ESTIMATED-DATE DTSIFQTR
|
|
00036 PIC S9(09) COMP-3. DTSIFQTR
|
|
00037 15 FQTR-SELF-INS-2ND-LETTER-DATE DTSIFQTR
|
|
00038 PIC S9(09) COMP-3. DTSIFQTR
|
|
00039 DTSIFQTR
|
|
00040 15 FILLER PIC X(52). DTSIFQTR
|
|
00041 DTSIFQTR
|
|
00042 15 FQTR-ESTB-DATE PIC S9(09) COMP-3. DTSIFQTR
|
|
00043 15 FQTR-CHNG-DATE PIC S9(09) COMP-3. DTSIFQTR
|