How to write to csv file - Whats wrong with this???

Question

Hi ALL,
I created a view that does all sorts of calculations, now I need to write the output in csv file. How do I do this thru a procedure? Sorry I've never had to create a csv file before and this is my first time.
Thanks!
Edited by: user5737516 on Nov 18, 2009 9:47 AM

Answer 1

What is wrong with this?? Am I supposed to do something else before I could run this?
CREATE OR REPLACE DIRECTORY PAYROLL as 'c:\';
Directory created.
grant read, write on directory PAYROLL to my_user;
Grant succeeded.
CREATE OR REPLACE PROCEDURE baninst1.PAY_CSV(p_year NUMBER, p_qtr NUMBER) AS
  CURSOR c_data IS
    SELECT pay_period,
           pay_group,
           p_qtr,
           check_date,
           SUM(soc_sec_gross) as SOC_SEC_GROSS,
           SUM(medicare_gross) as MEDICARE_GROSS,
           SUM(TOTAL_DEDUCTIONS) as Total_Deductions,
           SUM(NET_PAY) as Net_Pay
    FROM   baninst1.pzvdedn
    WHERE  pay_year = p_year
    AND        p_qtr = p_qtr
    GROUP BY pay_period, pay_group, check_date, pay_qtr
    ORDER BY pay_period, pay_group, check_date, pay_qtr;
  v_file  UTL_FILE.FILE_TYPE;
BEGIN
  v_file := UTL_FILE.FOPEN('PAYROLL',
                           'pay_csv.csv',
                           'w',
                           max_linesize => 32767);
  FOR cur_rec IN c_data LOOP
    UTL_FILE.PUT_LINE(v_file,
                      cur_rec.pay_period    || ',' ||
                      cur_rec.pay_group    || ',' ||
                      cur_rec.check_date     || ',' ||
                      cur_rec.soc_sec_gross      || ',' ||
                      cur_rec.medicare_gross || ',' ||
                      cur_rec.total_deductions    || ',' ||
                      cur_rec.net_pay);
  END LOOP;
  UTL_FILE.FCLOSE(v_file);
EXCEPTION
  WHEN OTHERS THEN
    UTL_FILE.FCLOSE(v_file);
END;
Procedure created.
SQL> exec baninst1.PAY_CSV(2009,1);
BEGIN baninst1.PAY_CSV(2009,1); END;
ERROR at line 1:
ORA-20003: File could not be opened or operated on as requested.
ORA-06512: at "BANINST1.PAY_CSV", line 45
ORA-06512: at line 1Edited by: user5737516 on Nov 18, 2009 9:16 AM
Edited by: user5737516 on Nov 18, 2009 9:18 AM
Edited by: user5737516 on Nov 18, 2009 9:20 AM
Edited by: user5737516 on Nov 18, 2009 9:35 AM