xowf::test_item::Renaming_form_loader method answers_for_form (public)

 <instance of xowf::test_item::Renaming_form_loader[i]> answers_for_form \
    formName answers

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

Return a list of dicts for the provided formName from the answers (as returned from [answer_manager get_answer_attributes ...]).

Parameters:
formName (required)
answers (required)

Testcases:
No testcase defined.
Source code:
set stem [:form_name_based_attribute_stem $formName]
set result ""
foreach answer $answers {
  set value answer_for_form
  set answerAttributes [dict get $answer answerAttributes]
  if {[dict exists $answerAttributes $stem]} {
    set value [dict get $answerAttributes $stem]
    if {$value ne ""} {
      lappend result [list item [dict get $answer item] value $value]
    }
  }
}
return $result
XQL Not present:
Generic, PostgreSQL, Oracle
[ hide source ] | [ make this the default ]
Show another procedure: