转：oracleorahome92agent服务启动异常

     oracle存储过程，实现查询相同结构的表数据，按日期进行添加，若表中某日的数据已存在则将此条数据删除并添加以此数据id为键的新的数据。

 

  基本结构：

  create or replace procedure DATAANALYSIS_DAY_proc (dqbm in varchar2, strTime in varchar2) is

  type cur is ref cursor; --定义游标

  TABLE_CUR cur;  -- 游标别称

  tabel_name_count number; --定义number数据类型

  isXExsite number; -- 定义number数据类型

 BEGIN ----1

     Open TABLE_CUR for  -- 打开游标

           'select count(table_name) from user_tables table_name like '''||UPPER(dqBM)||'HISTORY%' ';

     FETCH TABLE_CUR INTO table_name_count; --将游标中的值赋给table_name_count变量。

     CLOSE TABLE_CUR; --关闭游标

  if table_name_count > 0 --判断表是否已存在

    then

        begin ----2

          for i in 1..table_name_count -- 定义循环

             LOOP

              ---使用游标获取数据

               Open TABLE_CUR for  -- 打开游标

                 'select count(*) from '||dqBM||'analysis'||i||' where id like '''||strTime||'%''';

               FETCH TABLE_CUR INTO isExite; --将游标中的值赋给table_name_count变量。

               CLOSE TABLE_CUR; --关闭游标

               if isExite > 0

                  then  --if后必须跟then

                  begin  --- 3

                     --执行sql语句
                     execute immediate 'delete from  '||dqBM||'analysis'||i||'  where id like '''||strTime||'%''';
                     commit; --提交

                     DBMS_OUTPUT.put_line(strTime||'数据已删除！');  --输出测试语句

                     execute immediate 'insert into analysis'||i||' (select '||strTime||'2, field1,......,field900 from history1 where id like '''||strTime||'%'')  ';

                     commit;--提交

                   end；---3

             else

                   begin --- 4

                       execute immediate 'insert into analysis'||i||' (select '||strTime||'2, field1,......,field900 from history1 where id like '''||strTime||'%'')  ';

                   end; ----4

             end if;

             END LOOP;

        end; -----2

END;  ----1

 

OK,一个简单的存储过程基本完成，敬请拍砖！