SET DEFINE ON VERIFY OFF FEEDBACK OFF PAGESIZE 0 TERMOUT OFF ECHO OFF

ALTER SESSION SET commit_wait = &1;

ALTER SESSION SET commit_logging = &2;

CREATE TABLE t (n NUMBER, pad VARCHAR2(1000));

SPOOL servprc.pid
SELECT p.spid
FROM v$process p, v$session s
WHERE p.addr = s.paddr
AND s.sid = sys_context('userenv','sid');
SPOOL OFF

execute dbms_lock.sleep(2)

DECLARE
  l_dummy INTEGER;
BEGIN
  FOR i IN 1..1000
  LOOP
    INSERT INTO t VALUES (i, rpad('*',100,'*'));
    COMMIT;
    SELECT count(*) INTO l_dummy FROM dual;
  END LOOP;
END;
/

DROP TABLE t PURGE;

EXIT
