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 (required)
package_key (required)
message_key (required)
locale (required)
comment (required)
deleted_p (required)
sync_time (required)
conflict_p (required)
upgrade_status (required)
Author:
Peter Marklund

Partial Call Graph (max 5 caller/called nodes):
%3 test_test_catalog_import_export test_catalog_import_export (test acs-lang) lang::audit::changed_message lang::audit::changed_message test_test_catalog_import_export->lang::audit::changed_message ad_conn ad_conn (public) lang::audit::changed_message->ad_conn db_dml db_dml (public) lang::audit::changed_message->db_dml lang::message::edit lang::message::edit (private) lang::message::edit->lang::audit::changed_message lang::message::register lang::message::register (public) lang::message::register->lang::audit::changed_message

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

[ hide source ] | [ make this the default ]
Show another procedure: