67 lines
5.2 KiB
COBOL
67 lines
5.2 KiB
COBOL
00001 ***** 05/17/00
|
|
00002 * DTSIZ42A
|
|
00003 * DTSIZ42A DTSBR421 MIXED CASE LITERALS. DONE AS A SEPARATE LV009
|
|
00004 * COPYLIB TO AVOID PUTTING MIXED CASE CODE INTO DTSIZ42A
|
|
00005 * DTSBR421. DTSIZ42A
|
|
00006 * DTSIZ42A
|
|
00007 ***** DTSIZ42A
|
|
00008 DTSIZ42A
|
|
00009 05 MC-LIT-WAGE PIC X(40) DTSIZ42A
|
|
00010 VALUE 'Quarterly Contribution and Wage report '. DTSIZ42A
|
|
00011 05 MC-LIT-OF PIC X(40) DTSIZ42A
|
|
00012 VALUE 'covering the months of '. DTSIZ42A
|
|
00013 DTSIZ42A
|
|
00014 05 MC-LIT-AND PIC X(40) DTSIZ42A
|
|
00015 VALUE 'and '. DTSIZ42A
|
|
00016 DTSIZ42A
|
|
00017 05 MC-LIT-THIS-REPORT-WAS PIC X(40) DTSIZ42A
|
|
00018 VALUE 'The report was due by '. DTSIZ42A
|
|
00019 DTSIZ42A
|
|
00020 05 MC-LIT-WE-RECEIVED-NO PIC X(40) DTSIZ42A
|
|
00021 VALUE 'We received no response to the notice '. DTSIZ42A
|
|
00022 DTSIZ42A
|
|
00023 05 MC-LIT-MAILED-TO-YOUR PIC X(40) DTSIZ42A
|
|
00024 VALUE 'mailed to your address on '. DTSIZ42A
|
|
00025 DTSIZ42A
|
|
00026 05 MC-LIT-BY-5PM PIC X(40) DTSIZ42A
|
|
00027 VALUE 'received by 5:00 PM '. DTSIZ42A
|
|
00028 DTSIZ42A
|
|
00029 05 MC-LIT-A-MISSING-QTRS PIC X(40) DTSIZ42A
|
|
00030 VALUE 'missing quarters will be assessed and a '. DTSIZ42A
|
|
00031 DTSIZ42A
|
|
00032 05 MC-LIT-TAX-LIEN PIC X(40) DTSIZ42A
|
|
00033 VALUE 'tax lien will be filed for all '. DTSIZ42A
|
|
00034 DTSIZ42A
|
|
00035 05 MC-LIT-AMOUNT PIC X(40) DTSIZ42A
|
|
00036 VALUE 'outstanding amounts. '. DTSIZ42A
|
|
00037 DTSIZ42A
|
|
00038 05 MC-LIT-WITH-YOUR-RECORDS PIC X(40) DTSIZ42A
|
|
00039 VALUE 'with your records before the '. DTSIZ42A
|
|
00040 DTSIZ42A
|
|
00041 05 MC-LIT-DEPARTMENT-REP PIC X(40) DTSIZ42A
|
|
00042 VALUE 'Department''s representative. '. DTSIZ42A
|
|
00043 DTSIZ42A
|
|
00044 05 MC-LIT-ASSESSMENT-OF PIC X(40) DTSIZ42A
|
|
00045 VALUE 'assessment of '. DTSIZ42A
|
|
00046 DTSIZ42A
|
|
00047 05 MC-LIT-AGAINST-YOUR-ACCOUNT PIC X(40) DTSIZ42A
|
|
00048 VALUE 'against your account. '. DTSIZ42A
|
|
00049 DTSIZ42A
|
|
00050 05 MC-LIT-FIELD-REP PIC X(40) DTSIZ42A
|
|
00051 VALUE 'representative '. DTSIZ42A
|
|
00052 DTSIZ42A
|
|
00053 05 MC-LIT-AT PIC X(40) DTSIZ42A
|
|
00054 VALUE 'at '. DTSIZ42A
|
|
00055 DTSIZ42A
|
|
00056 05 MC-LIT-APOSTROPHE-S PIC X(02) DTSIZ42A
|
|
00057 VALUE '''s'. DTSIZ42A
|
|
00058 DTSIZ42A
|
|
00059 05 MC-LIT-TELEPHONE-NUMBER-FAX PIC X(40) DTSIZ42A
|
|
00060 VALUE 'The Tax Division''s fax number is '. DTSIZ42A
|
|
00061 DTSIZ42A
|
|
00062 05 MC-LIT-PLEASE-CALL PIC X(40) DTSIZ42A
|
|
00063 VALUE 'Please call '. DTSIZ42A
|
|
00064 DTSIZ42A
|
|
00065 05 MC-LIT-FOR-INFORMATION PIC X(40) DTSIZ42A
|
|
00066 VALUE 'for information and report forms. '. DTSIZ42A
|