---

Class ::xowf::Context

::xowf::Context create ... \
           [ -all_roles (default "false") ] \
           [ -current_state (default "[self]::initial") ] \
           [ -default_definition (default "") ] \
           [ -in_role in_role ] \
           [ -object object ] \
           [ -wf_container wf_container ] \
           [ -workflow_definition workflow_definition ]

Defined in

Class Relations

• class: ::xotcl::Class
• superclass: ::xotcl::Object

::xotcl::Class create ::xowf::Context \
     -superclass ::xotcl::Object

Methods (to be applied on the object)

• require (scripted)

   xowf::Context require

  Testcases:

  create_workflow_with_instance, xowf

  #
  # Make sure, the context object for workflow '$obj exists. The
  # flag "-new" can be used to make sure, a new and fresh context is
  # available.
  #
  #:log "START-require"
  #
  set ctx $obj-wfctx
  if {$new && [nsf::is object $ctx]} {
    $ctx destroy
  }
  
  if {![nsf::is object $ctx]} {
    set wfContextClass [$obj wf_property workflow_context_class [self]]
  
    regsub -all \r\n [$obj wf_property workflow_definition] \n workflow_definition
    $wfContextClass create $ctx  -object $obj  -workflow_definition $workflow_definition  -destroy_on_cleanup
    $ctx initialize_context $obj
  }
  
  #:log "END-require ctx <$ctx>"
  return $ctx

---