lang::message::message_exists_p (public)

 lang::message::message_exists_p [ -varname varname ] locale key

Defined in packages/acs-lang/tcl/lang-message-procs.tcl

Return 1 if message exists in given locale, 0 otherwise.

Switches:

-varname (optional)

when specified, return value in this variable

Parameters:

locale (required)

key (required)

Author:

Gustaf Neumann

Testcases:

test_catalog_import_export

Source code:

        #
        # Make sure messages are loaded into the cache.
        #
        acs::per_thread_cache eval -key acs-lang.message_cache_loaded {
            lang::message::cache
        }
        #
        # Provide linkage to the output variable and perform lookup
        #
        if {[info exists varname]} {
            upvar 1 $varname var
        }
        try {
            return [nsv_get lang_message_$locale $key var]
        } on error {errmsg} {
            return 0
        }

Generic XQL file:

packages/acs-lang/tcl/lang-message-procs.xql

PostgreSQL XQL file:

packages/acs-lang/tcl/lang-message-procs-postgresql.xql

Oracle XQL file:

packages/acs-lang/tcl/lang-message-procs-oracle.xql