How to Create a excel file from a table.

Question

i want to excel output from a oracle table.

Answer 1

Please use below one:
DECLARE
CURSOR C1
IS
SELECT DISTINCT JVH_LCM_LCTN_CODE FROM F_JV_HDR;
CURSOR C2 (V_LOC VARCHAR2)
IS
SELECT *
FROM
(SELECT *
FROM F_JV_HDR
WHERE JVH_JV_DATE <= '31-OCT-2011'
AND JVH_DSM_DCMNT_TYPE = 'SJV'
AND JVH_LCM_LCTN_CODE = V_LOC
ORDER BY JVH_JV_DATE DESC
WHERE ROWNUM <= 10
UNION ALL
SELECT *
FROM
(SELECT *
FROM F_JV_HDR
WHERE JVH_JV_DATE > '31-OCT-2011'
AND JVH_DSM_DCMNT_TYPE = 'SJV'
AND JVH_LCM_LCTN_CODE = V_LOC
ORDER BY JVH_JV_DATE
WHERE ROWNUM <= 10;
v_file utl_file.file_type;
linebuf VARCHAR2(32767);
BEGIN
v_file := utl_file.FOPEN('MAIL_OUTPUT','F_JV_HDR-SJV.csv','w') ;      --Change the CSV file name
LINEBUF := 'JVH_LCM_LCTN_CODE,JVH_DSM_DCMNT_TYPE,JVH_JV_TMPRY_NMBR,JVH_JV_TMPRY_DATE,JVH_SRCE_INDCTR,JVH_CRTD_DATE,JVH_CRTD_BY,JVH_ATHRSTN_STS,JVH_DSM_TRM_TR_CODE,JVH_DSM_DCMNT_SRS,JVH_LCM_LCTN_CODE_BOOK,JVH_ATHRSTN_RQRD_INDCTR,JVH_FNCL_CLSRE_INDCTR,JVH_TRNSCTN_WITH_INDCTR,JVH_TRNSCTNR_CODE,JVH_JV_NMBR,JVH_JV_DATE,JVH_RMRKS,JVH_JV_RVRSD_NMBR,JVH_CHQE_DUE_DATE,JVH_ATHRSD_DATE,JVH_ATHRSD_BY,JVH_TR_CODE_RVRSD,JVH_DCMNT_TYPE_RVRSD,JVH_JV_RVRSD_INDCTR,JVH_NJV_TAG,JVH_TYPE,JVH_AUTO_RVSL_INDCTR,JVH_AUTO_RVSL_DATE,JVH_BUS_BKS_UPLOAD';                --Chage the headings
utl_file.put_line(v_file,linebuf);
FOR I1 IN C1
LOOP
FOR I2 IN C2(I1.JVH_LCM_LCTN_CODE)                    --Change the cursor parameter
LOOP
LINEBUF := I2.JVH_LCM_LCTN_CODE||','||I2.JVH_DSM_DCMNT_TYPE||','||I2.JVH_JV_TMPRY_NMBR||','||I2.JVH_JV_TMPRY_DATE||','||I2.JVH_SRCE_INDCTR||','||I2.JVH_CRTD_DATE||','||I2.JVH_CRTD_BY||','||I2.JVH_ATHRSTN_STS||','||I2.JVH_DSM_TRM_TR_CODE||','||I2.JVH_DSM_DCMNT_SRS||','||I2.JVH_LCM_LCTN_CODE_BOOK||','||I2.JVH_ATHRSTN_RQRD_INDCTR||','||I2.JVH_FNCL_CLSRE_INDCTR||','||I2.JVH_TRNSCTN_WITH_INDCTR||','||I2.JVH_TRNSCTNR_CODE||','||I2.JVH_JV_NMBR||','||I2.JVH_JV_DATE||','||I2.JVH_RMRKS||','||I2.JVH_JV_RVRSD_NMBR||','||I2.JVH_CHQE_DUE_DATE||','||I2.JVH_ATHRSD_DATE||','||I2.JVH_ATHRSD_BY||','||I2.JVH_TR_CODE_RVRSD||','||I2.JVH_DCMNT_TYPE_RVRSD||','||I2.JVH_JV_RVRSD_INDCTR||','||I2.JVH_NJV_TAG||','||I2.JVH_TYPE||','||I2.JVH_AUTO_RVSL_INDCTR||','||I2.JVH_AUTO_RVSL_DATE||','||I2.JVH_BUS_BKS_UPLOAD; --Change the cursor values
utl_file.put_line(v_file,linebuf);
END LOOP;
END LOOP;
UTL_FILE.FCLOSE(V_FILE);
END;
/