DBMS输出正常，但是没有结果

Question

存储过程按日期来新建一个表，并删除之前的数据，编译通过，存储过程测试的DBMS也有语句输出，但是表没有新增。create or replace procedure P_ZT_CREATE_102 asv_crdate varchar2(20);
v_dedate varchar2(20);
v_sql varchar2(4000);
v_table1 varchar2(20);
v_table2 varchar2(20);begin
  v_crdate:=substr(to_char((sysdate),'yyyymmdd'),3);
  v_dedate:=substr(to_char((sysdate -5),'yyyymmdd'),3);
  v_table1 := 'order_list_'||v_crdate;
  v_table2 := 'order_list_'||v_dedate;
  
 v_sql :='create table '|| v_table1|| ' as select * from order_list';
  dbms_output.put_line(v_sql);
  
  v_sql := 'drop table '||v_table2;
  dbms_output.put_line(v_sql);
   
  EXCEPTION
  WHEN OTHERS THEN
    DBMS_OUTPUT.PUT_LINE('创建不成功');
    
    
end P_ZT_CREATE_102;

Answer 1

你没有commit提交，怎么会新增?

Answer 2

你没有执行建表语句。dbms_output.put_line(v_sql);
execute immediate v_sql;  -- 加上这句。

Answer 3

v_sql :='create table '|| v_table1|| ' as select * from order_list';
  dbms_output.put_line(v_sql);
你只是打印，你的v_sql就木有执行（immediate）哇