java生成csv文件上传ftp_每小时生成csv文件，并ftp到远端服务器

CREATE OR REPLACE procedure PULSEINP.dump_csv(

p_separator in varchar2

default ','

)

is

l_conn  UTL_TCP.connection;

l_output        utl_file.file_type;

l_theCursor     integer default dbms_sql.open_cursor;

l_columnValue   varchar2(2000);

l_status        integer;

l_colCnt        number default 0;

l_separator     varchar2(10) default ',';

p_filename   varchar2(50) ;

l_cnt           number default 0;

p_query    varchar2(5000);

begin

p_filename := 'CMN_TDRDAILY'||to_char(sysdate-(1/24), 'HH24')||'.CSV';

l_output := utl_file.fopen( 'UTL_FILE_DIR', p_filename, 'w' );

p_query :='select REQUEST_TYPE,CALLSTARTTIME,ANI,DNIS,ROUTE1LABEL,ANI,LRN,DIALCODE,ANI FROM CMN_TDRDAILY'||to_char(sysdate-(1/24), 'HH24');

DB