XUTMONH1 (253)    ROUTINE (9.8)