apm_copy_inherited_params (public)

 apm_copy_inherited_params new_package_key dependencies

Defined in packages/acs-tcl/tcl/apm-install-procs.tcl

Copy parameters from a packages ancestors. Called for "embeds" and "extends" dependencies.

Parameters:

new_package_key
dependencies

Partial Call Graph (max 5 caller/called nodes):

Testcases:

No testcase defined.

Source code:

    foreach dependency $dependencies {
        set inherited_package_key [lindex $dependency 0]
        db_foreach inherited_params {} {
            if { [db_exec_plsql param_exists {}] } {
                error "$parameter_name already exists in package $new_package_key"
            } else {
                db_exec_plsql copy_inherited_param {}
            }
        }
    }

Generic XQL file:

<fullquery name="apm_copy_inherited_params.inherited_params">
    <querytext>
    select ap.*
    from apm_parameters ap
    where package_key = :inherited_package_key
      and scope = 'instance'
   </querytext>
</fullquery>

packages/acs-tcl/tcl/apm-install-procs.xql

PostgreSQL XQL file:

<fullquery name="apm_copy_inherited_params.param_exists">
    <querytext>
    select apm__parameter_p(:new_package_key, :parameter_name);
  </querytext>
</fullquery>

<fullquery name="apm_copy_inherited_params.copy_inherited_param">
    <querytext>
    select apm__register_parameter(null, :new_package_key, :parameter_name, :description,
                                   :scope, :datatype, :default_value, :section_name,
                                   :min_n_values, :max_n_values)
  </querytext>
</fullquery>

packages/acs-tcl/tcl/apm-install-procs-postgresql.xql

Oracle XQL file:

<fullquery name="apm_copy_inherited_params.param_exists">
    <querytext>
    begin
      :1 := apm.parameter_p(
               package_key => :new_package_key,
               parameter_name => :parameter_name);
    end;
  </querytext>
</fullquery>

<fullquery name="apm_copy_inherited_params.copy_inherited_param">
    <querytext>
    begin
      :1 := apm.register_parameter(
               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>

packages/acs-tcl/tcl/apm-install-procs-oracle.xql