IBCU82 (929)    ROUTINE (9.8)