5.48.txt

delphi renyuanguanlixinxioxitong

CREATE OR REPLACE PROCEDURE grant_sys_priv(priv VARCHAR2,username VARCHAR2)
IS sql_stat VARCHAR2(100);
BEGIN
  sql_stat:=' grant '||priv||' to '||username;
EXECUTE IMMEDIATE sql_stat;
END;