Mehr logging in DB packages hinzugefügt
This commit is contained in:
@@ -69,6 +69,7 @@ create or replace package body pck_net_storage as
|
||||
------------------------------------------------------------------------------------------------Kopf*/
|
||||
is
|
||||
l_tenant_prefix varchar2(256);
|
||||
l_log_action varchar2(256) := 'ASSERT_ALLOWED';
|
||||
begin
|
||||
if i_object_key is null
|
||||
then
|
||||
@@ -82,6 +83,15 @@ create or replace package body pck_net_storage as
|
||||
|
||||
l_tenant_prefix := pck_system.f_get_par_wert_by_programmid('NETSTORE_TENANT_ID');
|
||||
|
||||
/*
|
||||
-- Log for debugging Prefix check
|
||||
pck_log.p_info(
|
||||
i_module => c_log_module
|
||||
,i_action => l_log_action
|
||||
,i_message => 'Checking Prefix: Netstore tenant-Prefix: ' || l_tenant_prefix || '; Accessed Prefix: ' || substr(i_object_key, 1, length(l_tenant_prefix)) || '; Accessed Object: ' || i_object_key
|
||||
);
|
||||
*/
|
||||
|
||||
if l_tenant_prefix is not null and length(l_tenant_prefix) > 0
|
||||
then
|
||||
if substr(i_object_key, 1, length(l_tenant_prefix)) != l_tenant_prefix
|
||||
|
||||
Reference in New Issue
Block a user