00001 ***** 11/20/06 00002 * DTSIX216 00003 * DTSIX216 ELECTRONIC SUBMISSION MESSAGES. LV001 00004 * DTSIX216 00005 * INFORMATIONAL MESSAGES FROM THE ICESA REPORTING PROCESS. DTSIX216 00006 * DTSIX216 00007 * DTSIX216 00008 ***** DTSIX216 00009 DTSIX216 00010 15 X216-PSEUDO-BATCH PIC 9(05). DTSIX216 00011 15 FILLER PIC X(01) VALUE ','. DTSIX216 00012 15 X216-PSEUDO-ITEM PIC 9(03). DTSIX216 00013 15 FILLER PIC X(01) VALUE ','. DTSIX216 00014 15 X216-SUBMITTER-NAME PIC X(50). DTSIX216 00015 15 FILLER PIC X(01) VALUE ','. DTSIX216 00016 15 X216-SUBMITTER-FEIN PIC X(09). DTSIX216 00017 15 FILLER PIC X(01) VALUE ','. DTSIX216 00018 15 X216-CONTACT-NAME PIC X(30). DTSIX216 00019 15 FILLER PIC X(01) VALUE ','. DTSIX216 00020 15 X216-CONTACT-PHONE PIC X(10). DTSIX216 00021 15 FILLER PIC X(01) VALUE ','. DTSIX216 00022 15 X216-CONTACT-PHONE-EXT PIC X(10). DTSIX216 00023 15 FILLER PIC X(01) VALUE ','. DTSIX216 00024 15 X216-ICESA-REC-TYPE PIC X(01). DTSIX216 00025 15 FILLER PIC X(01) VALUE ','. DTSIX216 00026 15 X216-MSG-TEXT PIC X(50). DTSIX216 00027 15 FILLER PIC X(01) VALUE ','. DTSIX216 00028 15 X216-EMP-FEIN PIC X(09). DTSIX216 00029 15 FILLER PIC X(01) VALUE ','. DTSIX216 00030 15 X216-EMP-NAME PIC X(50). DTSIX216 00031 15 FILLER PIC X(01) VALUE ','. DTSIX216 00032 15 X216-EMP-STREET PIC X(40). DTSIX216 00033 15 FILLER PIC X(01) VALUE ','. DTSIX216 00034 15 X216-EMP-CITY PIC X(25). DTSIX216 00035 15 FILLER PIC X(01) VALUE ','. DTSIX216 00036 15 X216-EMP-STATE PIC X(02). DTSIX216 00037 15 FILLER PIC X(01) VALUE ','. DTSIX216 00038 15 X216-EMP-ZIP. DTSIX216 00039 20 X216-EMP-ZIP-5 PIC X(05). DTSIX216 00040 20 X216-EMP-ZIP-EXT PIC X(05). DTSIX216