PSOCLO1 (1027)    ROUTINE (9.8)