xowf::test_item::Answer_manager method delete_all_answer_data (public)

 <instance of xowf::test_item::Answer_manager[i]> delete_all_answer_data \
    obj

Defined in packages/xowf/tcl/test-item-procs.tcl

Delete all instances of the answer workflow

Parameters:
obj (required, object)

Testcases:
No testcase defined.
Source code:
set wf [:get_answer_wf $obj]
if {$wf ne ""} {
  set items [:get_wf_instances -initialize false $wf]
  foreach i [$items children] {
    $i www-delete
  }
}
#
# Delete as well the manual gradings for this exam.
#
#$obj set_property -new 1 manual_gradings {}
:AM set_exam_results -obj $obj manual_gradings {}

return $wf
XQL Not present:
Generic, PostgreSQL, Oracle
[ hide source ] | [ make this the default ]
Show another procedure: