lang::audit::changed_message (public)

 lang::audit::changed_message old_message package_key message_key \
    locale comment deleted_p sync_time conflict_p upgrade_status

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

Save a message that is overwritten.

Parameters:

old_message
package_key
message_key
locale
comment
deleted_p
sync_time
conflict_p
upgrade_status

Author:

Peter Marklund

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

Testcases:

test_catalog_import_export

Source code:

        # Save the old message in the audit table
        set overwrite_user [ad_conn user_id]

        db_dml lang_message_audit {} -clobs [list $old_message $comment]

XQL Not present:

Generic

PostgreSQL XQL file:

<fullquery name="lang::audit::changed_message.lang_message_audit">
    <querytext>
          insert into lang_messages_audit (audit_id, package_key, message_key, locale, old_message, comment_text, overwrite_user,
                                           deleted_p, sync_time, conflict_p, upgrade_status) 
            values (nextval('lang_messages_audit_id_seq'::text), :package_key, :message_key, :locale, :old_message, 
                    :comment, :overwrite_user, :deleted_p, :sync_time, :conflict_p, :upgrade_status) 
    </querytext>
</fullquery>

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

Oracle XQL file:

<fullquery name="lang::audit::changed_message.lang_message_audit">
    <querytext>
          insert into lang_messages_audit (audit_id, package_key, message_key, locale, old_message, comment_text, overwrite_user,
                                           deleted_p, sync_time, conflict_p, upgrade_status) 
            values (lang_messages_audit_id_seq.nextval, :package_key, :message_key, :locale, empty_clob(), empty_clob(), 
                    :overwrite_user, :deleted_p, :sync_time, :conflict_p, :upgrade_status)  
          returning old_message, comment_text into :1, :2
    </querytext>
</fullquery>

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