5990 CA=1 : IF ISP>1 THEN CA=DE(KT)*DE(L)