oracle中建程序包

Question

CREATE OR REPLACE  PACKAGE "INTEHEL"."PARAM_PACKAGE"   is
procedure set_param(startdate varchar2,enddate varchar2);
function get_startdate return varchar2;
function get_enddate return varchar2;
end ;  程序包创建成功CREATE OR REPLACE  PACKAGE BODY "INTEHEL"."PARAM_PACKAGE"  is
sdate varchar2,edate varchar2;
as
begin
procedure set_param(startdate varchar2,enddate varchar2) as
begin
 sdate:=startdate;
 edate:=enddate;
end set_param;
function get_startdate return varchar2 as return sdate; end get_startdate;
function get_enddate return varchar2 as return edate; end get_enddate;
end param_package ;  包体无效 
大家帮忙看下哪儿错了

Answer 1

--参考一下：CREATE OR REPLACE PACKAGE BODY "INTEHEL"."PARAM_PACKAGE" as  procedure set_param(startdate varchar2, enddate varchar2) is
    sdate varchar2(20);
    edate varchar2(20);
  begin
    sdate := startdate;
    edate := enddate;
  end set_param; --以下注释掉了，以便调试。--function get_startdate return varchar2 as
--return sdate;
--end get_startdate; function get_enddate return varchar2 as
--return edate;
--end get_enddate;
end param_package;

Answer 2

CREATE OR REPLACE  PACKAGE pkg_a  is 
procedure set_param(startdate varchar2,enddate varchar2); 
function get_startdate return varchar2; 
function get_enddate return varchar2; 
end ;CREATE OR REPLACE  PACKAGE BODY pkg_a is 
sdate varchar2(200);
edate varchar2(200);
procedure set_param(startdate varchar2,enddate varchar2) as 
begin 
sdate:=startdate; 
edate:=enddate; 
end; 
function get_startdate return varchar2 as begin return sdate; end; 
function get_enddate return varchar2 as begin return edate; end; begin 
sdate := '';
edate := '';
end pkg_a ;

Answer 3

 谢谢 codearts  参照你的问题解决了   非常感谢  ！！