apm_package_install_owners (public)

 apm_package_install_owners [ -callback callback ] owners version_id

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

Install all of the owners of the package version.

Switches:

-callback

(defaults to "apm_dummy_callback") (optional)

Parameters:

owners
version_id

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

Testcases:

upgrade

Source code:

    db_dml apm_delete_owners {
        delete from apm_package_owners where version_id = :version_id
    }
    set counter 0
    foreach item $owners {
        lassign $item owner_name owner_uri
        db_dml owner_insert {
            insert into apm_package_owners(version_id, owner_uri, owner_name, sort_key)
            values(:version_id, :owner_uri, :owner_name, :counter)
        }
        incr counter
    }

Generic XQL file:

<fullquery name="apm_package_install_owners.apm_delete_owners">
    <querytext>
      
	delete from apm_package_owners where version_id = :version_id
    
      </querytext>
</fullquery>

<fullquery name="apm_package_install_owners.owner_insert">
    <querytext>
      
	    insert into apm_package_owners(version_id, owner_uri, owner_name, sort_key)
	    values(:version_id, :owner_uri, :owner_name, :counter)
	
      </querytext>
</fullquery>

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

PostgreSQL XQL file:

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

Oracle XQL file:

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