diff --git a/database/packages/pck_net_storage.pkb b/database/packages/pck_net_storage.pkb
index cf5781d..785dc9f 100644
--- a/database/packages/pck_net_storage.pkb
+++ b/database/packages/pck_net_storage.pkb
@@ -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'