00001 *****                                                             01/05/00
00002 *                                                                 DTSIVITM
00003 *    DTSIVITM  LAST USED ITEM NUMBER FOR EACH BATCH.                 LV014
00004 *                                                                 DTSIVITM
00005 *****                                                             DTSIVITM
00006                                                                   DTSIVITM
00007          10  VITM-NEXT-ITEM-NO OCCURS 99999 TIMES                    CL*13
00008                        INDEXED BY VITM-IDX                           CL*13
00009                                          PIC S9(03)  COMP-3.         CL*12
00010                                                                   DTSIVITM
00011          10  FILLER                      PIC  X(32).                 CL*14