clear.tcl
- Location:
- /packages/acs-automated-testing/www/admin/clear.tcl
- CVS ID:
$Id: clear.tcl,v 1.6.2.1 2023/10/06 12:31:05 gustafn Exp $
Related Files
[ hide source ] | [ make this the default ]
File Contents
ad_page_contract { @cvs-id $Id: clear.tcl,v 1.6.2.1 2023/10/06 12:31:05 gustafn Exp $ } { {package_key ""} {category:aa_test_category ""} {view_by:aa_test_view_by "package"} {testcase_id:naturalnum,notnull ""} {quiet:boolean,notnull 0} } -properties { } set sql "delete from aa_test_results" db_dml delete_testcase_tests_sql $sql set sql "delete from aa_test_final_results" db_dml delete_testcase_tests_sql $sql ad_returnredirect "index?by_package_key=$package_key&by_category=$category&view_by=$view_by&quiet=$quiet" ad_script_abort # Local variables: # mode: tcl # tcl-indent-level: 4 # indent-tabs-mode: nil # End: