ad_page_contract_filter_proc_acs_message_id (public, deprecated)

 ad_page_contract_filter_proc_acs_message_id name value_varname

Defined in packages/acs-messaging/tcl/acs-messaging-procs.tcl

Deprecated. Invoking this procedure generates a warning.

Checks whether the value (assumed to be an integer) is the id of an already-existing OpenACS message. DEPRECATED: OpenACS now has a generic filter object_type.

Parameters:

name
value_varname

See Also:

• ad_page_contract_filter_proc_object_type

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

Testcases:

No testcase defined.

Source code:

ad_log_deprecated proc ad_page_contract_filter_proc_acs_message_idupvar $value_varname value

    # empty is okay (handled by notnull)
    if {$value eq ""} {
        return 1
    }
    if {![acs_message_p $value]} {
        ad_complain "$name ($value) does not refer to a valid OpenACS message"
        return 0
    }
    return 1

Generic XQL file:

packages/acs-messaging/tcl/acs-messaging-procs.xql

PostgreSQL XQL file:

packages/acs-messaging/tcl/acs-messaging-procs-postgresql.xql

Oracle XQL file:

packages/acs-messaging/tcl/acs-messaging-procs-oracle.xql