Index: openacs-4/packages/acs-tcl/tcl/apm-procs-oracle.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/apm-procs-oracle.xql,v diff -u -N -r1.18 -r1.19 --- openacs-4/packages/acs-tcl/tcl/apm-procs-oracle.xql 7 Aug 2017 23:47:59 -0000 1.18 +++ openacs-4/packages/acs-tcl/tcl/apm-procs-oracle.xql 14 Jun 2018 12:30:58 -0000 1.19 @@ -28,19 +28,6 @@ - - - - begin - :1 := apm_package.num_instances( - package_key => :package_key - ); - end; - - - - - @@ -70,19 +57,7 @@ - - - - select nvl(v.package_id, 0) as package_id, p.parameter_name, - decode(v.value_id, null, p.default_value, v.attr_value) as attr_value - from apm_parameters p, apm_parameter_values v - where p.package_key = :package_key - and p.parameter_id = v.parameter_id (+) - - - - @@ -142,16 +117,6 @@ - - - - select decode(count(*), 0, 0, 1) from apm_package_versions - where package_key = :package_key - and version_name = :version_name - - - - @@ -177,26 +142,6 @@ - - - - select site_node.url(min(node_id)) - from site_nodes - where object_id = :package_id - - - - - - - select package_key, pretty_name - from apm_package_types - where not (apm_package.singleton_p(package_key) = 1 and - apm_package.num_instances(package_key) >= 1) - order by pretty_name - - - select apm_parameter_value.new(