Dynamic procedure to output csv file

Question

Oracle Database 11g Enterprise Edition Release 11.1.0.6.0 - 64bit Production
PL/SQL Release 11.1.0.6.0 - Production
CORE     11.1.0.6.0     Production
TNS for Linux: Version 11.1.0.6.0 - Production
NLSRTL Version 11.1.0.6.0 - Production
I am trying to create a procedure to output a csv file, with the table name as input. I can get the field header out no problem, but am struggling with the data! Have looked at ref cursors, and dbms_sql, but am unsure which, if any, can be used for this?
This is what I have so far:
CREATE OR REPLACE PROCEDURE csv_extract_prc (in_table IN VARCHAR2)
AS
   CURSOR c1
   IS
        SELECT   column_name
          FROM   user_tab_columns
         WHERE   UPPER (table_name) = UPPER (in_table)
      ORDER BY   column_id;
   v_output   VARCHAR2 (4000);
   v_file     UTL_FILE.file_type;
BEGIN
   v_file :=
      UTL_FILE.fopen (location       => 'DATAPUMP',
                      filename       => in_table || '.csv',
                      open_mode      => 'w',
                      max_linesize   => 32767);
   FOR r1 IN c1
   LOOP
      v_output := v_output || r1.column_name || ';';
   END LOOP;
   UTL_FILE.put_line (v_file, v_output);
   UTL_FILE.fclose (v_file);
EXCEPTION
   WHEN OTHERS
   THEN
      DBMS_OUTPUT.put_line (SQLERRM);
      UTL_FILE.fclose (v_file);
END csv_extract_prc;
CREATE TABLE test_table (field1 VARCHAR2 (10), field2 NUMBER (10));
exec csv_extract_prc('test_table');Any pointers would be most welcome.

Answer 1

Or this
Re: how to make comma seperated file