00001 ***** 05/22/01 00002 * DTSIIEOP 00003 * DTSIIEOP ALTERNATE INDEX FILE LV001 00004 * ELECTRONIC MEDIA OPERATOR ID SEARCH DTSIIEOP 00005 * RECORD DEFINITION. DTSIIEOP 00006 * DTSIIEOP 00007 * FUNCTION: ONE EXISTS FOR EACH ACTIVE ITEM. DTSIIEOP 00008 * RETURNS A LOG NUMBER IN RESPONSE TO AN DTSIIEOP 00009 * ELECTRONIC MEDIA RESPONSIBLE OPERATOR ID SEARCH. DTSIIEOP 00010 * DTSIIEOP 00011 * 01/17/2001 INITIAL DEVELOPMENT. GD DTSIIEOP 00012 * DTSIIEOP 00013 ***** DTSIIEOP 00014 DTSIIEOP 00015 10 IEOP-KEY-AREA. DTSIIEOP 00016 15 IEOP-REC-TYPE PIC S9(04) COMP. DTSIIEOP 00017 88 IEOP-EOP-88 VALUE +15. DTSIIEOP 00018 15 IEOP-OPID PIC X(08). DTSIIEOP 00019 15 IEOP-LOG-NO PIC 9(10). DTSIIEOP 00020 15 IEOP-KEY-FILLER PIC X(44). DTSIIEOP