create or replace procedure data_move(param in number) iscursor enterprise is select SENTERPRISEID, SSPECIALNUMBER, NSPECIALNUMBERTYPE FROM e_uc_specialcode;enter char(10);spnumber VARCHAR2(32);sptype number;id number;beginopen enterprise;id:=1;loop fetch enterprise into enter, spnumber, sptype; exit when enterprise %NOTFOUND; insert into e_uc_callprefixanalysis (nid, SENTERPRISEID, SCALLPREFIX, NEXTENDCALLTYPE, SSERVICECATOLOG, SCALLATTRIBUE, NMINLEN, NMAXLEN, SLONGNUMBER, SCALLERCHANGE, SCALLEECHANGE,SSOURCEID) values (id, enter, spnumber, sptype, '0', '0', 1, 32, '0', '0', '0', '0'); id:=id+1; commit;end loop;close enterprise;end data_move;/begindata_move('1');end;/