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

oracle pl/sql 中的過程

系統 1762 0

模式:

create or replace procedure 過程名(參數名 參數類型,...)
is
  變量名 變量類型;
begin

  過程內容;

end 過程名;

/

show err;

?

舉例:

create or replace procedure proc_blddesignusagearea(p_buildid number) is
?/*
?函數功能:統計樓棟下房屋的用途、面積、套數等信息
??*/
?l_buildarea??? bldroom.buildarea%type;
?l_usearea????? bldroom.usearea%type;
?l_publicarea?? bldroom.publicarea%type;
?l_sets???????? building.sets%type;
?l_cnt1???????? number:=0;
begin?
?--[blddesignusagearea A,bldroom B,將屬于A而不屬于B的用途刪掉]--
?for brrs in (select nvl(designusage,'') designusage from blddesignusagearea where buildid=p_buildid minus select distinct nvl(designusage,'') designusage from bldroom where buildid=p_buildid and resopertype in (1,4))
?loop
??delete from bldDesignusagearea where buildid=p_buildid and nvl(designusage,'')=brrs.designusage;
?end loop;
?--[將同屬于A、B的用途更新,將不屬于A但屬于B的用途新增]--
?for brrs in (select distinct nvl(designusage,'') designusage from bldroom where buildid=p_buildid and resopertype in (1,4))
?loop
??select sum(buildarea),sum(usearea),sum(publicarea),count(bldroomid) into l_buildarea,l_usearea,l_publicarea,l_sets from bldroom where buildid=p_buildid and resopertype in (1,4) and nvl(designusage,'')=brrs.designusage;
??select count(*) into l_cnt1 from blddesignusagearea where buildid=p_buildid and nvl(designusage,'')=brrs.designusage;
??if l_cnt1=1 then --[樓棟下該用途存在只更新面積]--
???if l_sets>0 then
????update bldDesignusagearea set buildarea=l_buildarea,usearea=l_usearea,publicarea=l_publicarea,sets=l_sets where buildid=p_buildid and nvl(designusage,'')=brrs.designusage;
???else
????delete from bldDesignusagearea where buildid=p_buildid and nvl(designusage,'')=brrs.designusage;
???end if;
??elsif l_cnt1=0 then --[樓棟下該用途不存在新增記錄]--
???if l_sets>0 then
????insert into bldDesignusagearea (buildid,designusage,buildarea,usearea,publicarea,sets) select p_buildid,brrs.designusage,l_buildarea,l_usearea,l_publicarea,l_sets from dual;
--???else ???
???end if;
??end if;
?end loop;
end proc_blddesignusagearea;
/
show err;

oracle pl/sql 中的過程


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

微信掃碼或搜索:z360901061

微信掃一掃加我為好友

QQ號聯系: 360901061

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

【本文對您有幫助就好】

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

發表我的評論
最新評論 總共0條評論
主站蜘蛛池模板: 欧美日本一级在线播放 | 免费看黄色片视频 | 八戒久久精品一区二区三区 | 国产成人精品高清在线 | 国产精品欧美亚洲韩国日本 | 色婷婷欧美 | 国产在线观看一区二区三区 | 精品国产日韩亚洲一区二区 | 伊人精品综合 | 96影院| 久久 精品 | 337p欧美超大胆日本人术艺术 | 91亚洲免费视频 | 欧美一级特黄特黄毛片 | 狠狠综合| 日韩高清在线日韩大片观看网址 | 欧美成人一区二区三区不卡 | 奇米影视777第四色 奇米影视777狠狠狠888不卡 | 婷婷色九月综合激情丁香 | 精品久久久久久蜜臂a∨ | av毛片免费看 | 国产区在线观看视频 | 日韩中文字幕在线播放 | 羞羞的视频在线免费观看 | 毛片大全在线 | 久久精品国产清白在天天线 | 欧美日韩亚洲m码色帝国 | 神马影院我不卡在线观看 | 午夜欧美性视频在线播放 | 免费看美女隐私的网站 | 久久久久久岛国免费网站 | 国产精品久久自在自线观看 | 欧美成人久久久 | 91这里只有精品 | 国产成人免费在线观看 | 精品久久一区二区 | 99re热线精品视频 | 亚洲日韩精品欧美一区二区 | 性做爰片视频毛片 | 国产性tv国产精品 | 久热官网 |