PRCSREC2 (617)    ROUTINE (9.8)