acs_mail_lite::log_mail_sending (private)

 acs_mail_lite::log_mail_sending -user_id user_id

Defined in packages/acs-mail-lite/tcl/acs-mail-lite-procs.tcl

Logs mail sending time for user

Switches:

-user_id

(required)

Options:

-user_id

user for whom email sending should be logged

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

Testcases:

No testcase defined.

Source code:

        db_dml record_mail_sent {}
        if {![db_resultrows]} {
            db_dml insert_log_entry {}
        }

Generic XQL file:

<fullquery name="acs_mail_lite::log_mail_sending.record_mail_sent">
    <querytext>

       update acs_mail_lite_mail_log
       set last_mail_date = current_timestamp
       where party_id = :user_id

     </querytext>
</fullquery>

<fullquery name="acs_mail_lite::log_mail_sending.insert_log_entry">
    <querytext>

       insert into acs_mail_lite_mail_log (party_id, last_mail_date)
       values (:user_id, current_timestamp)

     </querytext>
</fullquery>

packages/acs-mail-lite/tcl/acs-mail-lite-procs.xql

PostgreSQL XQL file:

packages/acs-mail-lite/tcl/acs-mail-lite-procs-postgresql.xql

Oracle XQL file:

packages/acs-mail-lite/tcl/acs-mail-lite-procs-oracle.xql