Index: openacs-4/packages/dotlrn/sql/postgresql/dotlrn-external-profile-provider-create.sql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/sql/postgresql/Attic/dotlrn-external-profile-provider-create.sql,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/dotlrn/sql/postgresql/dotlrn-external-profile-provider-create.sql	29 Mar 2002 19:14:44 -0000	1.2
+++ openacs-4/packages/dotlrn/sql/postgresql/dotlrn-external-profile-provider-create.sql	2 Jul 2002 19:53:51 -0000	1.3
@@ -21,48 +21,56 @@
 -- @version $Id$
 --
 
+create function inline_0()
+returns integer as '
 begin
 
     -- create the implementation
-    select acs_sc_impl__new(
-        'profile_provider',
-        'dotlrn_external_profile_provider',
-        'dotlrn_external_profile_provider'
+    perform acs_sc_impl__new(
+        ''profile_provider'',
+        ''dotlrn_external_profile_provider'',
+        ''dotlrn_external_profile_provider''
     );
 
     -- add the bindings to the method implementations
 
         -- name method
-        select acs_sc_impl_alias__new(
-            'profile_provider',
-            'dotlrn_external_profile_provider',
-            'name',
-            'dotlrn_external_profile_provider::name',
-            'TCL'
+        perform acs_sc_impl_alias__new(
+            ''profile_provider'',
+            ''dotlrn_external_profile_provider'',
+            ''name'',
+            ''dotlrn_external_profile_provider::name'',
+            ''TCL''
         );
 
         -- prettyName method
-        select acs_sc_impl_alias__new(
-            'profile_provider',
-            'dotlrn_external_profile_provider',
-            'prettyName',
-            'dotlrn_external_profile_provider::prettyName',
-            'TCL'
+        perform acs_sc_impl_alias__new(
+            ''profile_provider'',
+            ''dotlrn_external_profile_provider'',
+            ''prettyName'',
+            ''dotlrn_external_profile_provider::prettyName'',
+            ''TCL''
         );
 
         -- render method
-        select acs_sc_impl_alias__new(
-            'profile_provider',
-            'dotlrn_external_profile_provider',
-            'render',
-            'dotlrn_external_profile_provider::render',
-            'TCL'
+        perform acs_sc_impl_alias__new(
+            ''profile_provider'',
+            ''dotlrn_external_profile_provider'',
+            ''render'',
+            ''dotlrn_external_profile_provider::render'',
+            ''TCL''
         );
 
     -- bind this implementation to the interface it implements
-    select acs_sc_binding__new(
-        'profile_provider',
-        'dotlrn_external_profile_provider'
+    perform acs_sc_binding__new(
+        ''profile_provider'',
+        ''dotlrn_external_profile_provider''
     );
 
-end;
+    return 0;
+
+end;' language 'plpgsql';
+
+select inline_0();
+drop function inline_0();
+