00001 ***** 10/25/06 00002 * DTSIC220 00003 * DTSIC220 ACTIVITY CODES LV042 00004 * CL*23 00005 * CL*20 00006 * CL*26 00007 * DTSIC220 00008 ***** DTSIC220 00009 10 C220-BUSINESS-AREA PIC X(02). CL*34 00010 88 C220-BA-STATUS-88 VALUE '01'. CL*34 00011 88 C220-BA-ACCOUNTING-88 VALUE '02'. CL*34 00012 88 C220-BA-COLLECTIONS-88 VALUE '03'. CL*34 00013 88 C220-BA-AUDIT-88 VALUE '04'. CL*34 00014 88 C220-BA-RATING-88 VALUE '05'. CL*42 00015 88 C220-BA-GENERAL-88 VALUE '99'. CL*34 00016 CL*34 00017 10 C220-ACTIVITY-CODE PIC X(03). CL*34 00018 88 C220-EMP-REGISTERED-88 VALUE '001'. CL*34 00019 88 C220-LIAB-DETERM-88 VALUE '002'. CL*34 00020 88 C220-RELATIONSHIP-88 VALUE '003'. CL*34 00021 88 C220-ADDRESS-88 VALUE '004'. CL*34 00022 88 C220-OPO-88 VALUE '005'. CL*34 00023 88 C220-BLOCKED-CLAIM-88 VALUE '006'. CL*34 00024 88 C220-SEND-FR500-88 VALUE '007'. CL*37 00025 88 C220-OTHER-STATUS-88 VALUE '008'. CL*37 00026 88 C220-REPORT-ADD-88 VALUE '020'. CL*34 00027 88 C220-REPORT-MOD-88 VALUE '021'. CL*34 00028 88 C220-PAY-ADD-88 VALUE '022'. CL*34 00029 88 C220-PAY-MOD-88 VALUE '023'. CL*34 00030 88 C220-ADJ-ADD-88 VALUE '024'. CL*34 00031 88 C220-ADJ-MOD-88 VALUE '025'. CL*34 00032 88 C220-CRED-DEBIT-VERIF-88 VALUE '026'. CL*40 00033 88 C220-SEND-UC30-88 VALUE '028'. CL*34 00034 88 C220-FUTA-CERT-88 VALUE '029'. CL*34 00035 88 C220-MISC-COLL-88 VALUE '040'. CL*36 00036 88 C220-ASSIGN-COMPLETE-88 VALUE '041'. CL*34 00037 88 C220-AUDIT-REPORT-88 VALUE '042'. CL*34 00038 88 C220-AUDIT-COMPLETE-88 VALUE '043'. CL*34 00039 88 C220-DPC-ADD-88 VALUE '044'. CL*34 00040 88 C220-DPC-MOD-88 VALUE '045'. CL*34 00041 88 C220-LIEN-ADD-88 VALUE '046'. CL*34 00042 88 C220-LIEN-MOD-88 VALUE '047'. CL*34 00043 88 C220-LEVY-ADD-88 VALUE '048'. CL*34 00044 88 C220-LEVY-MOD-88 VALUE '049'. CL*34 00045 88 C220-COMPROMISE-88 VALUE '050'. CL*34 00046 88 C220-FIELD-VISIT-88 VALUE '052'. CL*38 00047 88 C220-RATE-ADD-88 VALUE '070'. CL*34 00048 88 C220-RATE-MOD-88 VALUE '071'. CL*34 00049 88 C220-RATE-DATA-ADD-88 VALUE '072'. CL*34 00050 88 C220-RATE-DATA-MOD-88 VALUE '073'. CL*34 00051 88 C220-PHONE-TO-EMP-88 VALUE '100'. CL*41 00052 88 C220-LETTER-TO-EMP-88 VALUE '101'. CL*41 00053 88 C220-PHONE-TO-AGENT-88 VALUE '102'. CL*41 00054 88 C220-LETTER-TO-AGENT-88 VALUE '103'. CL*41 00055 88 C220-FIELD-VISIT-88 VALUE '104'. CL*41 00056 88 C220-SEARCH-DUTAS-88 VALUE '105'. CL*41 00057 88 C220-SEARCH-EXTERNAL-88 VALUE '106'. CL*41 00058 88 C220-SEARCH-TAX-FILES-88 VALUE '107'. CL*41 00059 88 C220-PROCESS-CALL-LTR-88 VALUE '108'. CL*41 00060 88 C220-SEND-FR500-88 VALUE '109'. CL*41 00061 88 C220-SEND-UC30-88 VALUE '110'. CL*41 00062 88 C220-SEND-UC226-88 VALUE '111'. CL*41 00063 88 C220-RESOLVE-BLK-CLM-88 VALUE '112'. CL*41 00064 88 C220-PRE-AUDIT-88 VALUE '113'. CL*41 00065 88 C220-EMPLOYER-VISIT-88 VALUE '114'. CL*41