xowf::test_item::Question_manager method more_ahead (public)

 <instance of xowf::test_item::Question_manager> more_ahead \
    [ -position position ] obj

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

Return true, when this is for the current user not the last question.

Switches:

-position (optional)

Parameters:

obj (required, object)

Testcases:

No testcase defined.

Source code:

if {$position eq ""} {
  set position [$obj property position]
}
set questions [dict get [$obj instance_attributes] question]
return [expr {$position + 1 < [:question_count $obj]}]

XQL Not present:

Generic, PostgreSQL, Oracle