/************************************************************
** Table: SYS.T_PARTITION_RANGE
** Number of Records: 10000
************************************************************/
DECLARE
t_seed NUMBER(20);
BEGIN
-- Initialize Random Number Generator
SELECT TO_NUMBER(TO_CHAR(SYSDATE, 'MMDDHH24MISS'))
INTO t_seed
FROM Dual;
DBMS_RANDOM.INITIALIZE(t_seed);
-- Generate Random Data
FOR t_counter IN 1..10000 LOOP
INSERT INTO "SYS"."T_PARTITION_RANGE" (
"ID", "NAME"
) VALUES (
DBMS_RANDOM.VALUE(0.00, 2147483647.00), DBMS_RANDOM.STRING('A', DBMS_RANDOM.VALUE(1, 50))
);
END LOOP;
DBMS_RANDOM.TERMINATE;
END;
/
COMMIT;
/
大家比较常用的是使用DBMS_RANDOM.RANDOM来生成数,这里我们介绍一下使用DBMS_RANDOM包中的STRING函数来生成随机的功能。1.使用desc可以查看DBMS_RANDOM.STRING参数说明sec@asd> desc DBMS_RANDOM……省略……FUNCTION STRING RETURNS VARCHAR2Argument Name Type In/Out Default?------------------------------ ----------------------- ------ --------OPT CHAR INLEN NUMBER IN……省略……DBMS_RANDOM.STRING函数需要的两个参数是OPT和LEN。OPT参数取值内容如下:'u','U' - 大写字母'l','L' - 小写字母'a','A' - 大、小写字母'x','X' - 数字、大写字母'p','P' - 可打印字符LEN参数指定生成字符串的长度。2.分别演示一下生成随机字符串的例子1)生成长度为10的由大写字母构成的字符串sec@ora10g> col string for a15sec@ora10g> select DBMS_RANDOM.STRING('u',10) string from dual;STRING---------------DXOMOOCHASsec@ora10g> select DBMS_RANDOM.STRING('U',10) string from dual;STRING---------------XTPMXMRLCS2)生成长度为10的由小写字母构成的字符串sec@ora10g> select DBMS_RANDOM.STRING('l',10) string from dual;STRING---------------vrekvponuesec@ora10g> select DBMS_RANDOM.STRING('L',10) string from dual;STRING---------------rlfhmatweg3)生成长度为10的由大写字符和小写字母共同构成的字符串sec@ora10g> select DBMS_RANDOM.STRING('a',10) string from dual;STRING---------------fWJvpnEerIsec@ora10g> select DBMS_RANDOM.STRING('A',10) string from dual;STRING---------------FgdvvzZGAS4)生成长度为10的由数字和大写字母共同构成的字符串sec@ora10g> select DBMS_RANDOM.STRING('x',10) string from dual;STRING---------------RRQ80CSDC2sec@ora10g> select DBMS_RANDOM.STRING('X',10) string from dual;STRING---------------Q9V9MMF9ZO5)生成长度为10的由数字和大写字母共同可打印字符构成的字符串sec@ora10g> select DBMS_RANDOM.STRING('p',10) string from dual;STRING---------------p/u}}7s`5vsec@ora10g> select DBMS_RANDOM.STRING('P',10) string from dual;STRING---------------i8(pF2FFC9