ad_page_contract_filter_proc_attribute_dynamic_p (public)

 ad_page_contract_filter_proc_attribute_dynamic_p name value_varname

Defined in packages/acs-subsite/tcl/attribute-procs.tcl

Checks whether the value (assumed to be an integer) is an attribute of a dynamic type.

Parameters:

name
value_varname

Author:

Michael Bryzek <mbryzek@arsdigita.com>

Created:

12/30/2000

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

Testcases:

acs_subsite_attributes

Source code:

upvar $value_varname value

    set dynamic_p [db_0or1row attribute_for_dynamic_object_p {
        select 1 from dual where exists
        (select 1 from acs_attributes a, acs_object_types t
         where t.dynamic_p = 't'
         and a.object_type = t.object_type
         and a.attribute_id = :value)
    }]
    if {!$dynamic_p} {
        ad_complain "Attribute does not belong to a dynamic object and cannot be modified"
    }
    return $dynamic_p

Generic XQL file:

packages/acs-subsite/tcl/attribute-procs.xql

PostgreSQL XQL file:

packages/acs-subsite/tcl/attribute-procs-postgresql.xql

Oracle XQL file:

packages/acs-subsite/tcl/attribute-procs-oracle.xql