object program utility routine{=OPUR}