declare
cursor TAGENTMENUd is select * from TAGENTMENU where 1=1;

-- 获取游标
begin

--遍历查询出的表 (注意 tn是整条记录)
for tn in TAGENTMENUd loop

--取出旧表字段循环插入新表

insert into TAGENTMENUROLE values('000000001',tn.ID);
end loop;
end;

05-11 20:37