使用Oracle存储过程批量生成测试数据

最新推荐文章于 2023-05-21 15:06:50 发布

过路人「借过」

最新推荐文章于 2023-05-21 15:06:50 发布

阅读量648

点赞数

分类专栏：数据处理基础文章标签：数据库架构数据库开发

原文链接：https://my.oschina.net/Tsybius2014/blog/693046

版权

数据处理基础专栏收录该内容

14 篇文章 0 订阅

订阅专栏

CREATE OR REPLACE PROCEDURE gen_player_info_for_test(
       p_player_name       VARCHAR2,      -- 玩家名称
       p_gen_count         NUMBER,        -- 生成条目数
       p_error_no          OUT NUMBER,    -- 错误号
       p_error_info        OUT VARCHAR2,  -- 错误提示
       p_error_id          OUT NUMBER,    -- 错误序号
       p_error_sysinfo     OUT VARCHAR2   -- 系统错误信息
       ) AS

  p_curr_value NUMBER := 0;
  p_end_value NUMBER := 0;

BEGIN
  dbms_output.put_line('----------- PROCUDURE START -----------');

  p_curr_value := 0;
  p_end_value := p_gen_count;
  WHILE p_curr_value < p_end_value
  LOOP
      p_curr_value := p_curr_value + 1;

      INSERT INTO player_info
          (player_id,
           player_name,
           oper_mark)
      VALUES
          (seq_player_info.nextval,
           p_player_name,
           60 + abs(mod(dbms_random.random, 40)));

  END LOOP;

  dbms_output.put_line('----------- PROCUDURE END -----------');
  p_error_no      := 0;
  p_error_info    := 'EXECUTE SUCCESS';
  p_error_id      := SQLCODE;
  p_error_sysinfo := SQLERRM;
EXCEPTION
  WHEN OTHERS THEN
    p_error_no      := 999;
    p_error_info    := '存储过程执行错误';
    p_error_id      := SQLCODE;
    p_error_sysinfo := SQLERRM;
END gen_player_info_for_test;

使用Oracle存储过程批量生成测试数据：https://my.oschina.net/Tsybius2014/blog/693046