binding-install.tcl

Location:

/packages/acs-service-contract/www/binding-install.tcl

Author:

Neophytos Demetriou

Related Files

• packages/acs-service-contract/www/binding-install.tcl
• packages/acs-service-contract/www/binding-install-postgresql.xql
• packages/acs-service-contract/www/binding-install-oracle.xql

[ hide source ] | [ make this the default ]

File Contents

ad_page_contract {

    @author Neophytos Demetriou

} {
    contract_id:naturalnum,notnull
    impl_id:naturalnum,notnull
}


db_exec_plsql binding_install "select acs_sc_binding__new($contract_id,$impl_id)"

ad_returnredirect ""
ad_script_abort

# Local variables:
#    mode: tcl
#    tcl-indent-level: 4
#    indent-tabs-mode: nil
# End: