pl/sql编程（三）函数

函数

函数用于返回特定的数据（一般返回一个值）。当建立函数时，函数头部必须包含return子句，而在函数体内必须包含return语句返回的数据。

可以使用create function命令来建立函数。

实例1

--函数案例

--输入雇员的姓名，返回该雇员的年薪

create function GetYearSal(name varchar) return

--返回值的定义部分

number is yearSal number(7,2);

begin

--执行部分

select sal*12+nvl(comm,0)*12 into yearSal from emp where ename=name;

--nvl()函数表示如果comm为null，则赋值为0

return yearSal;

end;

 

在sqlplus中调用函数的步骤：

sql>var income number

sql>call GetYearSal('SCOTT') into:income

sql>print income

上例子：

创建的窗口

测试的窗口：

例子一：

-----------------------自定义函数----------------create or replace function myFn(e_name in varchar,e_deptno in number)return boolean is  --is后面声明局部变量  flag boolean:=false;  i integer:=0;begin    select count(*) into i from emp where emp.ename=e_name and emp.deptno=e_deptno;    if i>0 then      flag:=true;    else flag:=false;    end if;      return flag;end myFn;-------------测试：-- Created on 2015/8/26 by ADMINISTRATOR declare      i boolean;begin  -- Test statements here  i:=myfn('SMITH',20);  /*注意：函数可以在sql中调用，如果返回值boolean  此时dbms输出不了，因此无法调用返回boolean的函数  在plsql中调用函数，必须用变量接受返回值，否则认为调用的是存储过程  */  if i then    dbms_output.put_line('true');  else    dbms_output.put_line('false');  end if;end;

例子二：

自定义函数：create or replace function nvlComm(targetcomm in emp.comm%type) return varchar2  is   begin      if targetcomm is null       then          return 'no-comm';     else                return targetcomm;     end if;     end nvlComm;-------测试：select nvlcomm(comm) from emp

例子三：

create or replace function Test(e_empno in number,e_row out emp%rowType) return  boolean is   flag boolean :=false;    i number;begin    select empno into  i from emp where emp.empno=e_empno;    if sql%found  then--如果有行记录           select * into e_row from emp where emp.empno=e_empno;      flag:=true;    else       flag:=false;    end if;            return flag; exception  when no_data_found       then return false;When others then return false;end Test;-----------------测试：declare     i boolean;  emp_row emp%rowtype;begin   i:=test('769',emp_row);   if i then     dbms_output.put_line(emp_row.empno||emp_row.ename);   end if;  end;