SQL条件循环语句以及异常知识整理

 create or replace procedure pr_test1 is
 begin

   if  >  then

     dbms_output.put_line('条件成立');

   elsif  >  then

     if  >  then

       dbms_output.put_line('条件不成立1');

    end if;

   elsif  >  then

     dbms_output.put_line('条件成立2');

   else
     dbms_output.put_line('条件不成立3');

   end if;

 end pr_test1;

 create or replace procedure pr_text2 is

   v_case number() := ;

 begin

   case v_case

     when  then

       dbms_output.put_line('条件匹配=1');

     when  then

       dbms_output.put_line('条件成匹配=100');

     else

       dbms_output.put_line('条件不匹配');

   end case;

   case

     when  >  then

       dbms_output.put_line('8>7成立');

     when  >  then

       dbms_output.put_line('9>8成立');

     else

       dbms_output.put_line('都不成立');

   end case;

   --loop循环

   <<loop1>>
   loop

   v_case:=v_case-;

   dbms_output.put_line('v_case='||v_case);

   --if(v_case = ) then

     --dbms_output.put_line('退出循环');

   exit loop1 when v_case =;

   --end if;

     end loop;

     while v_case >

     loop

     v_case:=v_case-;

       dbms_output.put_line('v_case='||v_case);

         --exit when v_case =;

     end loop;

      dbms_output.put_line('v_case='||'--------');
   for inx in reverse .. loop   --..(逐渐加1) reverse(从大向小加)

     v_case:=v_case+inx;

       dbms_output.put_line('v_case='||v_case);

   end loop;

 end pr_text2;

 create or replace procedure pr_test2(v_nl in varchar2 default '' ) is
 begin

 update t_hq_ryxx set ruzrq = sysdate where nianl = v_nl;

 commit;

 end pr_test2;

 create or replace procedure pr_test3(v_nl in varchar2,v_xx in out varchar2) is
 begin

 select xingm into v_xx from t_hq_ryxx where nianl = v_nl and bum = v_xx;

 if sql%found then 

     dbms_output.put_line('查找到数据了');

 else

     dbms_output.put_line('未找到数据');

 end if;

 exception  --异常

 when no_data_found then

   --dbms_output.put_line('未查找到数据');
   dbms_output.put_line('sqlcode='|| sqlcode);
   dbms_output.put_line('sqlerrm='|| sqlerrm);

 when others then
   dbms_output.put_line('查找出错');
   dbms_output.put_line('sqlcode='|| sqlcode);
   dbms_output.put_line('sqlerrm='|| sqlerrm);

 end pr_test3;

 create or replace procedure pr_test4(v_nl in varchar2) is

 v_xm t_hq_ryxx.xingm%type;

 begin

 v_xm := '';
 pr_test3(v_nl,v_xm);

 dbms_output.put_line('v_xm='|| v_xm);

 end pr_test4;

 create or replace procedure pr_test5 is
 begin

 update t_hq_ryxx set bum= '' where bum is null;

 commit;

 if sql%rowcount > then

 dbms_output.put_line('更新了'|| sql%rowcount || '记录');

 else 

 dbms_output.put_line('更新了0条记录');

 end if;

 end pr_test5;