json body aufbau durch sql funktionen ersetzt.
This commit is contained in:
@@ -474,9 +474,12 @@ create or replace package body pck_net_storage as
|
||||
l_new_key := l_prefix || i_new_name;
|
||||
p_assert_allowed(l_new_key);
|
||||
|
||||
l_body := '{"sourceName":"' || replace(replace(i_object_key, '\', '\\'), '"', '\"')
|
||||
|| '","newName":"' || replace(replace(l_new_key, '\', '\\'), '"', '\"')
|
||||
|| '"}';
|
||||
select json_object(
|
||||
'sourceName' value i_object_key
|
||||
,'newName' value l_new_key
|
||||
)
|
||||
into l_body
|
||||
from dual;
|
||||
|
||||
l_response := f_make_request(
|
||||
i_method => 'POST'
|
||||
@@ -521,9 +524,12 @@ create or replace package body pck_net_storage as
|
||||
l_new_key := i_target_prefix || l_filename;
|
||||
p_assert_allowed(l_new_key);
|
||||
|
||||
l_body := '{"sourceName":"' || replace(replace(i_object_key, '\', '\\'), '"', '\"')
|
||||
|| '","newName":"' || replace(replace(l_new_key, '\', '\\'), '"', '\"')
|
||||
|| '"}';
|
||||
select json_object(
|
||||
'sourceName' value i_object_key
|
||||
,'newName' value l_new_key
|
||||
)
|
||||
into l_body
|
||||
from dual;
|
||||
|
||||
l_response := f_make_request(
|
||||
i_method => 'POST'
|
||||
|
||||
Reference in New Issue
Block a user