亚洲免费在线-亚洲免费在线播放-亚洲免费在线观看-亚洲免费在线观看视频-亚洲免费在线看-亚洲免费在线视频

Oracle 調用存儲過程執行CRUD的小DEMO

系統 1905 0

-----------------------------修改(表名,主鍵ID,要修改的列)

create or replace procedure pro_code_edit(p_tbname in varchar2,p_ct_id in varchar2,p_codename in varchar2) as
? ?p_str varchar2(400);
begin
? p_str := 'update '||p_tbname||' set codename = '''||p_codeName||''' where ct_id = '''||p_ct_id||'''';
? execute immediate p_str;
end;

--查詢所有記錄,直接返回游標 在調用處做下一步處理

create or replace procedure pro_code_queryall(p_tbname in varchar2,p_list out sys_refcursor ) as
begin
? ? open p_list for 'select * from '||p_tbname||'';
end;

--查詢單條記錄(表名,主鍵,要查詢的字段)

create or replace procedure pro_code_queryone(p_tbname in varchar2,p_ct_id in varchar2,
? ? ? ? ? ? ? ? ?p_code out varchar2,p_codename out varchar2,p_fathercode out varchar2) as
? ? ?v_code varchar2(40);
? ? ?v_codename varchar2(40);
? ? ?v_fathercode varchar2(40);
? ? ?v_str varchar2(400);
begin
? ? ?v_str:='select code,codename,fathercode ?from '||p_tbname||' where ct_id = :p' ;
? ? ?execute immediate v_str into v_code,v_codename,v_fathercode ?using p_ct_id ;
? ? ?p_code:=v_code;
? ? ?p_codename:=v_codename;
? ? p_fathercode:=v_fathercode;
end;

--刪除記錄(表名,主鍵值)

--這里的主鍵名稱是通過命令查詢出來的

create or replace procedure pro_code_remove(p_tbname in varchar2,p_ct_id in varchar2) as
? ? v_str varchar2(400);
? ? v_con_name varchar2(40);
? ? v_pid varchar2(40):=trim(p_ct_id);
? ? v_pk_column_name varchar2(40);
? ? v_tbname varchar2(400):=upper(trim(p_tbname));
begin
? ? select constraint_name into v_con_name from all_constraints where owner=upper('daily') and constraint_type = 'P'
? ? and table_name=v_tbname;
? ? select column_name into v_pk_column_name from all_cons_columns where owner=upper('daily') and table_name=v_tbname
? ? and constraint_name = v_con_name;
? ?v_str :='delete ?from doorkind where '||v_pk_column_name||' = :p ';
? ?execute immediate v_str using v_pid;
end;


--保存記錄(在這里由于數據設計的特殊之處,主鍵是按照規則自動生成的)

create or replace procedure pro_code_save(p_tbname in varchar2,p_codename in varchar2) as
? ? ?v_codetype varchar2(100);
? ? ?p_id varchar2(400);
? ? ?p_str varchar2(400);
? ? ?v_len number(10);
? ? ?v_left varchar2(100);
? ? ?v_right varchar2(100);
begin
? ? ?v_codetype:=p_tbname;
? ? ?p_str:='select max(ct_id) from '||v_codetype;
? ? ?execute immediate p_str into p_id;
? ? ?dbms_output.put_line(p_id);
? ? ?select codetype,codelength into v_codetype,v_len from codenavigation where upper(codetype) = upper(v_codetype);


? ? ?if p_id is not null then
? ? ? ? v_left := regexp_substr(p_id,'[A-Za-z]+',1,1);
? ? ? ?v_right := regexp_substr(p_id,'[0-9]+',1,1);
? ? ? ?v_right := lpad(v_right + 1,v_len,'0');
? ? ?else
? ? ? ?v_left:=v_codetype;
? ? ? ?v_right := lpad(1,v_len,'0');
? ? ?end if;
? ? ? ?p_id:=v_left||v_right;
? ? ? ?dbms_output.put_line(p_id);


? ? ?p_str:='insert into '||v_codetype||' ?'||' values('''||p_id||''','''||v_right||''','''||p_codeName||''','''||v_left||''')';
? ? ?
? ? ?execute immediate p_str;
? ? ?dbms_output.put_line(p_str);
end;

?

Oracle 調用存儲過程執行CRUD的小DEMO


更多文章、技術交流、商務合作、聯系博主

微信掃碼或搜索:z360901061

微信掃一掃加我為好友

QQ號聯系: 360901061

您的支持是博主寫作最大的動力,如果您喜歡我的文章,感覺我的文章對您有幫助,請用微信掃描下面二維碼支持博主2元、5元、10元、20元等您想捐的金額吧,狠狠點擊下面給點支持吧,站長非常感激您!手機微信長按不能支付解決辦法:請將微信支付二維碼保存到相冊,切換到微信,然后點擊微信右上角掃一掃功能,選擇支付二維碼完成支付。

【本文對您有幫助就好】

您的支持是博主寫作最大的動力,如果您喜歡我的文章,感覺我的文章對您有幫助,請用微信掃描上面二維碼支持博主2元、5元、10元、自定義金額等您想捐的金額吧,站長會非常 感謝您的哦!!!

發表我的評論
最新評論 總共0條評論
主站蜘蛛池模板: 欧美日韩国产精品 | 日韩免费在线视频观看 | 亚洲不卡视频在线 | 97在线亚洲| 久久免费视频播放 | 国内精品不卡一区二区三区 | 久久久久日韩精品无 | 国产精品香蕉成人网在线观看 | 天天操天天爽天天射 | 欧美人与鲁交大毛片免费 | 国产亚洲精品美女久久久久 | 欧美特级爽毛片 | 亚洲国产成人超福利久久精品 | 亚洲综合久 | 成人精品视频在线观看播放 | 精品国产乱码久久久久久浪潮 | 国产伦理久久精品久久久久 | 国产福利区一区二在线观看 | 欧美激情在线观看一区二区三区 | 性欧美网站 | 国产精品午夜波多野结衣性色 | 国产亚洲精品久久久久久牛牛 | 午夜撸 | 亚洲区欧美 | 国产日韩欧美综合一区二区三区 | 日本免费一区二区三区a区 日本免费一区二区三区看片 | 久草视频免费在线看 | 狠狠色欧美亚洲狠狠色五 | 国产一级一片免费播放i | 欧美一区二区在线 | 日韩中文字幕精品久久 | 综合色桃花久久亚洲 | 在线观看国产情趣免费视频 | 久久久人体 | 午夜亚洲精品久久久久久 | 欧美成人亚洲欧美成人 | 色综合社区| 97爱爱爱| 九九久久九九 | 这里只有精品视频在线观看 | 久久狠狠第一麻豆婷婷天天 |