oracle快速循环插入数据
最近在做测试时,遇到有翻页功能每页记录数为500的情况,并且记录是有很多张表关联起来的。如果一条一条的插记录,那显然是不现实的。那么我们可以采取什么比较好的方法来进行测试呢?答案肯定是有的。
下面就介绍两种比较常用的方法:
一:最简单有效的方法。修改程序中的分页记录数,如将分页记录数改小,那样就可以很容易的插入数据进行测试,测试压力也会骤降。
例如:可以将以下代码中的ac_page_record_cnt改为2,那样造数据测试的时间就会很少了。
PROCEDURE p_query_typelist(
ar_cur OUT NOCOPY ref_data,
ac_page_record_cnt OUT VARCHAR2,--页记录数
ai_dm OUT NUMBER,
ac_sm OUT VARCHAR2) IS
BEGIN
OPEN ar_cur FOR
SELECT '01' VALUE, '用户编号' NAME
FROM dual
UNION ALL
SELECT '02' VALUE, '抄表段' NAME
FROM dual
UNION ALL
SELECT '03' VALUE, '抄表员' NAME
FROM dual;
ac_page_record_cnt :='500';
ai_dm :=1;
ac_sm :='OK';
EXCEPTION
WHEN OTHERS THEN
BEGIN
ai_dm :=-1;
ac_sm := pkg_sp_msg.f_msg('errors.general', '查询异常,详细原因为{0}', SQLERRM);
END;
END;
ac_page_record_cnt OUT VARCHAR2,--页记录数
ai_dm OUT NUMBER,
ac_sm OUT VARCHAR2) IS
BEGIN
OPEN ar_cur FOR
SELECT '01' VALUE, '用户编号' NAME
FROM dual
UNION ALL
SELECT '02' VALUE, '抄表段' NAME
FROM dual
UNION ALL
SELECT '03' VALUE, '抄表员' NAME
FROM dual;
ac_page_record_cnt :='500';
ai_dm :=1;
ac_sm :='OK';
EXCEPTION
WHEN OTHERS THEN
BEGIN
ai_dm :=-1;
ac_sm := pkg_sp_msg.f_msg('errors.general', '查询异常,详细原因为{0}', SQLERRM);
END;
END;
二:有的情况下是不允许修改源程序来进行测试的,那么大的数据量该怎么办呢? 这里提供一种简单有效的方法,利用循环快速的向oracle表中插入数据。下面建一个测试表,作为实验实验。
--若存在rfid_fixed_heart表,则删除
begin
execute immediate 'drop table rfid_fixed_heart';
exception when others then
null;
end;
execute immediate 'drop table rfid_fixed_heart';
exception when others then
null;
end;
-- 创建rfid_fixed_heart表
CREATE TABLE rfid_fixed_heart
( input_date date,
heart_active VARCHAR2(2)
);
( input_date date,
heart_active VARCHAR2(2)
);
--使用循环快速向oracle表中插入数据
declare
i NUMBER;
begin
for i in4..100 loop
INSERT INTO rfid_fixed_heart VALUES(SYSDATE+i,i);
end LOOP;
END;
i NUMBER;
begin
for i in4..100 loop
INSERT INTO rfid_fixed_heart VALUES(SYSDATE+i,i);
end LOOP;
END;
专注于自动化、性能研究,博客为原创,转载请注明文章来源于:http://www.cnblogs.com/Automation_software/ 只求在IT界有一个清闲的世界让我静心的去专研,不求功名利禄,只为心中的那份成就感及自我成长、自我实现的快感。
posted on 2011-04-04 14:55 dfine.sqa 阅读(28681) 评论(0) 编辑 收藏 举报