PRSRL4 (1035)    ROUTINE (9.8)