批量更新表字段日期值的存储过程

以下代码由PHP站长网 52php.cn收集自互联网

现在PHP站长网小编把它分享给大家，仅供参考

/*
 *搜索数据库当前用户的所有表，查出所有含date和time名称，
 *并且是number(14)类型的字段的日期部分改为当前日期
 */
declare
  type tcur is ref cursor; --定义游标类型
  columnsCur   tcur;       --定义表的字段游标
  sTName       varchar(30);--存储表名
  sCName       varchar(30);--存储字段名
  nCurrentTime number(14); --存储当前日期
  updstr       varchar(900);
begin
  --获取当前日期YYYYMMDD
  select to_number(to_char(sysdate,'YYYYMMDD') || '000000')
    into nCurrentTime
    from dual;

  --从oracle系统表获取包含数字日期形式的字段名和对应的表名
  OPEN columnsCur for
    select p.TABLE_NAME,p.COLUMN_NAME
      from user_tab_columns p
     where p.TABLE_NAME IN ('OPENORDER','ORDERINSTRUCTION','INSTRUCTIONDETAIL','INTELLIGENTORDER','TRADINGRESULT')
       and p.DATA_TYPE = 'NUMBER' and p.DATA_PRECISION=14
       and (p.COLUMN_NAME like '%DATE%' or p.COLUMN_NAME like '%TIME%');

  --根据获得的表名和字段名把目前的时间更新为当前日期，时间保持不变
  loop
    fetch columnsCur
      into sTName,sCName;
    exit when columnsCur%notfound;
    begin
      --执行更新
      updstr := 'UPDATE ' || sTName || ' SET ' || sCName || '=' ||
                nCurrentTime || '+ to_number(nvl(substr(' || sCName ||
                ',9),0)) where ' || sCName || ' IS NOT NULL AND ' || sCName || '>0';
      --debug
      --dbms_output.put_line(updstr);
      execute immediate updstr;
    exception
      --如果发生错误，打印出执行的sql
      when others then
        dbms_output.put_line('Error:' || updstr);
    end;
    end loop;
  commit;
end;

以上内容由PHP站长网【52php.cn】收集整理供大家参考研究

如果以上内容对您有帮助，欢迎收藏、点赞、推荐、分享。

（编辑：南平站长网）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!