declare

   v_test2 studentRecord;--遍历游标

   v_test3 studentRecord;--每次取出的记录

   cursor c_test is

   select *

     from student_head h

    where h.student_key in (3285, 3286, 3287, 3288);

   flag boolean;

 begin

   open c_test;

   loop

     fetch c_test into v_test2;

     exit when c_test%notfound;

     flag := true;

     begin

       select *

         into v_test3

         from student_head

        where student_key = v_test2.student_key

          and student_status <> 'CNX';

     exception

       when no_data_found then--select into 没有数据时，如果是集合类型不会产生异常，记录类型报异常

         flag := false;

     end;

     /*if v_test3 is null*/--记录类型不能整体判断为空

     if flag then--判断是否有找到数据

        dbms_output.put_line(v_test3.student_key || ' ' || v_test3.student_no);

     end if;

    end loop;

   close c_test;

 /*exception

   when no_data_found then continue ;*/ -- 不能在异常中使用continue

                                        -- 如果在此处理异常，会导致循环中止，要达到continue的效果，可在每次赋值进行异常处理

 end;