LRCAPAM1 (346)    ROUTINE (9.8)