plsql调试存储过程（导出CSV）时报目录路径无效

Question

create or replace procedure outtocsv(P_QUERY IN VARCHAR2,P_DIR IN VARCHAR2,P_FILENAME IN VARCHAR2)
is
     L_OUTPUT UTL_FILE.FILE_TYPE;
     L_THECURSOR INTEGER DEFAULT DBMS_SQL.OPEN_CURSOR;
     L_COLUMNVALUE VARCHAR2(4000);
     L_STATUS INTEGER;
     L_COLCNT NUMBER := 0;
     L_SEPARATOR VARCHAR2(1);
     L_DESCTBL DBMS_SQL.DESC_TAB;
     P_MAX_LINESIZE NUMBER := 32000;
begin
  --OPEN FILE
        L_OUTPUT := UTL_FILE.FOPEN(P_DIR, P_FILENAME, 'W', P_MAX_LINESIZE);        --DEFINE DATE FORMAT
        EXECUTE IMMEDIATE 'ALTER SESSION SET NLS_DATE_FORMAT=''YYYY-MM-DD HH24:MI:SS''';        --OPEN CURSOR
        DBMS_SQL.PARSE( L_THECURSOR, P_QUERY, DBMS_SQL.NATIVE );
        DBMS_SQL.DESCRIBE_COLUMNS( L_THECURSOR, L_COLCNT, L_DESCTBL );        --DUMP TABLE COLUMN NAME
        FOR I IN 1 .. L_COLCNT LOOP
            UTL_FILE.PUT( L_OUTPUT, L_SEPARATOR || '"' || L_DESCTBL(I).COL_NAME || '"' );
            DBMS_SQL.DEFINE_COLUMN( L_THECURSOR, I, L_COLUMNVALUE, 4000 );
            L_SEPARATOR := ',';
        END LOOP;
        UTL_FILE.NEW_LINE( L_OUTPUT );        --EXECUTE THE QUERY STATEMENT
        --L_STATUS := DBMS_SQL.EXECUTE(L_THECURSOR);        --DUMP TABLE COLUMN VALUE
        WHILE ( DBMS_SQL.FETCH_ROWS(L_THECURSOR) > 0 ) LOOP
            L_SEPARATOR := '';
            FOR I IN 1 .. L_COLCNT LOOP
                DBMS_SQL.COLUMN_VALUE( L_THECURSOR, I, L_COLUMNVALUE );
                UTL_FILE.PUT( L_OUTPUT, L_SEPARATOR || '"' || 
                TRIM(BOTH ' ' FROM REPLACE(L_COLUMNVALUE,'"','""')) || '"');
                L_SEPARATOR := ',';
            END LOOP;
            UTL_FILE.NEW_LINE( L_OUTPUT );
        END LOOP;        --CLOSE CURSOR
        DBMS_SQL.CLOSE_CURSOR(L_THECURSOR);        --CLOSE FILE
        UTL_FILE.FCLOSE( L_OUTPUT );
    EXCEPTION
        WHEN OTHERS THEN
        RAISE;
end outtocsv;
点击test菜单调试时，三个参数分别输入：p_query: select titleid,name,creator,createtime,filename from title
         where createtime >= trunc(sysdate)-20 and  createtime <= trunc(sysdate)p_dir:  E:/TESTp_filename: test执行后，提示：
ORA-29280 目录路径无效
ORA-06512 在"MCDBA.OUTTOCSV",line 51
ORA-06512 在line 3要怎么调试才能通过呢？

Answer 1

我现在在服务器端使用 sql plus运行
create or replace directory MYDIR as 'D:\oracle\product\10.2.0\admin\qztv\scripts\';
declare fhandle utl_file.file_type; begin    SQL_TO_CSV('select * from mcdba.titles where createtime >= trunc(sysdate)-15 ','MYDIR','example.csv'); end;
/这次不会报路径无效了，但是提示上面的那个存储过程“违反提取顺序”晕了

Answer 2

2楼贴的代码里的存储过程SQL_TO_CSV其实就是我楼顶代码里的outtocsv，笔误