auth::sync::purge_jobs (public)

 auth::sync::purge_jobs [ -num_days num_days ]

Defined in packages/acs-authentication/tcl/sync-procs.tcl

Purge jobs that are older than KeepBatchLogDays days.

Switches:
-num_days (optional)

Partial Call Graph (max 5 caller/called nodes):
%3 test_sync_start_end sync_start_end (test acs-authentication) auth::sync::purge_jobs auth::sync::purge_jobs test_sync_start_end->auth::sync::purge_jobs db_dml db_dml (public) auth::sync::purge_jobs->db_dml parameter::get_from_package_key parameter::get_from_package_key (public) auth::sync::purge_jobs->parameter::get_from_package_key

Testcases:
sync_start_end
Source code:
    if { $num_days eq "" } {
        set num_days [parameter::get_from_package_key  -parameter KeepBatchLogDays  -package_key "acs-authentication"  -default 0]
    }

    if {![string is integer -strict $num_days]} {
        error "num_days ($num_days) has to be an integer"
    }

    if { $num_days > 0 } {
        db_dml purge_jobs {}
    }
Generic XQL file:
<fullquery name="auth::sync::purge_jobs.purge_jobs">
    <querytext>
            delete from auth_batch_jobs
            where  job_end_time < current_date - cast(:num_days as integer)
        </querytext>
</fullquery>
packages/acs-authentication/tcl/sync-procs.xql

PostgreSQL XQL file:
packages/acs-authentication/tcl/sync-procs-postgresql.xql

Oracle XQL file:
packages/acs-authentication/tcl/sync-procs-oracle.xql

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