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.10 -r1.11
--- openacs-4/packages/acs-tcl/tcl/apm-install-procs-oracle.xql	12 Jul 2004 11:12:38 -0000	1.10
+++ openacs-4/packages/acs-tcl/tcl/apm-install-procs-oracle.xql	25 Nov 2008 17:08:49 -0000	1.11
@@ -124,6 +124,8 @@
 			pretty_plural => :pretty_plural,
 			initial_install_p => :initial_install_p,
 			singleton_p => :singleton_p,
+                        implements_subsite_p => :implements_subsite_p,
+                        inherit_templates_p => :inherit_templates_p,
 			spec_file_path => :spec_file_path,
 			spec_file_mtime => :spec_file_mtime
           		);
@@ -144,6 +146,8 @@
 			pretty_plural => :pretty_plural,
 			initial_install_p => :initial_install_p,
 			singleton_p => :singleton_p,
+                        implements_subsite_p => :implements_subsite_p,
+                        inherit_templates_p => :inherit_templates_p,
 			spec_file_path => :spec_file_path,
 			spec_file_mtime => :spec_file_mtime
 			);
@@ -244,6 +248,51 @@
       </querytext>
 </fullquery>
 
+<fullquery name="apm_package_install.copy_descendent_params">      
+  <querytext>
+      select apm.register_parameter(
+               parameter_name => ap.parameter_name,
+               package_key => :descendent_package_key,
+               description => ap.description,
+               datatype => ap.datatype,
+               default_value => ap.default_value,
+               section_name => qp.section_name,
+               min_n_values => ap.min_n_values,
+               max_n_values => ap.max_n_values)
+      from apm_parameters ap
+      where package_key = :package_key
+        and not exists (select 1
+                        from apm_parameters ap2
+                        where ap2.parameter_name = ap.parameter_name
+                          and ap2.package_key = :descendent_package_key)
+	
+      </querytext>
+</fullquery>
+
+<fullquery name="apm_package_install.copy_inherited_params">      
+  <querytext>
+      select apm.register_parameter(
+               parameter_name => ap.parameter_name,
+               package_key => :package_key,
+               description => ap.description,
+               datatype => ap.datatype,
+               default_value => ap.default_value,
+               section_name => qp.section_name,
+               min_n_values => ap.min_n_values,
+               max_n_values => ap.max_n_values)
+      from apm_parameters ap
+      where package_key = :inherited_package_key
+        and not exists (select 1
+                        from apm_parameters ap2
+                        where ap2.parameter_name = ap.parameter_name
+                          and ap2.package_key = :package_key)
+	
+      </querytext>
+</fullquery>
+
+  </querytext>
+</fullquery>
+
 <fullquery name="apm_package_install.version_exists_p">      
       <querytext>