5.47.txt

来自「delphi renyuanguanlixinxioxitong」· 文本 代码 · 共 9 行

CREATE OR REPLACE PROCEDURE drop_table(table_name VARCHAR2)
IS sql_statement VARCHAR2(100);
BEGIN
  sql_statement:=' DROP TABLE '||table_name;
  EXECUTE IMMEDIATE sql_statement;
END;