create or replace procedure XX_310(errbuf in number,retcode out number) is
cursor ela is select ename from emp;
india ela%rowtype;
begin
open ela;
loop
fetch ela into india;
insert into elango_827(ename)
values(india.ename);
end loop;
close ela;
end;
================================================
create or replace procedure XXX_310(errbuf in number,reccode out number)is
cursor ela2 is select * from emp;
begin
for key1 in ela2
loop
insert into dhana_827(empno,ename,job,mgr,hiredate,sal,
comm,deptno,enddate,email)
values(key1.empno,key1.ename,key1.job,key1.mgr,
key1.hiredate,key1.sal,key1.comm,key1.deptno,key1.enddate,key1.email);
end loop;
end;
cursor ela is select ename from emp;
india ela%rowtype;
begin
open ela;
loop
fetch ela into india;
insert into elango_827(ename)
values(india.ename);
end loop;
close ela;
end;
================================================
create or replace procedure XXX_310(errbuf in number,reccode out number)is
cursor ela2 is select * from emp;
begin
for key1 in ela2
loop
insert into dhana_827(empno,ename,job,mgr,hiredate,sal,
comm,deptno,enddate,email)
values(key1.empno,key1.ename,key1.job,key1.mgr,
key1.hiredate,key1.sal,key1.comm,key1.deptno,key1.enddate,key1.email);
end loop;
end;
No comments:
Post a Comment