Oracle中的存储过程

xiaoxiao2022-06-12  33

[color=gray][/color]2) 对于两个表如果字段数不一样,但是有几个字段的结构一样时〔类似于父子关系〕,必须使用 INSERT INTO B(field1,field2) select A.field1,A.field2 from A; 1.用带参数的游标实现insert功能: CREATE OR REPLACE PROCEDURE GET_DATA( -- 参数列表: n_task_id IN number, --任务编号 v_task_name IN varchar2, --任务名称 v_name IN varchar2 -- 名称 ) ----------------------------------------------- -- PROCEDURE名 :GET_DATA -- -- 処理内容 :从数据源表取得符合条件的的数据插入到目标数据表: -- -- 引数 :n_tas_id 任务ID, -- -- v_task_namek 任务名称, -- -- v_bdw_name 对数据源表限制条件:本地网名称 -- ----------------------------------------------- IS --插入行数控制 i_count number(5); --取数据游标:DATA_CUR(IN_NAME) --参数:本地网名称:IN_NAME CURSOR DATA_CUR(IN_NAME VARCHAR2) IS /**注意:参数的定义中不带精度**/ SELECT * FROM GET_DATA_SRC A WHERE A.NAME = IN_NAME; BEGIN --计数器,控制插入行数 i_count := 0; --循环插入数据 FOR MYCUR IN DATA_CUR(v_name) LOOP INSERT INTO ABC( ROW_ID, TASK_ID, TASK_NAME, GET_DATA_DT, CUST_ID, ASSIGN_FLAG, DEAL_DATE )VALUES( SEQ_KD.NEXTVAL, N_TASK_ID, V_TASK_NAME, SYSDATE, MYCUR.CUST_ID, 'N', NULL ); --程序试用阶段,以后会删除satrt i_count := i_count + 1; IF i_count >100 THEN COMMIT; RETURN; END IF; --程序试用阶段,以后会删除end END LOOP; --数据commit,程序调试阶段避免大量数据,暂时关闭 --commit; --------例外处理部分---------------------------- EXCEPTION WHEN OTHERS THEN rollback; END SRBZ_GET_SRBZ_KD_SPEED; / 2.使用语句拼接法实现insert功能: 注:2.1字符串常量的引号 2.2 变量的引号 CREATE OR REPLACE PROCEDURE ABC( -- 参数列表: task_id IN number, --任务编号 task_name IN varchar2, --任务名称 in_NAME IN varchar2 --名称 ) --------------------------- PROCEDURE名 :ABC -- 処理内容 :从数据源表取得符合条件的的数据插入到目标数据表 -- 引数 :table_src 数据源表 -- table_to 数据插入目标表 -- in_bdw_name 对数据源表限制条件:本地网名称 --------------------------------------------- IS --INSERT_STRING 动态生成的insert语句存放处 INSERT_STRING VARCHAR2(1000); --数据源表存放处 tableSrc varchar2(500); --数据插入目标表存放处 tableTarget varchar2(1000); --数据目标表需要插入值的字段存放处 StrFields varchar2(1000); BEGIN --数据源表为:AAA tableTarget := ' BBB '; --数据来源 tableSrc := ' select seq_kd.nextval,sysdate,'||task_id||','''||task_name||''', ' ||'A.* from AAA A' ||' WHERE A.value='||'''IP-VPDN''' ||'AND A.remark IS NULL'; --需要插入的字段 StrFields := '(ROW_ID,GET_DATA_DT,TASK_ID,TASK_NAME,COST_CTR,SERVICE_ID,' ||'SI_ADDR,SI_SERVER_ID)'; --生成insert语句 INSERT_STRING := 'INSERT INTO ' || tableTarget || StrFields || tableSrc ; --执行insert语句 execute immediate INSERT_STRING; --提交事务 commit; --------例外处理部分------------------------------------------------------- EXCEPTION --异常的抛出 WHEN OTHERS THEN --DBMS_OUTPUT.PUT_LINE('处理过程中出错,程序退出,未执行相关内务'); rollback; END SRBZ_GET_SRBZ_KD_GSVPDN_FREE; / 相关资源:Java 面经手册·小傅哥(公众号:bugstack虫洞栈).pdf
转载请注明原文地址: https://www.6miu.com/read-4933912.html

最新回复(0)