首页 > 代码库 > PL/SQL编程—控制语句
PL/SQL编程—控制语句
SQL> create or replace procedure sp_pro5(id_in varchar2) is 2 v_sal mytest.salary%type; 3 begin 4 select salary into v_sal from mytest where id=id_in; 5 if v_sal<130 then 6 update mytest set salary=1.1*v_sal where id=id_in; 7 end if; 8 end; 9 / Procedure created SQL> exec sp_pro5(4); PL/SQL procedure successfully completed SQL> select * from mytest; ID NAME PASSWD SALARY ----- -------------------- -------------------- -------------------------------------------------------------------------------- 1 123 123 150 2 gaodingle!!!! 123 150 3 gagaga 123 150 4 125555 passwd 55
SQL> create or replace procedure sp_pro6(id_in varchar2) is 2 v_bonus number(6,2); 3 begin 4 select bonus into v_bonus from mytest where id=id_in; 5 if v_bonus=0 then 6 update mytest set bonus=100 where id=id_in; 7 else 8 update mytest set bonus=v_bonus+300 where id=id_in; 9 end if; 10 end; 11 / Procedure created SQL> select * from mytest; ID NAME PASSWD SALARY BONUS ----- -------------------- -------------------- -------- -------- 1 123 123 120.00 0.00 2 gaodingle!!!! 123 120.00 0.00 3 gagaga 123 120.00 100.00 4 125555 passwd 120.00 100.00 SQL> exec sp_pro6(1); PL/SQL procedure successfully completed SQL> select * from mytest; ID NAME PASSWD SALARY BONUS ----- -------------------- -------------------- -------- -------- 1 123 123 120.00 100.00 2 gaodingle!!!! 123 120.00 0.00 3 gagaga 123 120.00 100.00 4 125555 passwd 120.00 100.00
SQL> create or replace procedure sp_pro7 is 2 i number:=0; 3 begin 4 loop 5 insert into users values(i,‘test‘||i); 6 exit when i=3; 7 i:=i+1; 8 end loop; 9 end; 10 / Procedure created
PL/SQL编程—控制语句
声明:以上内容来自用户投稿及互联网公开渠道收集整理发布,本网站不拥有所有权,未作人工编辑处理,也不承担相关法律责任,若内容有误或涉及侵权可进行投诉: 投诉/举报 工作人员会在5个工作日内联系你,一经查实,本站将立刻删除涉嫌侵权内容。