sql >> Base de Datos >  >> RDS >> Oracle

cómo exportar la salida en un formato CSV a través de un procedimiento

Puede usar el paquete UTL_FILE para escribir en un archivo plano, este archivo se generará en el servidor de base de datos.

Requisitos previos para usar UTL_FILE:

una. Cree un objeto de directorio que apunte a una ubicación física en la base de datos.b. Asegúrese de que el usuario/esquema que está utilizando tenga acceso de lectura/escritura a esta ubicaciónc. Asegúrese de que UTL_FILE esté instalado en la base de datos (ejecute utl_file como SYS) y otorgue la ejecución en UTL_FILE a la cuenta que está utilizando.

Pseudocódigo para UTL_FILE:

DECLARE
  view_name VARCHAR2 (200);
  v_str     VARCHAR2 (1000);
  v_output  VARCHAR2 (4000);
  CURSOR tbl IS
    SELECT   view_name
    FROM     all_views
    WHERE    owner = Sys_context ('USERENV', 'CURRENT_SCHEMA')
    ORDER BY 1;

l_filehandle utl_file.file_type%TYPE; --Create a Variable with  Filetype record
BEGIN
  l_filehandle := utl_file.fopen(<directory_object>, <filename>, 'W'); --Call to open the file for Write Operation
  OPEN tbl;
  LOOP
    FETCH tbl
    INTO  view_name;

    EXIT
  WHEN tbl%NOTFOUND;
    v_str := 'Select '
    || view_name
    || ',  count (*) from '
    ||view_name;
    EXECUTE IMMEDIATE v_str INTO v_output;
    utl_file.Put_line(l_filehandle,v_output); --Actual Writing of line infile
  END LOOP;
  CLOSE tbl;
  utl_file.Fclose(l_filehandle);
END;

Espero que esto ayude