在oracle中使用遊標插入和更新記錄

Question

我有2個表 - student和studLoad都有2個字段studID和studName。我想從student表中加載數據到stuLoad表。 如果數據已經存在於studLoad表中，則應該更新它，否則應該插入它。以下是我的代碼這樣做：

create or replace procedure studentLoad is 
v_id student.studID%type; 
v_name student.studName%type; 
v_sn studLoad.studName%type; 
cursor cur_load is 
select * from student; 


begin 
    open cur_load; 
    loop 
    fetch cur_load into v_id,v_name; 

    exit when cur_load%notfound; 
    select studName into v_sn from studLoad where studID = v_id; 
    if(v_sn!= v_name) then 
     update studLoad set studName= v_name where studID= v_id; 
    else 
     insert into studLoad values(v_id,v_name); 
    dbms_output.put_line(v_id || ' ' || v_name); 
    end if; 
    end loop; 
     close cur_load; 
end; 

它不工作。 studLoad表中的行不會更新。我該如何解決這個問題？在SQL服務器中，我們使用IF EXISTS(select...from stuLoad..)來檢查表中是否存在該記錄，是否有辦法在Oracle中執行相同的操作？如果是的話，請讓我知道一樣。

Answer 1

這是一種非常低效的方法。您可以使用merge語句，然後不需要遊標，循環或（如果不可以）PL/SQL。

MERGE INTO studLoad l 
USING (SELECT studId, studName FROM student) s 
ON (l.studId = s.studId) 
WHEN MATCHED THEN 
    UPDATE SET l.studName = s.studName 
    WHERE l.studName != s.studName 
WHEN NOT MATCHED THEN 
INSERT (l.studID, l.studName) 
VALUES (s.studId, s.studName) 

確保你commit，一次完成，爲了能夠看到這個數據庫。

---

要真正回答你的問題，我會做下面的事情。這有利於在SQL中完成大部分工作，並且僅基於rowid（表中的唯一地址）進行更新。

它聲明瞭一種類型，您一次可以批量放置數據的行數爲10,000行。然後分別處理這些行。

但是，正如我所說這不會像merge那樣高效。

declare 

    cursor c_data is 
    select b.rowid as rid, a.studId, a.studName 
     from student a 
     left outer join studLoad b 
     on a.studId = b.studId 
     and a.studName <> b.studName 
      ; 

    type t__data is table of c_data%rowtype index by binary_integer; 
    t_data t__data; 

begin 

    open c_data; 
    loop 
     fetch c_data bulk collect into t_data limit 10000; 

     exit when t_data.count = 0; 

     for idx in t_data.first .. t_data.last loop 
     if t_data(idx).rid is null then 
      insert into studLoad (studId, studName) 
      values (t_data(idx).studId, t_data(idx).studName); 
     else 
      update studLoad 
       set studName = t_data(idx).studName 
      where rowid = t_data(idx).rid 
        ; 
     end if; 
     end loop; 

    end loop; 
    close c_data; 

end; 
/