17,086
社区成员
发帖
与我相关
我的任务
分享
create or replace procedure do_loop (p_type in varchar2) as
l_start NUMBER;
l_loops NUMBER := 10000;
BEGIN
l_start := DBMS_UTILITY.get_time;
FOR i IN 1 .. l_loops LOOP
INSERT INTO commit_test (id, description)
VALUES (seq_commit_test.nextval, 'Description for ' || i);
commit;
END LOOP;
DBMS_OUTPUT.put_line(RPAD('COMMIT WRITE ' || p_type, 30) || ': ' || (DBMS_UTILITY.get_time - l_start));
END;
/