Du har ett PL/SQL-program och du vill logga information i en textfil för varje steg i din kod. Här är ett exempel för att skapa en loggfil i Oracle med PL/SQL.
Skapa loggfil i Oracle med PL/SQL-exempel
Följande är en PL/SQL-procedur för att uppdatera produktens pris med ett procentvärde som skickas som en parameter. Det kommer också att logga informationen om varje steg som sker i programmet. Observera att du måste ha ett katalogobjekt skapat i Oracle för att kunna skriva filerna, kolla den här länken för att lära dig hur du skapar ett katalogobjekt 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; Testa programmet
BEGIN PROD_PRICE_UPDATE (12); END; /
Utdata från loggfilen (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 även:
- Skriv CSV-filer i Oracle med PL/SQL