最近在做测试时,遇到有翻页功能每页记录数为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 in 4 .. 100 loop
INSERT INTO rfid_fixed_heart VALUES(SYSDATE + i,i);
end LOOP;
END;
i NUMBER;
begin
for i in 4 .. 100 loop
INSERT INTO rfid_fixed_heart VALUES(SYSDATE + i,i);
end LOOP;
END;