日期:2014-05-17  浏览次数:20937 次

这是什么数据库的语言??
我只熟悉sql,但同事发给我了一些代码不是sql的,我不知道是db2还是oracle还是mysql的,懂得人给个答复,不需要告诉我意思,告诉我是什么语言就可以了,谢谢!

create   or   replace   package   G11ii   is

    procedure   startproc;
    procedure   startproc(ptCnt   varchar2);
    --G03各项资产减值损失准备情况表
    procedure   GetG11ii
    (
              ptBegDate       date,                       --期初日期
              ptEndDate       date,                       --期末日期
              ptBbq               varchar2
    );
   


end   G11ii;
/
create   or   replace   package   body   G11ii   is
    procedure   startproc
    is
       
    begin
              startproc( '5 ');
    end   startproc;
    procedure   startproc(ptCnt   varchar2)
    is
    tStartDate   date   ;
    tEndDate       date   ;
    sBbq               varchar2(8);
    begin
            --季报
            pubrptproc.GetRptDate(ptCnt,tStartDate,tEndDate,sBbq);
 
            GetG11ii(tStartDate,tEndDate,sBbq);
           
           
    end   startproc;

   
    procedure   GetG11ii
    (
              ptBegDate       date,                       --期初日期
              ptEndDate       date,                       --期末日期
              ptBbq               varchar2
    )
    is
 
   
    begin
              delete   from   a_rpt_g11_ii
              where   bbq=ptbbq
              and     startdate=ptBegDate
              and     enddate   =ptEndDate;
             
              --贷款
              insert   into   a_rpt_g11_ii  
              select   sysdate,ptbbq,ptBegDate,ptEndDate,
                            a.ccy_ccy_cde,