Hi Code seeker,
I am explaining, generate CSV file and insert CSV table using oracle database 11g.
Generate csv file and insert csv file.
CREATE OR REPLACE PROCEDURE EMP_CSV IS
V_FILE UTL_FILE.FILE_TYPE;
V_STRING VARCHAR2 (4000);
CURSOR C_EMP
IS
SELECT * FROM EMP;
BEGIN
--SET_APPLICATION_PROPERTY(CURSOR_STYLE,'BUSY');
V_FILE :=
UTL_FILE.FOPEN ('EXCEL_DATA','emp'||TO_CHAR(SYSDATE,'ddmmyyyhh24miss')||'.csv','w',4000);
V_STRING := 'EMPNO,ENAME,JOB,MGR,HIREDATE,SAL,COMM,DEPTNO';
UTL_FILE.PUT_LINE (V_FILE, V_STRING);
FOR CUR IN C_EMP
LOOP
V_STRING :=
CUR.EMPNO|| ','|| CUR.ENAME|| ','|| CUR.JOB|| ','|| CUR.MGR|| ','|| CUR.HIREDATE|| ','||CUR.SAL|| ','|| CUR.COMM|| ','|| CUR.DEPTNO;
UTL_FILE.PUT_LINE (V_FILE, V_STRING);
END LOOP;
UTL_FILE.FCLOSE (V_FILE);
--SET_APPLICATION_PROPERTY(CURSOR_STYLE,'DEFAULT');
END;
I am explaining, generate CSV file and insert CSV table using oracle database 11g.
Generate csv file and insert csv file.
CREATE OR REPLACE PROCEDURE EMP_CSV IS
V_FILE UTL_FILE.FILE_TYPE;
V_STRING VARCHAR2 (4000);
CURSOR C_EMP
IS
SELECT * FROM EMP;
BEGIN
--SET_APPLICATION_PROPERTY(CURSOR_STYLE,'BUSY');
V_FILE :=
UTL_FILE.FOPEN ('EXCEL_DATA','emp'||TO_CHAR(SYSDATE,'ddmmyyyhh24miss')||'.csv','w',4000);
V_STRING := 'EMPNO,ENAME,JOB,MGR,HIREDATE,SAL,COMM,DEPTNO';
UTL_FILE.PUT_LINE (V_FILE, V_STRING);
FOR CUR IN C_EMP
LOOP
V_STRING :=
CUR.EMPNO|| ','|| CUR.ENAME|| ','|| CUR.JOB|| ','|| CUR.MGR|| ','|| CUR.HIREDATE|| ','||CUR.SAL|| ','|| CUR.COMM|| ','|| CUR.DEPTNO;
UTL_FILE.PUT_LINE (V_FILE, V_STRING);
END LOOP;
UTL_FILE.FCLOSE (V_FILE);
--SET_APPLICATION_PROPERTY(CURSOR_STYLE,'DEFAULT');
END;
No comments:
Post a Comment