create or replace procedure replace(desstr           in varchar2,

                                    replacestr       in varchar2,

                                    tablename        in varchar2,

                                    strgranularity   in varchar2,

                                    strorgankey      in varchar2,

                                    strstatisticdate in date) is

begin

  update t41_systemcal_upday t1

     set t1.calchar = replace(t1.calchar, desstr, replacestr)

   where t1.itemkey like tablename

     and t1.granularity = strgranularity

     and t1.statisticdate = strstatisticdate

     and t1.organkey = strorgankey;

end replace;