Index: openacs-4/packages/acs-tcl/tcl/apm-install-procs-oracle.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/apm-install-procs-oracle.xql,v
diff -u -r1.17 -r1.18
--- openacs-4/packages/acs-tcl/tcl/apm-install-procs-oracle.xql	10 Mar 2010 00:44:03 -0000	1.17
+++ openacs-4/packages/acs-tcl/tcl/apm-install-procs-oracle.xql	31 Mar 2010 00:46:16 -0000	1.18
@@ -263,8 +263,8 @@
   <querytext>
     begin
       :1 := apm.parameter_p(
-               :descendent_package_key,
-               :parameter_name);
+               package_key => :descendent_package_key,
+               parameter_name => :parameter_name);
     end;
   </querytext>
 </fullquery>
@@ -273,15 +273,15 @@
   <querytext>
     begin
       :1 := apm.register_parameter(
-               null,
-               :descendent_package_key,
-               :parameter_name,
-               :description,
-               :datatype,
-               :default_value,
-               :section_name,
-               :min_n_values,
-               :max_n_values);
+               package_key => :descendent_package_key,
+               parameter_name => :parameter_name,
+               description => :description,
+               scope => :scope,
+               datatype => :datatype,
+               default_value => :default_value,
+               section_name => :section_name,
+               min_n_values => :min_n_values,
+               max_n_values => :max_n_values);
     end;
   </querytext>
 </fullquery>
@@ -290,8 +290,8 @@
   <querytext>
     begin
       :1 := apm.parameter_p(
-               :new_package_key,
-               :parameter_name);
+               package_key => :descendent_package_key,
+               parameter_name => :parameter_name);
     end;
   </querytext>
 </fullquery>
@@ -300,15 +300,15 @@
   <querytext>
     begin
       :1 := apm.register_parameter(
-               null,
-               :new_package_key,
-               :parameter_name,
-               :description,
-               :datatype,
-               :default_value,
-               :section_name,
-               :min_n_values,
-               :max_n_values);
+               package_key => :new_package_key,
+               parameter_name => :parameter_name,
+               description => :description,
+               scope => :scope,
+               datatype => :datatype,
+               default_value => :default_value,
+               section_name => :section_name,
+               min_n_values => :min_n_values,
+               max_n_values => :max_n_values);
     end;
   </querytext>
 </fullquery>