00001 *****                                                             03/01/12
00002 *                                                                 DTSIL599
00003 *    DTSIL599  BARCODE DATA TO UPDATE RETURN MAIL INDICATOR          LV001
00004 *              MODULE LINKAGE.                                    DTSIL599
00005 *                                                                 DTSIL599
00006 *                                                                 DTSIL599
00007 *              03/10/2007  CREATED FOR DC. ZL1                    DTSIL599
00008 *****                                                             DTSIL599
00009                                                                   DTSIL599
00010          10  L599-OPTION                 PIC  X(01).              DTSIL599
00011              88  L599-BARCODE-OK-88             VALUE '0'.        DTSIL599
00012              88  L599-BARCODE-NOT-OK-88         VALUE '1'.        DTSIL599
00013                                                                   DTSIL599
00014          10  L599-TRAN-AREA.                                      DTSIL599
00015              15  L599-EMP-NO             PIC S9(06)       COMP-3. DTSIL599
00016              15  L599-EMP-NAME           PIC  X(04).              DTSIL599
00017                                                                   DTSIL599
00018          10  FILLER                      PIC  X(20).              DTSIL599
00019                                                                   DTSIL599
00020                                                                   DTSIL599
00021          10  L599-RETURN-AREA.                                    DTSIL599
00022              15  L599-BARCODE-FONT       PIC X(06).               DTSIL599
00023              15  L599-BARCODED-DATA      PIC X(50).               DTSIL599
00024                                                                   DTSIL599
00025          10  FILLER                      PIC  X(20).              DTSIL599