完整的过程结构如下: create or replace PRocedure 过程名 as 声明语句段; begin 执行语句段; exception 异常处理语句段; end;
2. 过程的特点
过程是有名称的程序块,as要害词代替了无名块的declare。
3. 创建过程实例
在【SQLPlus Worksheet】中执行下列PL/SQL程序,该程序将创建名为tempprocedure的过程,create是创建过程的标识符,replace表示若同名过程存在将覆盖原过程。该过程定义了一个变量,其类型和testtable数据表中的currentdate字段类型相同,都是日期型,将数据表中的recordnumber字段为88的currentdate字段内容送入变量中,然后输出结果。 ――――――――――――――――――――――――――――――――――――― set serveroutput on create or replace procedure tempuser.tempprocedure as tempdate tempuser.testtable.currentdate%type; begin select currentdate into tempdate from testtable where recordnumber=88; dbms_output.put_line(to_char(tempdate)); end; ――――――――――――――――――――――――――――――――――――― 【配套程序位置】:第9章/ createprocedure.sql。
在【SQLPlus Worksheet】中执行下列PL/SQL程序,执行结果如图9.45所示。 ――――――――――――――――――――――――――――――――――――― set serveroutput on begin tempprocedure; end; ―――――――――――――――――――――――――――――――――――――
以system用户名、sysdba身份登录【SQLPlus Worksheet】,执行下列PL/SQL程序,执行结果如图9.46所示。 ――――――――――――――――――――――――――――――――――――― Set serveroutput on create or replace procedure scott.tempprocedure( tempdeptno in scott.dept.deptno%type, tempdname out scott.dept.dname%type, temploc in out scott.dept.loc%type)as loc1 scott.dept.loc%type; dname1 scott.dept.dname%type; begin select loc into loc1 from scott.dept where deptno=tempdeptno; select dname into dname1 from scott.dept where deptno=tempdeptno; temploc:='地址:'loc1; tempdname:='姓名'dname1; end; ――――――――――――――――――――――――――――――――――――― 【配套程序位置】:第9章/ createscottprocedure.sql。