xowf::Package proc create_new_workflow_page (public)

 xowf::Package[i] create_new_workflow_page -package_id package_id  \
    -parent_id parent_id  -name name  -title title  \
    [ -instance_attributes instance_attributes ]

Defined in /var/www/openacs.org/packages/xowf/tcl/xowf-procs.tcl

Helper proc for loading workflow prototype page with less effort.

Switches:
-package_id (required)
-parent_id (required)
-name (required)
-title (required)
-instance_attributes (optional)

Testcases:
create_new_workflow_page
Source code:
#
# Load Workflow.form
#
xo::Package require $package_id
set item_ref_info [$package_id item_ref -use_site_wide_pages true -default_lang en  -parent_id $parent_id  en:Workflow.form]
set page_template [dict get $item_ref_info item_id]
if {$page_template != 0} {
  #
  # Create FormPage
  #
  set p [::xowiki::FormPage new  -name $name  -title $title  -set text {}  -instance_attributes $instance_attributes  -page_template $page_template]
} else {
  ns_log error "could not load Workflow form, therefore, creation of workflow $name failed as well"
  set p ""
}
return $p
XQL Not present:
Generic, PostgreSQL, Oracle
[ hide source ] | [ make this the default ]
Show another procedure: