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

 <instance of xowf::test_item::Renaming_form_loader> form_name_based_attribute_stem \
    formName

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

Produce from the provided 'formName' an attribute stem for the input fields of this form.

Parameters:

formName (required)

Testcases:

No testcase defined.

Source code:

set strippedName [lindex [split $formName :] end]
regsub -all -- {[-]} $strippedName _ stem
return ${stem}_

XQL Not present:

Generic, PostgreSQL, Oracle