1. 建立一個包

--1. 建立一個包
create or replace package ch_package is
--過程或函式宣告
procedure my_pro(chName varchar2);
function my_fun(chName varchar2) return number;
end;

2. 建立包體

--2. 建立包體
create or replace package body ch_package is
--過程
procedure my_pro(chName varchar2) is
  v_sal emp.sal%type;
  begin
    select sal into v_sal from emp where ename=chName;
    commit;
    dbms_output.put_line(chName||'的薪水是：'||v_sal);
  end;
  
function my_fun(chName varchar2) return number is
  v_sal emp.sal%type;
  begin
    select sal into v_sal from emp where ename=chName;
    commit;
    return v_sal;
  end;

end;