00001 *****                                                             01/29/02
00002 *                                                                 DTSIL042
00003 *    DTSIL042    FILING SCHEDULE CODES EDIT/DESCRIPTION              LV001
00004 *                MODULE LINKAGE.                                  DTSIL042
00005 *                                                                 DTSIL042
00006 *****                                                             DTSIL042
00007      SKIP1                                                        DTSIL042
00008          10  L042-OPTION         PIC S9(04)   COMP.               DTSIL042
00009              88  L042-MFSC-STATUS-CD            VALUE +01.        DTSIL042
00010              88  L042-MFSC-FILING-SCHEDULE-CD   VALUE +02.        DTSIL042
00011              88  L042-MFSC-REQUEST-TYPE         VALUE +03.        DTSIL042
00012              88  L042-MFSC-INIT-NOTICE-TYPE     VALUE +05.        DTSIL042
00013              88  L042-MFSC-CONF-NOTICE-TYPE     VALUE +06.        DTSIL042
00014      SKIP1                                                        DTSIL042
00015          10  L042-RESULT-IND             PIC  X(01).              DTSIL042
00016              88  L042-VALID                     VALUE '1'.        DTSIL042
00017              88  L042-NOT-VALID                 VALUE '2'.        DTSIL042
00018      SKIP1                                                        DTSIL042
00019          10  L042-CD                     PIC  X(05).              DTSIL042
00020          10  FILLER REDEFINES L042-CD.                            DTSIL042
00021              15  L042-CD-1               PIC  X(01).              DTSIL042
00022              15  FILLER                  PIC  X(04).              DTSIL042
00023          10  FILLER REDEFINES L042-CD.                            DTSIL042
00024              15  L042-CD-2               PIC  X(02).              DTSIL042
00025              15  FILLER                  PIC  X(03).              DTSIL042
00026          10  FILLER REDEFINES L042-CD.                            DTSIL042
00027              15  L042-CD-3               PIC  X(03).              DTSIL042
00028              15  FILLER                  PIC  X(02).              DTSIL042
00029          10  FILLER REDEFINES L042-CD.                            DTSIL042
00030              15  L042-CD-4               PIC  X(04).              DTSIL042
00031              15  FILLER                  PIC  X(01).              DTSIL042
00032          10  L042-CD-5 REDEFINES L042-CD PIC  X(05).              DTSIL042
00033      SKIP1                                                        DTSIL042
00034          10  L042-SHORT-DSCR             PIC  X(10).              DTSIL042
00035          10  L042-LONG-DSCR              PIC  X(40).              DTSIL042
00036      SKIP1                                                        DTSIL042
00037          10  FILLER                      PIC  X(04).              DTSIL042