oracle 笔记5 包

--包
--建立包头
create or replace package comm_package is
    g_comm number := 0.10;
    procedure reset_comm(p_comm in number);
end comm_package;
--建立包体
create or replace package body comm_package
is
    --定义私有的函数
    function vaildate_comm(p_comm in number)
        return boolean
        is
            v_max_comm number;
        begin
            select  max(age)
              into v_max_comm
              from test;
            if p_comm > v_max_comm
                then return(false);
            else
                return(true);
            end if;
    end vaildate_comm;

    --定义包头声明的公用的存储过程
    procedure reset_comm(p_comm in number)
        is
        begin
            if vaildate_comm(p_comm)
                then g_comm:=p_comm;
            else
                raise_application_error(-20210,'不合理的表达式');
            end if;

    end reset_comm;

end comm_package;