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;