Oracle存储过程


createorreplaceproceduresp_aspt_mh_ptjsqk /*平台建设情况 --20131217日志数暂时没有接到通知 */ as v_yysnumber; v_yycssnumber; v_cssnumber; v_jrlnumber(10,8); v_bzchar(1); begin selectcount(distinct(app_name)) intov_yys frompm.t_operation_log_statisticst wheret.region_id='030000'; --提交公安部 updatet_stat_show_ptjsqkt sett.stat_yysm=v_yys wheret.model_id='030000'; commit; forlin(selectt.app_num,t.region_id frompm.t_aspt_monitor_statust wheret.im_status='Y')loop --更新 t_stat_show_ptjsqk在建的应用总数 updatet_stat_show_ptjsqkt sett.stat_yysm=l.app_num wheret.model_id=l.region_id; commit; ifl.region_idnotlike'__0000'andl.region_idlike'____00'then --更新 t_stat_show_mapdata在建的应用数 updatet_stat_show_mapdatat sett.access_state='1',t.access_num=l.app_num wheret.model_id=l.region_id; commit; endif; endloop; --结束完成后,进入下一个 forlin(selectdistinct(substrb(t.model_id,1,2))v_qlw fromt_stat_show_ptjsqkt wheret.model_id<>'030000')loop selectcount(1) intov_yycss fromt_stat_show_ptjsqkt wheret.stat_yysm>0 andt.model_idlikel.v_qlw||'%'; selectcount(1) intov_css fromt_stat_show_ptjsqkt wheret.model_idlikel.v_qlw||'%'; v_jrl:=v_yycss/v_css; ifv_jrl>=0.8then v_bz:='2'; elsifv_jrl<0.8andv_jrl>=0.5then v_bz:='3'; else v_bz:='1'; endif; updatet_stat_show_ptjsqkt sett.is_build=v_bz wheret.model_id=l.v_qlw||'0000'; commit; endloop; end;
还剩1页未读

继续阅读

下载pdf到电脑,查找使用更方便

pdf的实际排版效果,会与网站的显示效果略有不同!!

需要 2 金币 [ 分享pdf获得金币 ] 0 人已下载

下载pdf

pdf贡献者

java_110

贡献于2013-12-17

下载需要 2 金币 [金币充值 ]
亲,您也可以通过 分享原创pdf 来获得金币奖励!
下载pdf