PRCOSRV2 (919)    ROUTINE (9.8)