日期:2014-05-16 浏览次数:21198 次
create or replace procedure ngame(v_var1 VARCHAR2,v_a OUT VARCHAR2,v_b OUT VARCHAR2,v_c OUT NUMBER) IS
create_sql VARCHAR2(1024);
drop_sql VARCHAR2(1024);
purge_sql VARCHAR2(1024);
insert_sql VARCHAR2(1024);
update_sql VARCHAR2(1024);
var_child VARCHAR2(1024);
var_number VARCHAR2(1024);
cur_sql VARCHAR2(1024):='select a from temp_game';
cur_update SYS_REFCURSOR;
num_sum NUMBER;
begin
create_sql:='CREATE TABLE temp_game(a NUMBER,b NUMBER,c NUMBER)';
drop_sql:='drop table temp_game';
purge_sql:='purge table temp_game';
insert_sql :='insert into temp_game(a) values ';
Execute IMMEDIATE create_sql;
var_child:=v_var1;
--初始化表数据
LOOP
IF length(var_child)=0 OR var_child IS NULL THEN
EXIT;
END IF;
IF instr(var_child,',')>0 THEN
var_number:=substr(var_child,1,instr(var_child,',')-1);
var_child:=substr(var_child,instr(var_child,',')+1);
ELSE
var_number:=var_child;
var_child:='';
END IF;
insert_sql:='insert into temp_game(a) values ('
------其他解决方案--------------------
不知道你的具体用途,给你一篇文章或许你可以找出你需要的东西
http://www.itpub.net/thread-719692-1-1.html
------其他解决方案--------------------
var_number
------其他解决方案--------------------
笨方法,但是功能算实现了,就当娱乐啦。。
------其他解决方案--------------------