从长途Oracle处事器上同步复制数据到当地备份库
发布时间:2021-01-10 06:24:02 所属栏目:编程 来源:网络整理
导读:本日PHP站长网 52php.cn把网络自互联网的代码分享给各人,仅供参考。 create or replace PROCEDURE "SYNC_DATA_FROM_DBLINK_DB" ASBEGIN DECLARE CURSOR c_TabNames IS SELECT TNAME FROM TAB; v_TabName c_TabNames%ROWT
以下代码由PHP站长网 52php.cn网络自互联网 此刻PHP站长网小编把它分享给各人,仅供参考 create or replace PROCEDURE "SYNC_DATA_FROM_DBLINK_DB" AS BEGIN DECLARE CURSOR c_TabNames IS SELECT TNAME FROM TAB; v_TabName c_TabNames%ROWTYPE; v_SQL VARCHAR2(500); v_rowcount NUMBER; v_rc NUMBER:=0; v_tab NUMBER :=0; BEGIN Dbms_Output.put_line(to_char(SYSDATE,'yy-mm-dd hh24:mi:ss')||' 开始从长途的TEST2实例导入表.'); FOR v_TabName in c_TabNames LOOP v_SQL := 'DELETE '||v_TabName.TNAME; EXECUTE IMMEDIATE v_sql; v_sql := 'INSERT INTO '|| v_tabname.TNAME||' SELECT * FROM '|| v_tabname.TNAME||'@TEST2'; EXECUTE IMMEDIATE v_sql; COMMIT; v_SQL :='SELECT COUNT(*) FROM '|| v_tabname.TNAME; EXECUTE IMMEDIATE v_sql INTO v_rowcount; v_tab := v_tab +1; v_rc := v_rc + v_rowcount; END LOOP; Dbms_Output.put_line(to_char(SYSDATE,'yy-mm-dd hh24:mi:ss')||' 导入完成,共导入表'||to_char(v_tab)||'张,总记录数'||to_char(v_rc)||'笔记录。'); END; END SYNC_DATA_FROM_DBLINK_DB; 以上内容由PHP站长网【52php.cn】网络清算供各人参考研究 假如以上内容对您有辅佐,接待保藏、点赞、保举、分享。 (编辑:湖南网) 【声明】本站内容均来自网络,其相关言论仅代表作者个人观点,不代表本站立场。若无意侵犯到您的权利,请及时与联系站长删除相关内容! |