122 lines
9.6 KiB
COBOL
122 lines
9.6 KiB
COBOL
00001 SKIP2 02/09/99
|
|
00002 01 NOTICE-PAGE TYPE IS DETAIL. DTSIZ43X
|
|
00003 10 COLUMN 18 PIC X(04) LV020
|
|
00004 SOURCE WS-RATE-YRQ-LB-X (1). DTSIZ43X
|
|
00005 10 COLUMN 23 PIC X(01) CL*13
|
|
00006 SOURCE WS-RATE-YRQ-DASH (1). DTSIZ43X
|
|
00007 10 COLUMN 25 PIC X(04) CL*13
|
|
00008 SOURCE WS-RATE-YRQ-UB-X (1). CL**9
|
|
00009 10 COLUMN 42 PIC X(12) CL*13
|
|
00010 SOURCE WS-UI-RATE-AREA (1). DTSIZ43X
|
|
00011 05 LINE 28. CL*17
|
|
00012 10 COLUMN 18 PIC X(04) CL*11
|
|
00013 SOURCE WS-RATE-YRQ-LB-X (2). DTSIZ43X
|
|
00014 10 COLUMN 23 PIC X(01) CL*13
|
|
00015 SOURCE WS-RATE-YRQ-DASH (2). DTSIZ43X
|
|
00016 10 COLUMN 25 PIC X(04) CL*13
|
|
00017 SOURCE WS-RATE-YRQ-UB-X (2). DTSIZ43X
|
|
00018 10 COLUMN 42 PIC X(12) CL*13
|
|
00019 SOURCE WS-UI-RATE-AREA (2). DTSIZ43X
|
|
00020 05 LINE 29. CL*17
|
|
00021 10 COLUMN 18 PIC X(04) CL*11
|
|
00022 SOURCE WS-RATE-YRQ-LB-X (3). DTSIZ43X
|
|
00023 10 COLUMN 23 PIC X(01) CL*13
|
|
00024 SOURCE WS-RATE-YRQ-DASH (3). DTSIZ43X
|
|
00025 10 COLUMN 25 PIC X(04) CL*13
|
|
00026 SOURCE WS-RATE-YRQ-UB-X (3). DTSIZ43X
|
|
00027 10 COLUMN 42 PIC X(12) CL*13
|
|
00028 SOURCE WS-UI-RATE-AREA (3). DTSIZ43X
|
|
00029 05 LINE 30. CL*17
|
|
00030 10 COLUMN 18 PIC X(04) CL*11
|
|
00031 SOURCE WS-RATE-YRQ-LB-X (4). DTSIZ43X
|
|
00032 10 COLUMN 23 PIC X(01) CL*13
|
|
00033 SOURCE WS-RATE-YRQ-DASH (4). DTSIZ43X
|
|
00034 10 COLUMN 25 PIC X(04) CL*13
|
|
00035 SOURCE WS-RATE-YRQ-UB-X (4). DTSIZ43X
|
|
00036 10 COLUMN 42 PIC X(12) CL*13
|
|
00037 SOURCE WS-UI-RATE-AREA (4). DTSIZ43X
|
|
00038 05 LINE 31. CL*17
|
|
00039 10 COLUMN 18 PIC X(04) CL*11
|
|
00040 SOURCE WS-RATE-YRQ-LB-X (5). DTSIZ43X
|
|
00041 10 COLUMN 23 PIC X(01) CL*13
|
|
00042 SOURCE WS-RATE-YRQ-DASH (5). DTSIZ43X
|
|
00043 10 COLUMN 25 PIC X(04) CL*13
|
|
00044 SOURCE WS-RATE-YRQ-UB-X (5). DTSIZ43X
|
|
00045 10 COLUMN 42 PIC X(12) CL*13
|
|
00046 SOURCE WS-UI-RATE-AREA (5). DTSIZ43X
|
|
00047 05 LINE 32. CL*17
|
|
00048 10 COLUMN 18 PIC X(04) CL*11
|
|
00049 SOURCE WS-RATE-YRQ-LB-X (6). DTSIZ43X
|
|
00050 10 COLUMN 23 PIC X(01) CL*13
|
|
00051 SOURCE WS-RATE-YRQ-DASH (6). DTSIZ43X
|
|
00052 10 COLUMN 25 PIC X(04) CL*13
|
|
00053 SOURCE WS-RATE-YRQ-UB-X (6). DTSIZ43X
|
|
00054 10 COLUMN 42 PIC X(12) CL*13
|
|
00055 SOURCE WS-UI-RATE-AREA (6). DTSIZ43X
|
|
00056 05 LINE 34. CL*17
|
|
00057 10 COLUMN 8 PIC X(40) CL**6
|
|
00058 VALUE 'You have been determined subject to the '. DTSIZ43X
|
|
00059 10 COLUMN 48 PIC X(40) CL**6
|
|
00060 VALUE 'reporting provisions of the District '. CL**4
|
|
00061 05 LINE 35. CL*17
|
|
00062 10 COLUMN 8 PIC X(11) CL**7
|
|
00063 VALUE 'of Columbia'. CL**7
|
|
00064 10 COLUMN 19 PIC X(01) CL**7
|
|
00065 VALUE quote. CL**7
|
|
00066 10 COLUMN 20 PIC X(28) CL**7
|
|
00067 VALUE 's Unemployment Insurance Law'. CL**7
|
|
00068 10 COLUMN 48 PIC X(40) CL**6
|
|
00069 VALUE '. Please include your account number '. CL**2
|
|
00070 05 LINE 36. CL*17
|
|
00071 10 COLUMN 8 PIC X(40) CL**6
|
|
00072 VALUE 'on all correspondence with this agency. '. CL**2
|
|
00073 05 LINE 38. CL*17
|
|
00074 10 COLUMN 8 PIC X(40) CL**6
|
|
00075 VALUE 'Reporting forms will be sent to you at t'. DTSIZ43X
|
|
00076 10 COLUMN 48 PIC X(40) CL**6
|
|
00077 VALUE 'he end of each calendar quarter. '. CL**2
|
|
00078 05 LINE 39. CL*17
|
|
00079 10 COLUMN 8 PIC X(40) CL**6
|
|
00080 VALUE 'These reports must be postmarked by the '. CL**2
|
|
00081 10 COLUMN 48 PIC X(40) CL**6
|
|
00082 VALUE 'last day of April, July, October '. CL**2
|
|
00083 05 LINE 40. CL*17
|
|
00084 10 COLUMN 8 PIC X(40) CL**6
|
|
00085 VALUE 'and January of each year. '. CL**2
|
|
00086 05 LINE 42. CL*17
|
|
00087 10 COLUMN 8 PIC X(40) CL**6
|
|
00088 VALUE 'If we can be of any further assistance, '. DTSIZ43X
|
|
00089 10 COLUMN 48 PIC X(40) CL**6
|
|
00090 VALUE 'please write to the above address. '. CL**6
|
|
00091 05 LINE PLUS 3. DTSIZ43X
|
|
00092 10 COLUMN 36 PIC X(13) DTSIZ43X
|
|
00093 VALUE 'APPEAL RIGHTS'. DTSIZ43X
|
|
00094 05 LINE PLUS 0. DTSIZ43X
|
|
00095 10 COLUMN 36 PIC X(13) DTSIZ43X
|
|
00096 VALUE 'APPEAL RIGHTS'. DTSIZ43X
|
|
00097 05 LINE PLUS 2. DTSIZ43X
|
|
00098 10 COLUMN 8 PIC X(40) CL**6
|
|
00099 VALUE 'This decision will become final unless y'. DTSIZ43X
|
|
00100 10 COLUMN 48 PIC X(40) CL**6
|
|
00101 VALUE 'ou file a written notice of '. DTSIZ43X
|
|
00102 05 LINE PLUS 0. DTSIZ43X
|
|
00103 10 COLUMN 8 PIC X(40) CL**6
|
|
00104 VALUE 'This decision will become final unless y'. DTSIZ43X
|
|
00105 10 COLUMN 48 PIC X(40) CL**6
|
|
00106 VALUE 'ou file a written notice of '. DTSIZ43X
|
|
00107 05 LINE PLUS 1. DTSIZ43X
|
|
00108 10 COLUMN 8 PIC X(40) CL**6
|
|
00109 VALUE 'appeal within thirty (30) calendar days '. CL*14
|
|
00110 10 COLUMN 48 PIC X(40) CL**6
|
|
00111 VALUE 'of the date of this letter, '. CL*14
|
|
00112 05 LINE PLUS 0. DTSIZ43X
|
|
00113 10 COLUMN 8 PIC X(40) CL**6
|
|
00114 VALUE 'appeal within thirty (30) calendar days '. CL*14
|
|
00115 10 COLUMN 48 PIC X(40) DTSIZ43X
|
|
00116 VALUE 'of the date of this letter, '. CL*14
|
|
00117 05 LINE PLUS 1. DTSIZ43X
|
|
00118 10 COLUMN 8 PIC X(40) CL*10
|
|
00119 VALUE 'with the Unemployment Insurance Division'. CL*10
|
|
00120 10 COLUMN 48 PIC X(40) CL*14
|
|
00121 VALUE ' of the District of Columbia. '. CL*10
|