XQORM5 (146)    ROUTINE (9.8)