Index: openacs-4/packages/acs-tcl/tcl/apm-install-procs.postgresql.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/Attic/apm-install-procs.postgresql.sql,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/acs-tcl/tcl/apm-install-procs.postgresql.sql 30 Mar 2001 05:45:22 -0000 1.1 @@ -0,0 +1,81 @@ + + + + +select apm_package_version__version_name_greater(service_version, :dependency_version) as version_p + from apm_package_dependencies d, apm_package_types a, apm_package_versions v + where d.dependency_type = 'provides' + and d.version_id = v.version_id + and d.service_uri = :dependency_uri + and v.installed_p = 't' + and a.package_key = v.package_key + +postgresql7.1 + + + + +SELECT apm_package_version__enable(:version_id); + +postgresql7.1 + + + + +SELECT apm__register_application ( + :package_key, + :pretty_name, + :pretty_plural, + :package_uri, + :singleton_p, + :spec_file_path, + :spec_file_mtime); + +postgresql7.1 + + + + +SELECT apm__register_service ( + :package_key, + :pretty_name, + :pretty_plural, + :package_uri, + :singleton_p, + :spec_file_path, + :spec_file_mtime); + +postgresql7.1 + + + + +select version_id +from apm_package_versions +where package_key = :package_key +and version_id = apm_package__highest_version(:package_key) + +postgresql7.1 + + + + +select apm_package_version__new( + :version_id, + :package_key, + :version_name, + :version_uri, + :summary, + :description_format, + :description, + :release_date, + :vendor, + :vendor_uri, + 't', + 't'); + +postgresql7.1 + + + + Index: openacs-4/packages/acs-tcl/tcl/apm-procs.postgresql.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/Attic/apm-procs.postgresql.sql,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/acs-tcl/tcl/apm-procs.postgresql.sql 30 Mar 2001 05:45:22 -0000 1.1 @@ -0,0 +1,30 @@ + + + + + +select apm__register_parameter ( + NULL, + :package_key, + :parameter_name, + :description, + :datatype, + :default_value, + :section_name, + :min_n_values, + :max_n_values); + +postgresql7.1 + + + + +select v.package_id, p.parameter_name, coalesce(p.default_value, v.attr_value) attr_value +from apm_parameters p, apm_parameter_values v +where p.package_key = :package_key +and p.parameter_id = v.parameter_id (+) + +postgresql7.1 + + +