Oracle存储包存储及案例

Package左侧文件：

create or replace package S02_ZFRZPT_YS_MID is

  procedure start_cal(strgranularity in varchar2, dtinputdt in varchar2);

  procedure add_jydsxx_pt_mid (dtinputdt in varchar2);

end S02_ZFRZPT_YS_MID;

Package右侧文件：

create or replace package body S02_ZFRZPT_YS_MID is

  procedure start_cal(strgranularity in varchar2,
                      --1日,2,3,4:月；5：季；6：半年；7：年
                      dtinputdt in varchar2) as
  begin
    --注释
    add_jydsxx_pt_mid(dtinputdt);

  end;

  procedure add_jydsxx_pt_mid(dtinputdt in varchar2) as
  begin
    delete from s02_jydsxx_pt_mid t where t.statisticdate = dtinputdt;
    commit;
  end;

end S02_ZFRZPT_YS_MID;