Index: openacs-4/packages/acs-tcl/tcl/site-nodes-procs-oracle.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/site-nodes-procs-oracle.xql,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/acs-tcl/tcl/site-nodes-procs-oracle.xql	24 Apr 2001 06:02:27 -0000	1.1
+++ openacs-4/packages/acs-tcl/tcl/site-nodes-procs-oracle.xql	19 Aug 2001 16:32:15 -0000	1.2
@@ -3,6 +3,22 @@
 <queryset>
    <rdbms><type>oracle</type><version>8.1.6</version></rdbms>
 
+<fullquery name="site_node_create">
+<querytext>
+        begin
+        :1 := site_node.new (
+        node_id => :new_node_id,
+        parent_id => :parent_id,
+        name => :name,
+        directory_p => :directory_p,
+        pattern_p => :pattern_p,
+        creation_user => :user_id,
+        creation_ip => :ip_address
+        );
+        end;
+</querytext>
+</fullquery>
+
 <fullquery name="site_nodes_sync_helper.nodes_select">      
       <querytext>