XUA4A7 (186)    ROUTINE (9.8)