LONG -> LONG
A(ID,A);--A为long字段
B(ID,A);--A为long字段
create or replace procedure CopyRow as cursor mycur is select ID,A from A; crow mycur%rowtype; LONGCHAR VARCHAR2(4000); begin open mycur; loop fetch mycur into crow; exit when mycur%notfound; INSERT INTO B(ID) VALUES (crow.ID); SELECT A INTO LONGCHAR FROM A WHERE ID = crow.ID; UPDATE B SET A = LONGCHAR WHERE ID = crow.ID; end loop; close mycur; end;
LONG -> CLOB
A(ID,A);--A为LONG字段
E(ID,A);--A为CLOB字段
INSERT INTO E(ID,A) SELECT ID,TO_LOB(A.A) FROM A