oracle 游标实例

create or replace procedure addMessage is

cursor cursor1 is select p1.patient_id, f1.arrivel_time
  from ws_first_page f1, ws_precheck p1
where f1.precheck_id = p1.id
group by p1.patient_id, f1.arrivel_time
order by p1.patient_id,f1.arrivel_time desc;

begin
   for cursor_result in cursor1 loop
     begin
          insert into student values (cursor_result.patient_id);
          commit;
       end;
       end loop;
   end addMessage;