关闭

291人阅读 评论(0) 收藏 举报
分类:
create or replace package comm_pkg is
std_comm number := 0.10;                  ---  变量
procedure reset_comm(new_comm number);   ---  存储过程
end comm_pkg;
/


create or replace package body comm_pkg is
       function validate(comm number) return boolean is      ---- 包体  内部校验 function
                 max_comm employees.commission_pct%type;
       begin
                 select max(commission_pct) into max_comm from employees;
                 return (comm between 0.0 and max_comm);
       end validate;
        
        procedure reset_comm(new_comm number) is             ---- 已在 包头 声明 的 存储过程
        begin
                  if validate(new_comm) then
                  std_comm:=new_comm;
                  else raise_application_error(-20210,'bad commission');
        end reset_comm;
end comm_pkg;
/

 execute hr.comm_pkg.reset_comm(0.15);


0
0

查看评论
* 以上用户言论只代表其个人观点,不代表CSDN网站的观点或立场
    文章分类
    最新评论