C                                           *--> FROM COMMON.EXG26
      COMMON/EXG26/NSUDEF,LOCPTR,MINODT,ISUPT(4,27),MRLOC(10),
     .             DORAIN,ADJUST,DOBACK,DOSUMF,IOFRCL,IFOFF,IOFCMP,
     .             NSCHEX,LESELV,LESSTO,ADJRUN,BFSAVQ,LTSBFQ,WRAJQM,
     .             WRAJQI,WRAJEL,LADJQM,LADJQI,LADJEL,IDTAJM,IDTAJI,
     .             IDTAJE,NUMSIM,MQXQT,IOFPRM,IFIRST,IDOFST,
     .             WRAJST,LADJST,IDTAJS
      LOGICAL DORAIN,ADJUST,DOBACK,DOSUMF,ADJRUN,BFSAVQ,WRAJQM,WRAJQI,
     .        WRAJEL,WRAJST,MQXQT
C