Oracle 游标循环数据表示例

[yuanrui]

declare 
type ref_cur_type is ref cursor;
cur_list ref_cur_type;
v_sql varchar2(2000);
v_addr_id INTEGER;
v_address varchar2(50);
begin
  v_sql := 'select ADDR_ID, ADDRESS from T_DW_ADDR';
  open cur_list for v_sql;
  loop
    fetch cur_list into v_addr_id, v_address;
    update T_MON_TERMINAL set addr_id = v_addr_id where address = v_address;
    update T_LED_EQUIP set addr_id = v_addr_id where address = v_address;
    end loop;
    close cur_list;
    commit;
end;