C                                                *--> FROM CMS(UDAIOX)
C  DAIO OPTIONS COMMON BLOCK
      COMMON /UDAIOX/ IDAERP
C