如何通過應對來自plsql中的另一個表來更新一個表中的值？

Question

這是我需要做的一個簡單例子。實際上，我想通過使用plsql中的遊標來應對來自另一個表的應答來更新一個表中的值。

予取表f和表B作爲兩個實例：

f= 
1|Thom                                                
2|Bob                                                
3|Steven                                                
5|Arthur 



b= 
7|Nataly                                                
9|Alfred 

，其中I需要插入在第一的B的絲束線路f的兩行：

create table f (a number, b varchar2(10)); 

insert into f values (1,'Thom'); 
insert into f values (2,'Bob'); 
insert into f values (3,'Steven'); 
insert into f values (5,'Arthur'); 
commit; 


create table b (c number, d varchar2(10)); 

insert into b values (7,'Nataly'); 
insert into b values (9,'Alfred'); 

commit; 
create or replace procedure wco as 

    cursor c_f is 
    select a,b from f for update; 
    v_a f.a%type; 
    v_b f.b%type; 

    cursor c_b is 
    select c,d from b; 
    v_c b.c%type; 
    v_d b.d%type; 

begin 
    open c_f; 
    open c_b 
     loop 
     fetch c_f into v_a, v_b; 
     exit when c_f%ROWCOUNT=c_b%RROWCOUNT; 
     update f set a=v_c and b=v_d where current of c_f; 
     end loop; 
    close c_d: 
    close c_f; 
end; 
/

exec wco; 

select * from f; 

drop table f; 

預期的結果（我希望什麼都）：

7|Nataly                                                
9|Alfred                                                
3|Steven                                                
5|Arthur 

但是我現在（的結果）是：

1|Thom                                                
2|Bob                                                
3|Steven                                                
5|Arthur 

我該如何解決這個問題，我是PLSQL的初學者，如果能幫助我，我將非常感激。

Answer 1

您的過程編譯，但有錯誤; 編譯後爲了看編譯錯誤 運行show errors;。

變化open c_b到open c_b;（末尾缺少分號）

變化close c_d:到close c_b;（正確名稱是C_B和分號，而不是冒號）

變化exit when c_f%ROWCOUNT=c_b%RROWCOUNT;退出時c_f%ROWCOUNT=c_b%ROWCOUNT;（錯誤%RROWCOUNT;）

update f set a=v_c and b=v_d where current of c_f;這是錯誤的SQL語法。 應該是update table_name set column=value, column=value;

爲變量提供描述性名稱很重要，所以理解你的邏輯會更容易。

據我所知你只想複製源表中的第二行兩行。

create table source_table (
    id number, 
    name varchar2(10)); 
/

insert into source_table values (1,'Thom'); 
insert into source_table values (2,'Bob'); 
insert into source_table values (3,'Steven'); 
insert into source_table values (5,'Arthur'); 
/

create table target_table (
     id number, 
     name varchar2(10)); 
/

insert into target_table values (7,'Nataly'); 
insert into target_table values (9,'Alfred'); 
/

create or replace procedure copy_tables 
AS 
begin 
    FOR source_row IN (select id, name 
        from source_table 
        offset 2 rows) 
    LOOP 
     insert into target_table 
     values(source_row.id, source_row.name); 
    END LOOP; 
end; 
/

exec copy_tables; 
/

select id, name from target_table; 
/

Answer 2

你並不需要爲這個PL/SQL;它可以在單個MERGE語句實現：

merge into f tgt 
    using (select coalesce(b1.id, f1.id) id, 
       coalesce(b1.name, f1.name) name, 
       f1.f_rowid 
     from (select id, 
         name, 
         rowid f_rowid, 
         row_number() over (order by id) rn 
       from f) f1 
       full outer join (select id, 
             name, 
             row_number() over (order by id) rn 
           from b) b1 
        on f1.rn = b1.rn) src 
    on (tgt.rowid = src.f_rowid) 
when matched then 
    update set tgt.id = src.id, 
      tgt.name = src.name 
    where tgt.id != src.id 
    or tgt.name != src.name 
when not matched then 
    insert (tgt.id, tgt.name) 
    values (src.id, src.name); 

參見https://livesql.oracle.com/apex/livesql/file/content_FBPR7YCLFVWO7NGDXTLSP1R97.html用於測試細節（兩個例子;目標表具有多個且具有比源表更少的行）。

如果需要，你可以在上面插入加入到一個程序，例如：

create procedure populate_target_table as 
begin 
    merge into f tgt 
    using (select coalesce(b1.id, f1.id) id, 
        coalesce(b1.name, f1.name) name, 
        f1.f_rowid 
      from (select id, 
          name, 
          rowid f_rowid, 
          row_number() over (order by id) rn 
        from f) f1 
        full outer join (select id, 
              name, 
              row_number() over (order by id) rn 
            from b) b1 
        on f1.rn = b1.rn) src 
     on (tgt.rowid = src.f_rowid) 
    when matched then 
    update set tgt.id = src.id, 
       tgt.name = src.name 
    where tgt.id != src.id 
    or tgt.name != src.name 
    when not matched then 
    insert (tgt.id, tgt.name) 
    values (src.id, src.name); 
end; 
/