Du har et PL/SQL-program, og du vil logge oplysninger i en tekstfil for hvert trin i din kode. Her er et eksempel på at oprette en logfil i Oracle ved hjælp af PL/SQL.
Opret logfil i Oracle ved hjælp af PL/SQL-eksempel
Det følgende er en PL/SQL-procedure til opdatering af produktets pris med en procentværdi, der sendes som en parameter. Det vil også logge oplysningerne om hvert trin, der sker i programmet. Bemærk, du skal have et biblioteksobjekt oprettet i Oracle for at skrive filerne. Tjek dette link for at lære, hvordan du opretter et biblioteksobjekt i 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; Test programmet
BEGIN PROD_PRICE_UPDATE (12); END; /
Outputtet fra logfilen (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
Se også:
- Skriv CSV-filer i Oracle ved hjælp af PL/SQL