From 877ea380e4dd5dead277662947864ce750cff1ee Mon Sep 17 00:00:00 2001 From: "Simon C. Kessler" Date: Thu, 9 Apr 2026 11:36:47 +0200 Subject: [PATCH] =?UTF-8?q?logging=20in=20net=5Fstorage=20package=20hinzug?= =?UTF-8?q?ef=C3=BCgt?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- database/packages/pck_auto_import.pkb | 12 ++++---- database/packages/pck_net_storage.pkb | 44 +++++++++++++++++++++++++++ database/tables/lg_app_log.tab | 6 ++-- 3 files changed, 53 insertions(+), 9 deletions(-) diff --git a/database/packages/pck_auto_import.pkb b/database/packages/pck_auto_import.pkb index 2c48105..83acc7a 100644 --- a/database/packages/pck_auto_import.pkb +++ b/database/packages/pck_auto_import.pkb @@ -1,6 +1,6 @@ create or replace package body pck_auto_import as - c_module constant varchar2(20) := 'PCK_AUTO_IMPORT'; + c_log_module constant lg_app_log.log_module%type := 'AUTOMATISCHER_BA_IMPORT'; procedure p_import_ba_korrespondenz ( i_object_key in varchar2 @@ -43,7 +43,7 @@ create or replace package body pck_auto_import as if l_return != 1 then pck_log.p_warn( - i_module => c_module + i_module => c_log_module ,i_action => l_log_action ,i_message => 'Import für Datei "' || l_filename || '" fehlgeschlagen (Rückgabe: ' || l_return || ') — Wiedervorlage erforderlich' ,i_object_ref => i_object_key @@ -66,7 +66,7 @@ create or replace package body pck_auto_import as ); pck_log.p_info( - i_module => c_module + i_module => c_log_module ,i_action => l_log_action ,i_message => 'Datei "' || l_filename || '" erfolgreich verarbeitet und verschoben' ,i_object_ref => i_object_key @@ -175,7 +175,7 @@ create or replace package body pck_auto_import as then rollback; pck_log.p_error( - i_module => c_module + i_module => c_log_module ,i_action => 'IMPORT_FILE' ,i_message => 'Fehler bei Dateiverarbeitung: ' || sqlerrm ,i_detail => to_clob(dbms_utility.format_error_backtrace) @@ -214,14 +214,14 @@ create or replace package body pck_auto_import as ,i_content_type => 'application/octet-stream' ); pck_log.p_warn( - i_module => c_module + i_module => c_log_module ,i_action => l_log_action ,i_message => 'Batch mit Fehlern abgeschlossen — mind. eine Datei konnte nicht importiert werden, SB-Marker gesetzt' ,i_object_ref => rec_folder.object_name ); else pck_log.p_info( - i_module => c_module + i_module => c_log_module ,i_action => l_log_action ,i_message => 'Batch abgeschlossen, alle Dateien erfolgreich importiert' ,i_object_ref => rec_folder.object_name diff --git a/database/packages/pck_net_storage.pkb b/database/packages/pck_net_storage.pkb index 1f8f481..342e052 100644 --- a/database/packages/pck_net_storage.pkb +++ b/database/packages/pck_net_storage.pkb @@ -1,5 +1,7 @@ create or replace package body pck_net_storage as + c_log_module constant lg_app_log.log_module%type := 'NETZLAUFWERK'; + -- ==================== Private Helpers ==================== function f_build_url ( @@ -353,6 +355,13 @@ create or replace package body pck_net_storage as ,i_body_blob => i_content ,i_content_type => i_content_type ); + + pck_log.p_info( + i_module => c_log_module + ,i_action => 'UPLOAD' + ,i_message => 'Datei hochgeladen' + ,i_object_ref => i_object_key + ); end p_upload_object; procedure p_delete_object (i_object_key in varchar2) @@ -374,6 +383,13 @@ create or replace package body pck_net_storage as i_method => 'DELETE' ,i_url => f_build_url(i_object_key) ); + + pck_log.p_info( + i_module => c_log_module + ,i_action => 'DELETE' + ,i_message => 'Datei gelöscht' + ,i_object_ref => i_object_key + ); end p_delete_object; procedure p_delete_folder (i_prefix in varchar2) @@ -412,6 +428,13 @@ create or replace package body pck_net_storage as ); end if; end loop; + + pck_log.p_info( + i_module => c_log_module + ,i_action => 'DELETE_FOLDER' + ,i_message => 'Ordner rekursiv gelöscht' + ,i_object_ref => i_prefix + ); end p_delete_folder; procedure p_rename_object ( @@ -461,6 +484,13 @@ create or replace package body pck_net_storage as ,i_body_clob => l_body ,i_content_type => 'application/json' ); + + pck_log.p_info( + i_module => c_log_module + ,i_action => 'RENAME' + ,i_message => 'Datei umbenannt: ' || i_object_key || ' -> ' || l_new_key + ,i_object_ref => i_object_key + ); end p_rename_object; procedure p_move_object ( @@ -511,6 +541,13 @@ create or replace package body pck_net_storage as ,i_body_clob => l_body ,i_content_type => 'application/json' ); + + pck_log.p_info( + i_module => c_log_module + ,i_action => 'MOVE' + ,i_message => 'Datei verschoben: ' || i_object_key || ' -> ' || l_new_key + ,i_object_ref => i_object_key + ); end p_move_object; procedure p_create_folder ( @@ -544,6 +581,13 @@ create or replace package body pck_net_storage as ,i_body_blob => empty_blob() ,i_content_type => 'application/octet-stream' ); + + pck_log.p_info( + i_module => c_log_module + ,i_action => 'CREATE_FOLDER' + ,i_message => 'Ordner angelegt' + ,i_object_ref => l_folder_key + ); end p_create_folder; function f_get_object_metadata (i_object_key in varchar2) return t_object_meta diff --git a/database/tables/lg_app_log.tab b/database/tables/lg_app_log.tab index 0385ca4..bdc1019 100644 --- a/database/tables/lg_app_log.tab +++ b/database/tables/lg_app_log.tab @@ -2,9 +2,9 @@ create table lg_app_log ( log_id number generated by default as identity not null enable ,log_timestamp timestamp not null ,log_level varchar2(10 char) not null - ,log_module varchar2(100 char) not null - ,log_action varchar2(100 char) - ,log_object_ref varchar2(512 char) + ,log_module varchar2(256 char) not null + ,log_action varchar2(256 char) + ,log_object_ref varchar2(4000 char) ,log_message varchar2(4000 char) ,log_detail clob ,log_user varchar2(100 char)