xowf::WorkflowPage instproc is_wf_instance (public)
<instance of xowf::WorkflowPage> is_wf_instance
Defined in /var/www/openacs.org/packages/xowf/tcl/xowf-procs.tcl
Check, if the current page is a workflow instance (page, referring to a workflow)
- Testcases:
- create_test_items, create_workflow_with_instance
Source code: if {[array exists :__wfi]} { return 1 } # # We cannot call get_template_object here, because this will lead # to a recursive loop. # if {![nsf::is object ::${:page_template}]} { ::xo::db::CrClass get_instance_from_db -item_id ${:page_template} } if {${:state} ne "" && [${:page_template} hasclass ::xowf::WorkflowPage] && [${:page_template} is_wf] } { array set :__wfi [${:page_template} instance_attributes] return 1 } return 0XQL Not present: Generic, PostgreSQL, Oracle