MOMODL(9)='KOCKS'
....
....
* 'KOCKS' INATU = 70
....
....
....
ELSE IF (IMOD.EQ.9 ) THEN
* KOCK
INATU = 70