EEOEAHO2 (1005)    ROUTINE (9.8)