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

¿Cómo crear un archivo de registro en Oracle usando PL/SQL?

Tiene un programa PL/SQL y desea registrar información en un archivo de texto de cada paso de su código. Aquí hay un ejemplo para crear un archivo de registro en Oracle usando PL/SQL.

Crear archivo de registro en Oracle utilizando el ejemplo PL/SQL

El siguiente es un procedimiento PL/SQL para actualizar el precio del producto por un valor porcentual pasado como parámetro. Además, registrará la información de cada paso que sucede en el programa. Tenga en cuenta que debe tener un objeto de directorio creado en Oracle para escribir los archivos, consulte este enlace para aprender cómo crear un objeto de directorio en Oracle.

CREATE OR REPLACE PROCEDURE prod_price_update (increase_pct IN NUMBER)
IS
   f_file        UTL_FILE.file_type;
   v_file_name   VARCHAR2 (100);
BEGIN
   v_file_name := 'log_' || TO_CHAR (SYSDATE, 'yyyymmdd_HH24miss') || '.log';
   f_file := UTL_FILE.fopen ('LOG_FILES', v_file_name, 'w');
   UTL_FILE.put_line (f_file, 'Log file ' || v_file_name);
   UTL_FILE.new_line (f_file);
   UTL_FILE.put_line (
      f_file,
      'Job started at: ' || TO_CHAR (SYSDATE, 'dd-mm-yyyy HH24:mi:ss'));
   UTL_FILE.put_line (
      f_file,
      'Price increment percentage value: ' || increase_pct || '%');

   UPDATE products
      SET prod_list_price =
             prod_list_price + (prod_list_price * increase_pct / 100);

   UTL_FILE.put_line (f_file,
                      'Number of products updated:  ' || SQL%ROWCOUNT);

   COMMIT;
   UTL_FILE.put_line (f_file, 'Records committed.');
   UTL_FILE.put_line (
      f_file,
      'Job finished successfully at: '
      || TO_CHAR (SYSDATE, 'dd-mm-yyyy HH24:mi:ss'));
   UTL_FILE.fclose (f_file);
EXCEPTION
   WHEN OTHERS
   THEN
      IF UTL_FILE.is_open (f_file)
      THEN
         UTL_FILE.put_line (f_file, 'Job finished with errors: ' || SQLERRM);
         UTL_FILE.fclose (f_file);
      END IF;
END;

Probar el programa

BEGIN
   PROD_PRICE_UPDATE (12);
END;
/

La salida del archivo de registro (log_20180919_214756.log)

Log file log_20180919_214756.log

Job started at: 19-09-2018 21:47:56
Price increment percentage value: 12%
Number of products updated:  72
Records committed.
Job finished successfully at: 19-09-2018 21:47:57

Ver también:

  • Escribir archivos CSV en Oracle usando PL/SQL