求救，package中的存储过程中，if判断中不能使用子查询

Question

 ---package中proc中报错的代码    
 for shift_in in ( select * from tab ) loop 
     if  shift_in.kskm in (select kaoshikem from kemu  where kaoshikem=3) then   ---报错行                 
        update exam2  set shift_no=shift_in.shift_no where exam_date=shift_in.examdate ;         
       end if;

Answer 1

for shift_in in ( select * from tab ) loop   
update exam2 set shift_no=shift_in.shift_no 
where exam_date=shift_in.examdate and shiift_in.kskm=3
--and exists(select 1 from kemu where shiift_in.kskm=kemu.kaoshikem and kaoshikem=3)