00001 *****                                                             11/18/05
00002 *                REVIEWED BY D.SHEPPERSON     10/23/98            DTSIR791
00003 *                                                                    LV011
00004 *    DTSIR791    OPERATOR ID LIST REPORT RECORD.                  DTSIR791
00005 *                                                                 DTSIR791
00006 *****                                                             DTSIR791
00007      SKIP1                                                        DTSIR791
00008          07  R791-LENGTH         PIC S9(04)  COMP.                DTSIR791
00009      SKIP1                                                        DTSIR791
00010          07  R791-SORT-AREA.                                      DTSIR791
00011              10  R791-REC-TYPE           PIC  X(03).              DTSIR791
00012              10  R791-BUREAU-NAME        PIC  X(30).              DTSIR791
00013              10  R791-UNIT-NAME          PIC  X(30).              DTSIR791
00014              10  R791-OP-ID              PIC  X(08).              DTSIR791
00015      SKIP1                                                        DTSIR791
00016          07  R791-DATA-AREA              PIC  X(512).             DTSIR791
00017                                                                   DTSIR791