Index: openacs-4/packages/new-portal/tcl/datasource-procs-oracle.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/new-portal/tcl/datasource-procs-oracle.xql,v
diff -u
--- /dev/null	1 Jan 1970 00:00:00 -0000
+++ openacs-4/packages/new-portal/tcl/datasource-procs-oracle.xql	19 Jun 2003 01:59:17 -0000	1.1
@@ -0,0 +1,41 @@
+<?xml version="1.0"?>
+
+<queryset>
+    <rdbms><type>oracle</type><version>8.1.6</version></rdbms>
+
+    <fullquery name="portal::datasource::new.new_datasource">
+        <querytext>
+           begin
+             :1 := portal_datasource.new(
+    		     name => :name,
+    		     description => :description     
+  	     );
+           end;
+        </querytext>
+    </fullquery>
+
+    <fullquery name="portal::datasource::set_def_param.set_def_param">
+        <querytext>
+           begin
+             :1 := portal_datasource.set_def_param(
+		     datasource_id => :datasource_id,
+		     config_required_p => :config_required_p,
+		     configured_p => :configured_p, 
+		     key => :key, 
+		     value => :value
+	     ):
+           end;
+        </querytext>
+    </fullquery>
+
+    <fullquery name="portal::datasource::delete.delete_datasource">
+        <querytext>
+           begin
+             portal_datasource.delete(
+               datasource_id => :datasource_id
+  	     );
+           end;
+        </querytext>
+    </fullquery>
+
+</queryset>
Index: openacs-4/packages/new-portal/tcl/datasource-procs-postgresql.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/new-portal/tcl/datasource-procs-postgresql.xql,v
diff -u
--- /dev/null	1 Jan 1970 00:00:00 -0000
+++ openacs-4/packages/new-portal/tcl/datasource-procs-postgresql.xql	19 Jun 2003 01:59:17 -0000	1.1
@@ -0,0 +1,35 @@
+<?xml version="1.0"?>
+
+<queryset>
+    <rdbms><type>postgresql</type><version>7.1</version></rdbms>
+
+    <fullquery name="portal::datasource::new.new_datasource">
+        <querytext>
+             select portal_datasource__new(
+    		:name,
+    		:description     
+  	     )
+        </querytext>
+    </fullquery>
+
+    <fullquery name="portal::datasource::set_def_param.set_def_param">
+        <querytext>
+            select portal_datasource__set_def_param(
+		:datasource_id,
+		:config_required_p,
+		:configured_p, 
+		:key, 
+		:value
+	    )
+        </querytext>
+    </fullquery>
+
+    <fullquery name="portal::datasource::delete.delete_datasource">
+        <querytext>
+             select portal_datasource__delete(
+    		:datasource_id
+  	     )
+        </querytext>
+    </fullquery>
+
+</queryset>
Fisheye: Tag 1.2 refers to a dead (removed) revision in file `openacs-4/packages/new-portal/tcl/datasource-procs.tcl'.
Fisheye: No comparison available.  Pass `N' to diff?
Index: openacs-4/packages/new-portal/tcl/datasource-procs.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/new-portal/tcl/datasource-procs.xql,v
diff -u
--- /dev/null	1 Jan 1970 00:00:00 -0000
+++ openacs-4/packages/new-portal/tcl/datasource-procs.xql	19 Jun 2003 01:59:17 -0000	1.1
@@ -0,0 +1,13 @@
+<?xml version="1.0"?>
+
+<queryset>
+
+    <fullquery name="portal::datasource::delete.get_datasource_id">
+        <querytext>
+           select datasource_id
+           from portal_datasources
+           where name = :name;
+        </querytext>
+    </fullquery>
+
+</queryset>