在oracle 10g的自定义function中，如何动态创建表空间，用户等~~~

在oracle 10g的自定义function中，如何动态创建表空间，用户等。

CREATE OR REPLACE FUNCTION preg_regaudit (
p_companyid IN VARCHAR,
p_userid IN VARCHAR, --操作人员编码
errmsg OUT VARCHAR --返回的错误信息
)
RETURN NUMBER
IS
....
类似的代码如上，原理是通过传入的参数p_companyid去读某公司的信息，并因此为该公司生成相应的表空间，用户及密码，
求具体的可运行的代码。(不能是pl/sql的代码)

求可运行代码...

[code="sql"]
CREATE OR REPLACE FUNCTION preg_regaudit (
p_companyid IN VARCHAR,
p_userid IN VARCHAR,
errmsg OUT VARCHAR
)
RETURN NUMBER
IS
v_sql VARCHAR2(200);
space_name VARCHAR2(50);
user_name VARCHAR2(50);
pass_word VARCHAR2(50);
BEGIN
space_name := 'TESTDATA3';
user_name := 'test3';
pass_word := 'test3';

v_sql := 'CREATE TABLESPACE ' || space_name || ' DATAFILE ' || '''' || space_name || '.DBF''' || ' SIZE 32M';
EXECUTE IMMEDIATE v_sql;
v_sql := 'CREATE USER ' || user_name || ' IDENTIFIED BY ' || pass_word ||' DEFAULT TABLESPACE ' || space_name;
EXECUTE IMMEDIATE v_sql;

RETURN 0;

END;
[/code]
运行代码之前，要设定执行function用户的权限，代码如下：
[code="sql"]
GRANT CREATE USER TO user1

GRANT CREATE TABLESPACE TO user1
[/code]