create or replace procedure update_commission (v_dept in number,v_pervent in number default 10) is begin update emp set comm=sal*v_percent where deptno=v_dept; end
SQL>/
Procedure created
SQL>execute update_commission(10,15);
PL/SQL procedure successfully completed.
SQL>
如果在另一个命名程序块或匿名程序块中执行这个程序,那么就不需要EXECUTE关进字。
declare v_dept number; begin select a.deptno into v_dept from emp a where job=''''PRESIDENT'''' update_commission(v_dept); end SQL>/ PL/SQL procedure successfully completed SQL>
控制结构
控制结构控制PL/SQL程序流程的代码行,PL/SQL支持条件控制和循环控制结构。
语法和用途
IF..THEN
语法:
IF condition THEN Statements 1; Statements 2; .... END IF
《OUTER BLOCK》 DECLARE A_NUMBER INTEGER; B_NUMBER INTEGER; BEGIN --A_NUMBER and B_NUMBER are available here <> DECLARE C_NUMBER INTEGER B_NUMBER NUMBER(20) BEGIN C_NUMBER:=A_NUMBER; C_NUMBER=OUTER_BLOCK.B_NUMBER; END SUB_BLOCK; END OUT_BLOCK;