CREATE TABLE trans
(
trans_id number,
cust_name varchar2 (20),
trans_dt date,
trans_amt number (12, 2),
store_id number (2)
);
(
trans_id number,
cust_name varchar2 (20),
trans_dt date,
trans_amt number (12, 2),
store_id number (2)
);
CREATE SEQUENCE TRANS_ID_SEQ
START WITH 1
MAXVALUE 9999999999999999999999999999
MINVALUE 1
NOCYCLE
NOCACHE
NOORDER;
START WITH 1
MAXVALUE 9999999999999999999999999999
MINVALUE 1
NOCYCLE
NOCACHE
NOORDER;
DECLARE
l_stmt varchar2 (2000);
BEGIN
FOR ctr IN 1 .. 1000
LOOP
l_stmt :=
'insert into trans values ('
|| trans_id_seq.NEXTVAL
|| ','
|| ''''
|| DBMS_RANDOM.string ('U', 20)
|| ''','
|| 'sysdate - '
|| ROUND (DBMS_RANDOM.VALUE (1, 365))
|| ','
|| ROUND (DBMS_RANDOM.VALUE (1, 99999999), 2)
|| ','
|| ROUND (DBMS_RANDOM.VALUE (1, 99))
|| ')';
DBMS_OUTPUT.put_line (l_stmt);
l_stmt varchar2 (2000);
BEGIN
FOR ctr IN 1 .. 1000
LOOP
l_stmt :=
'insert into trans values ('
|| trans_id_seq.NEXTVAL
|| ','
|| ''''
|| DBMS_RANDOM.string ('U', 20)
|| ''','
|| 'sysdate - '
|| ROUND (DBMS_RANDOM.VALUE (1, 365))
|| ','
|| ROUND (DBMS_RANDOM.VALUE (1, 99999999), 2)
|| ','
|| ROUND (DBMS_RANDOM.VALUE (1, 99))
|| ')';
DBMS_OUTPUT.put_line (l_stmt);
EXECUTE IMMEDIATE l_stmt;
COMMIT;
END LOOP;
END;
END LOOP;
END;
来自 “ ITPUB博客 ” ,链接:http://blog.itpub.net/16348200/viewspace-625397/,如需转载,请注明出处,否则将追究法律责任。
转载于:http://blog.itpub.net/16348200/viewspace-625397/