Index: openacs-4/packages/acs-tcl/tcl/security-procs-oracle.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/security-procs-oracle.xql,v
diff -u -r1.9 -r1.10
--- openacs-4/packages/acs-tcl/tcl/security-procs-oracle.xql	20 Nov 2017 15:36:44 -0000	1.9
+++ openacs-4/packages/acs-tcl/tcl/security-procs-oracle.xql	3 Sep 2024 15:37:34 -0000	1.10
@@ -3,61 +3,53 @@
 <queryset>
    <rdbms><type>oracle</type><version>8.1.6</version></rdbms>
 
-<fullquery name="populate_secret_tokens_db.insert_random_token">      
+<fullquery name="sec_populate_secret_tokens_db.insert_random_token">
       <querytext>
-      
+
 	    insert /*+ APPEND */ into secret_tokens(token_id, token, token_timestamp)
 	    values(sec_security_token_id_seq.nextval, :random_token, sysdate)
-	
+
       </querytext>
 </fullquery>
 
- 
-<fullquery name="populate_secret_tokens_cache.get_secret_tokens">      
+
+<fullquery name="sec_populate_secret_tokens_cache.get_secret_tokens">
       <querytext>
-      
+
 	    select * from (
 	    select token_id, token
 	    from secret_tokens
 	    sample(15)
 	    ) where rownum < :num_tokens
-	
+
       </querytext>
 </fullquery>
 
-<fullquery name="ad_set_client_property.prop_update_dml_clob">      
+<fullquery name="ad_set_client_property.prop_update_dml_clob">
       <querytext>
          update sec_session_properties
          set property_value = null,
            property_clob = empty_clob(),
            secure_p = :secure,
-           last_hit = :last_hit 
+           last_hit = :last_hit
          where session_id = :session_id and
            module = :module and
            property_name = :name
          returning property_clob into :1
       </querytext>
 </fullquery>
- 
-<fullquery name="ad_set_client_property.prop_update_dml">      
+
+<fullquery name="ad_set_client_property.prop_update_dml">
       <querytext>
          update sec_session_properties
          set property_value = :value,
            property_clob = null,
            secure_p = :secure,
-           last_hit = :last_hit 
+           last_hit = :last_hit
          where session_id = :session_id and
            module = :module and
            property_name = :name
       </querytext>
 </fullquery>
 
-<fullquery name="ad_set_client_property.prop_upsert">      
-  <querytext>
-      begin
-         sec_session_property.upsert(:session_id, :module, :name, :value, :secure, :last_hit);
-      end;
-      </querytext>
-</fullquery>
-
 </queryset>