Oracle将一个表的值更新为另一个表字段的过程(Oracle procedure to update values of one table to another another table field)

 我有两个具有两个属性的表。我编写了一个过程，它应该从table1获取值并在表2中更新它。 
 
MEDICINE 

BARCODE varchar2 13 byte
PDF_KUB_PATH  varchar2 1000 byte

PARSED_ILAC_REHBERI

BARCODE varchar2 13 byte
PDF_KUB_PATH  varchar2 1000 byte
 
 这是我在PL / SQL中的程序，我无法找到我的错误，提前谢谢 
 
CREATE OR REPLACE PROCEDURE Deneme
IS
    BARCODETEMP VARCHAR2(13 BYTE);
    S_KUB VARCHAR2 (1000 BYTE);

    CURSOR c1 IS
    SELECT a.PDF_KUB_PATH, a.BARCODE
    FROM medicine b,parsed_ilac_rehberi a
    WHERE a.BARCODE = b.barcode;
BEGIN

    OPEN c1;
    LOOP
    FETCH c1 INTO  S_KUB , BARCODETEMP,

    EXIT WHEN c1%NOTFOUND;

    UPDATE medicine
    SET PDF_KUB_PATH = S_KUB
    WHERE BARCODE = BARCODETEMP; 

    END LOOP;

    CLOSE c1;

    COMMIT;

EXCEPTION
    WHEN OTHERS THEN
    RAISE_APPLICATION_ERROR(-20001,'An error was encountered - '
                                    ||SQLCODE||' -ERROR'||SQLERRM);
end;

I have two tables with two attributes.I have written a procedure which should take valuesfrom table1 and update it in Table 2.
 
MEDICINE 

BARCODE varchar2 13 byte
PDF_KUB_PATH  varchar2 1000 byte

PARSED_ILAC_REHBERI

BARCODE varchar2 13 byte
PDF_KUB_PATH  varchar2 1000 byte
 
This is my procedure in PL/SQL, i cant find where is my mistake, thanks in advance
 
CREATE OR REPLACE PROCEDURE Deneme
IS
    BARCODETEMP VARCHAR2(13 BYTE);
    S_KUB VARCHAR2 (1000 BYTE);

    CURSOR c1 IS
    SELECT a.PDF_KUB_PATH, a.BARCODE
    FROM medicine b,parsed_ilac_rehberi a
    WHERE a.BARCODE = b.barcode;
BEGIN

    OPEN c1;
    LOOP
    FETCH c1 INTO  S_KUB , BARCODETEMP,

    EXIT WHEN c1%NOTFOUND;

    UPDATE medicine
    SET PDF_KUB_PATH = S_KUB
    WHERE BARCODE = BARCODETEMP; 

    END LOOP;

    CLOSE c1;

    COMMIT;

EXCEPTION
    WHEN OTHERS THEN
    RAISE_APPLICATION_ERROR(-20001,'An error was encountered - '
                                    ||SQLCODE||' -ERROR'||SQLERRM);
end;

原文：https://stackoverflow.com/questions/24044297