PRCSEB1 (610)    ROUTINE (9.8)