%3 ::xotcl::Object ::xotcl::Object ::xo::db::sql::workflow_case ::xo::db::sql::workflow_case → add_manual_assignment → add_task_assignment → add_token → begin_task_action → cancel → cancel_task → clear_manual_assignments → clear_task_assignments → consume_token → delete → enable_transitions → end_task_action → ensure_task_in_state → evaluate_guard → execute_hold_timeout_callback → execute_time_callback → execute_transition_callback → execute_unassigned_callback → finish_task → finished_p → fire_message_transition → fire_transition_internal → get_attribute_value → get_task_deadline → get_task_id → lock_token → new → notify_assignee → release_token → remove_case_deadline → remove_manual_assignment → remove_task_assignment → resume → set_attribute_value → set_case_deadline → set_task_assignments → start_case → start_task → suspend → sweep_automatic_transitions → sweep_hold_timeout → sweep_timed_transitions → task_action ::xo::db::sql::workflow_case->::xotcl::Object

Class ::xo::db::sql::workflow_case

::xo::db::sql::workflow_case[i] create ...
Defined in

Class Relations

  • class: ::xo::db::Class[i]
  • superclass: ::xotcl::Object[i]
::xo::db::Class create ::xo::db::sql::workflow_case \
     -superclass ::xotcl::Object

Methods (to be applied on the object)

  • add_manual_assignment (scripted, public)

     xo::db::sql::workflow_case[i] add_manual_assignment [ -dbn dbn ] \
    -case_id case_id  -role_key role_key  -party_id party_id

    Automatically generated method

    Switches:
    -dbn (optional)
    -case_id (required)
    -role_key (required)
    -party_id (required)

    Testcases:
    No testcase defined.
    #function_args: {CASE_ID {}} {ROLE_KEY {}} {PARTY_ID {}}
foreach var [list CASE_ID ROLE_KEY PARTY_ID]  {
  set varname [string tolower $var]
  if {[info exists $varname]} {
    set $var [set $varname]
    set _$var :$var
  } else {
    set _$var null
  }
}
set sql "
select workflow_case__add_manual_assignment($_CASE_ID, $_ROLE_KEY, $_PARTY_ID) 
    "
db_with_handle -dbn $dbn db {
  #ns_log notice "--sql=$sql"
  return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}

  • add_task_assignment (scripted, public)

     xo::db::sql::workflow_case[i] add_task_assignment [ -dbn dbn ] \
    -task_id task_id  -party_id party_id  -permanent_p permanent_p

    Automatically generated method

    Switches:
    -dbn (optional)
    -task_id (required)
    -party_id (required)
    -permanent_p (required)

    Testcases:
    No testcase defined.
    #function_args: {TASK_ID {}} {PARTY_ID {}} {PERMANENT_P {}}
foreach var [list TASK_ID PARTY_ID PERMANENT_P]  {
  set varname [string tolower $var]
  if {[info exists $varname]} {
    set $var [set $varname]
    set _$var :$var
  } else {
    set _$var null
  }
}
set sql "
select workflow_case__add_task_assignment($_TASK_ID, $_PARTY_ID, $_PERMANENT_P) 
    "
db_with_handle -dbn $dbn db {
  #ns_log notice "--sql=$sql"
  return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}

  • add_token (scripted, public)

     xo::db::sql::workflow_case[i] add_token [ -dbn dbn ] -case_id case_id  \
    -place_key place_key  -journal_id journal_id

    Automatically generated method

    Switches:
    -dbn (optional)
    -case_id (required)
    -place_key (required)
    -journal_id (required)

    Testcases:
    No testcase defined.
    #function_args: {CASE_ID {}} {PLACE_KEY {}} {JOURNAL_ID {}}
foreach var [list CASE_ID PLACE_KEY JOURNAL_ID]  {
  set varname [string tolower $var]
  if {[info exists $varname]} {
    set $var [set $varname]
    set _$var :$var
  } else {
    set _$var null
  }
}
set sql "
select workflow_case__add_token($_CASE_ID, $_PLACE_KEY, $_JOURNAL_ID) 
    "
db_with_handle -dbn $dbn db {
  #ns_log notice "--sql=$sql"
  return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}

  • begin_task_action (scripted, public)

     xo::db::sql::workflow_case[i] begin_task_action [ -dbn dbn ] \
    -task_id task_id  -action action  -action_ip action_ip  \
    -user_id user_id  [ -msg msg ]

    Automatically generated method

    Switches:
    -dbn (optional)
    -task_id (required)
    -action (required)
    -action_ip (required)
    -user_id (required)
    -msg (optional)

    Testcases:
    No testcase defined.
    #function_args: {TASK_ID {}} {ACTION {}} {ACTION_IP {}} {USER_ID {}} {MSG null}
foreach var [list TASK_ID ACTION ACTION_IP USER_ID MSG]  {
  set varname [string tolower $var]
  if {[info exists $varname]} {
    set $var [set $varname]
    set _$var :$var
  } else {
    set _$var null
  }
}
set sql "
select workflow_case__begin_task_action($_TASK_ID, $_ACTION, $_ACTION_IP, $_USER_ID, $_MSG) 
    "
db_with_handle -dbn $dbn db {
  #ns_log notice "--sql=$sql"
  return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}

  • cancel (scripted, public)

     xo::db::sql::workflow_case[i] cancel [ -dbn dbn ] -case_id case_id  \
    [ -user_id user_id ] [ -ip_address ip_address ] [ -msg msg ]

    Automatically generated method

    Switches:
    -dbn (optional)
    -case_id (required)
    -user_id (optional)
    -ip_address (optional)
    -msg (optional)

    Testcases:
    No testcase defined.
    #function_args: {CASE_ID {}} {USER_ID null} {IP_ADDRESS null} {MSG null}
foreach var [list CASE_ID USER_ID IP_ADDRESS MSG]  {
  set varname [string tolower $var]
  if {[info exists $varname]} {
    set $var [set $varname]
    set _$var :$var
  } else {
    set _$var null
  }
}
set sql "
select workflow_case__cancel($_CASE_ID, $_USER_ID, $_IP_ADDRESS, $_MSG) 
    "
db_with_handle -dbn $dbn db {
  #ns_log notice "--sql=$sql"
  return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}

  • cancel_task (scripted, public)

     xo::db::sql::workflow_case[i] cancel_task [ -dbn dbn ] -task_id task_id  \
    -journal_id journal_id

    Automatically generated method

    Switches:
    -dbn (optional)
    -task_id (required)
    -journal_id (required)

    Testcases:
    No testcase defined.
    #function_args: {TASK_ID {}} {JOURNAL_ID {}}
foreach var [list TASK_ID JOURNAL_ID]  {
  set varname [string tolower $var]
  if {[info exists $varname]} {
    set $var [set $varname]
    set _$var :$var
  } else {
    set _$var null
  }
}
set sql "
select workflow_case__cancel_task($_TASK_ID, $_JOURNAL_ID) 
    "
db_with_handle -dbn $dbn db {
  #ns_log notice "--sql=$sql"
  return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}

  • clear_manual_assignments (scripted, public)

     xo::db::sql::workflow_case[i] clear_manual_assignments [ -dbn dbn ] \
    -case_id case_id  -role_key role_key

    Automatically generated method

    Switches:
    -dbn (optional)
    -case_id (required)
    -role_key (required)

    Testcases:
    No testcase defined.
    #function_args: {CASE_ID {}} {ROLE_KEY {}}
foreach var [list CASE_ID ROLE_KEY]  {
  set varname [string tolower $var]
  if {[info exists $varname]} {
    set $var [set $varname]
    set _$var :$var
  } else {
    set _$var null
  }
}
set sql "
select workflow_case__clear_manual_assignments($_CASE_ID, $_ROLE_KEY) 
    "
db_with_handle -dbn $dbn db {
  #ns_log notice "--sql=$sql"
  return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}

  • clear_task_assignments (scripted, public)

     xo::db::sql::workflow_case[i] clear_task_assignments [ -dbn dbn ] \
    -task_id task_id  -permanent_p permanent_p

    Automatically generated method

    Switches:
    -dbn (optional)
    -task_id (required)
    -permanent_p (required)

    Testcases:
    No testcase defined.
    #function_args: {TASK_ID {}} {PERMANENT_P {}}
foreach var [list TASK_ID PERMANENT_P]  {
  set varname [string tolower $var]
  if {[info exists $varname]} {
    set $var [set $varname]
    set _$var :$var
  } else {
    set _$var null
  }
}
set sql "
select workflow_case__clear_task_assignments($_TASK_ID, $_PERMANENT_P) 
    "
db_with_handle -dbn $dbn db {
  #ns_log notice "--sql=$sql"
  return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}

  • consume_token (scripted, public)

     xo::db::sql::workflow_case[i] consume_token [ -dbn dbn ] \
    -case_id case_id  -place_key place_key  -journal_id journal_id  \
    [ -task_id task_id ]

    Automatically generated method

    Switches:
    -dbn (optional)
    -case_id (required)
    -place_key (required)
    -journal_id (required)
    -task_id (optional)

    Testcases:
    No testcase defined.
    #function_args: {CASE_ID {}} {PLACE_KEY {}} {JOURNAL_ID {}} {TASK_ID null}
foreach var [list CASE_ID PLACE_KEY JOURNAL_ID TASK_ID]  {
  set varname [string tolower $var]
  if {[info exists $varname]} {
    set $var [set $varname]
    set _$var :$var
  } else {
    set _$var null
  }
}
set sql "
select workflow_case__consume_token($_CASE_ID, $_PLACE_KEY, $_JOURNAL_ID, $_TASK_ID) 
    "
db_with_handle -dbn $dbn db {
  #ns_log notice "--sql=$sql"
  return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}

  • delete (scripted, public)

     xo::db::sql::workflow_case[i] delete [ -dbn dbn ] -case_id case_id

    Automatically generated method

    Switches:
    -dbn (optional)
    -case_id (required)

    Testcases:
    No testcase defined.
    #function_args: {CASE_ID {}}
foreach var [list CASE_ID]  {
  set varname [string tolower $var]
  if {[info exists $varname]} {
    set $var [set $varname]
    set _$var :$var
  } else {
    set _$var null
  }
}
set sql "
select workflow_case__delete($_CASE_ID) 
    "
db_with_handle -dbn $dbn db {
  #ns_log notice "--sql=$sql"
  return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}

  • enable_transitions (scripted, public)

     xo::db::sql::workflow_case[i] enable_transitions [ -dbn dbn ] \
    -case_id case_id

    Automatically generated method

    Switches:
    -dbn (optional)
    -case_id (required)

    Testcases:
    No testcase defined.
    #function_args: {CASE_ID {}}
foreach var [list CASE_ID]  {
  set varname [string tolower $var]
  if {[info exists $varname]} {
    set $var [set $varname]
    set _$var :$var
  } else {
    set _$var null
  }
}
set sql "
select workflow_case__enable_transitions($_CASE_ID) 
    "
db_with_handle -dbn $dbn db {
  #ns_log notice "--sql=$sql"
  return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}

  • end_task_action (scripted, public)

     xo::db::sql::workflow_case[i] end_task_action [ -dbn dbn ] \
    -journal_id journal_id  -action action  -task_id task_id

    Automatically generated method

    Switches:
    -dbn (optional)
    -journal_id (required)
    -action (required)
    -task_id (required)

    Testcases:
    No testcase defined.
    #function_args: {JOURNAL_ID {}} {ACTION {}} {TASK_ID {}}
foreach var [list JOURNAL_ID ACTION TASK_ID]  {
  set varname [string tolower $var]
  if {[info exists $varname]} {
    set $var [set $varname]
    set _$var :$var
  } else {
    set _$var null
  }
}
set sql "
select workflow_case__end_task_action($_JOURNAL_ID, $_ACTION, $_TASK_ID) 
    "
db_with_handle -dbn $dbn db {
  #ns_log notice "--sql=$sql"
  return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}

  • ensure_task_in_state (scripted, public)

     xo::db::sql::workflow_case[i] ensure_task_in_state [ -dbn dbn ] \
    -task_id task_id  -state state

    Automatically generated method

    Switches:
    -dbn (optional)
    -task_id (required)
    -state (required)

    Testcases:
    No testcase defined.
    #function_args: {TASK_ID {}} {STATE {}}
foreach var [list TASK_ID STATE]  {
  set varname [string tolower $var]
  if {[info exists $varname]} {
    set $var [set $varname]
    set _$var :$var
  } else {
    set _$var null
  }
}
set sql "
select workflow_case__ensure_task_in_state($_TASK_ID, $_STATE) 
    "
db_with_handle -dbn $dbn db {
  #ns_log notice "--sql=$sql"
  return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}

  • evaluate_guard (scripted, public)

     xo::db::sql::workflow_case[i] evaluate_guard [ -dbn dbn ] \
    -callback callback  -custom_arg custom_arg  -case_id case_id  \
    -workflow_key workflow_key  -transition_key transition_key  \
    -place_key place_key  -direction direction

    Automatically generated method

    Switches:
    -dbn (optional)
    -callback (required)
    -custom_arg (required)
    -case_id (required)
    -workflow_key (required)
    -transition_key (required)
    -place_key (required)
    -direction (required)

    Testcases:
    No testcase defined.
    #function_args: {CALLBACK {}} {CUSTOM_ARG {}} {CASE_ID {}} {WORKFLOW_KEY {}} {TRANSITION_KEY {}} {PLACE_KEY {}} {DIRECTION {}}
foreach var [list CALLBACK CUSTOM_ARG CASE_ID WORKFLOW_KEY TRANSITION_KEY PLACE_KEY DIRECTION]  {
  set varname [string tolower $var]
  if {[info exists $varname]} {
    set $var [set $varname]
    set _$var :$var
  } else {
    set _$var null
  }
}
set sql "
select workflow_case__evaluate_guard($_CALLBACK, $_CUSTOM_ARG, $_CASE_ID, $_WORKFLOW_KEY, $_TRANSITION_KEY, $_PLACE_KEY, $_DIRECTION) 
    "
db_with_handle -dbn $dbn db {
  #ns_log notice "--sql=$sql"
  return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}

  • execute_hold_timeout_callback (scripted, public)

     xo::db::sql::workflow_case[i] execute_hold_timeout_callback [ -dbn dbn ] \
    -callback callback  -custom_arg custom_arg  -case_id case_id  \
    -transition_key transition_key

    Automatically generated method

    Switches:
    -dbn (optional)
    -callback (required)
    -custom_arg (required)
    -case_id (required)
    -transition_key (required)

    Testcases:
    No testcase defined.
    #function_args: {CALLBACK {}} {CUSTOM_ARG {}} {CASE_ID {}} {TRANSITION_KEY {}}
foreach var [list CALLBACK CUSTOM_ARG CASE_ID TRANSITION_KEY]  {
  set varname [string tolower $var]
  if {[info exists $varname]} {
    set $var [set $varname]
    set _$var :$var
  } else {
    set _$var null
  }
}
set sql "
select workflow_case__execute_hold_timeout_callback($_CALLBACK, $_CUSTOM_ARG, $_CASE_ID, $_TRANSITION_KEY) 
    "
db_with_handle -dbn $dbn db {
  #ns_log notice "--sql=$sql"
  return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}

  • execute_time_callback (scripted, public)

     xo::db::sql::workflow_case[i] execute_time_callback [ -dbn dbn ] \
    -callback callback  -custom_arg custom_arg  -case_id case_id  \
    -transition_key transition_key

    Automatically generated method

    Switches:
    -dbn (optional)
    -callback (required)
    -custom_arg (required)
    -case_id (required)
    -transition_key (required)

    Testcases:
    No testcase defined.
    #function_args: {CALLBACK {}} {CUSTOM_ARG {}} {CASE_ID {}} {TRANSITION_KEY {}}
foreach var [list CALLBACK CUSTOM_ARG CASE_ID TRANSITION_KEY]  {
  set varname [string tolower $var]
  if {[info exists $varname]} {
    set $var [set $varname]
    set _$var :$var
  } else {
    set _$var null
  }
}
set sql "
select workflow_case__execute_time_callback($_CALLBACK, $_CUSTOM_ARG, $_CASE_ID, $_TRANSITION_KEY) 
    "
db_with_handle -dbn $dbn db {
  #ns_log notice "--sql=$sql"
  return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}

  • execute_transition_callback (scripted, public)

     xo::db::sql::workflow_case[i] execute_transition_callback [ -dbn dbn ] \
    -callback callback  -custom_arg custom_arg  -case_id case_id  \
    -transition_key transition_key

    Automatically generated method

    Switches:
    -dbn (optional)
    -callback (required)
    -custom_arg (required)
    -case_id (required)
    -transition_key (required)

    Testcases:
    No testcase defined.
    #function_args: {CALLBACK {}} {CUSTOM_ARG {}} {CASE_ID {}} {TRANSITION_KEY {}}
foreach var [list CALLBACK CUSTOM_ARG CASE_ID TRANSITION_KEY]  {
  set varname [string tolower $var]
  if {[info exists $varname]} {
    set $var [set $varname]
    set _$var :$var
  } else {
    set _$var null
  }
}
set sql "
select workflow_case__execute_transition_callback($_CALLBACK, $_CUSTOM_ARG, $_CASE_ID, $_TRANSITION_KEY) 
    "
db_with_handle -dbn $dbn db {
  #ns_log notice "--sql=$sql"
  return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}

  • execute_unassigned_callback (scripted, public)

     xo::db::sql::workflow_case[i] execute_unassigned_callback [ -dbn dbn ] \
    -callback callback  -task_id task_id  -custom_arg custom_arg

    Automatically generated method

    Switches:
    -dbn (optional)
    -callback (required)
    -task_id (required)
    -custom_arg (required)

    Testcases:
    No testcase defined.
    #function_args: {CALLBACK {}} {TASK_ID {}} {CUSTOM_ARG {}}
foreach var [list CALLBACK TASK_ID CUSTOM_ARG]  {
  set varname [string tolower $var]
  if {[info exists $varname]} {
    set $var [set $varname]
    set _$var :$var
  } else {
    set _$var null
  }
}
set sql "
select workflow_case__execute_unassigned_callback($_CALLBACK, $_TASK_ID, $_CUSTOM_ARG) 
    "
db_with_handle -dbn $dbn db {
  #ns_log notice "--sql=$sql"
  return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}

  • finish_task (scripted, public)

     xo::db::sql::workflow_case[i] finish_task [ -dbn dbn ] -task_id task_id  \
    -journal_id journal_id

    Automatically generated method

    Switches:
    -dbn (optional)
    -task_id (required)
    -journal_id (required)

    Testcases:
    No testcase defined.
    #function_args: {TASK_ID {}} {JOURNAL_ID {}}
foreach var [list TASK_ID JOURNAL_ID]  {
  set varname [string tolower $var]
  if {[info exists $varname]} {
    set $var [set $varname]
    set _$var :$var
  } else {
    set _$var null
  }
}
set sql "
select workflow_case__finish_task($_TASK_ID, $_JOURNAL_ID) 
    "
db_with_handle -dbn $dbn db {
  #ns_log notice "--sql=$sql"
  return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}

  • finished_p (scripted, public)

     xo::db::sql::workflow_case[i] finished_p [ -dbn dbn ] -case_id case_id  \
    -journal_id journal_id

    Automatically generated method

    Switches:
    -dbn (optional)
    -case_id (required)
    -journal_id (required)

    Testcases:
    No testcase defined.
    #function_args: {CASE_ID {}} {JOURNAL_ID {}}
foreach var [list CASE_ID JOURNAL_ID]  {
  set varname [string tolower $var]
  if {[info exists $varname]} {
    set $var [set $varname]
    set _$var :$var
  } else {
    set _$var null
  }
}
set sql "
select workflow_case__finished_p($_CASE_ID, $_JOURNAL_ID) 
    "
db_with_handle -dbn $dbn db {
  #ns_log notice "--sql=$sql"
  return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}

  • fire_message_transition (scripted, public)

     xo::db::sql::workflow_case[i] fire_message_transition [ -dbn dbn ] \
    -task_id task_id

    Automatically generated method

    Switches:
    -dbn (optional)
    -task_id (required)

    Testcases:
    No testcase defined.
    #function_args: {TASK_ID {}}
foreach var [list TASK_ID]  {
  set varname [string tolower $var]
  if {[info exists $varname]} {
    set $var [set $varname]
    set _$var :$var
  } else {
    set _$var null
  }
}
set sql "
select workflow_case__fire_message_transition($_TASK_ID) 
    "
db_with_handle -dbn $dbn db {
  #ns_log notice "--sql=$sql"
  return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}

  • fire_transition_internal (scripted, public)

     xo::db::sql::workflow_case[i] fire_transition_internal [ -dbn dbn ] \
    -task_id task_id  -journal_id journal_id

    Automatically generated method

    Switches:
    -dbn (optional)
    -task_id (required)
    -journal_id (required)

    Testcases:
    No testcase defined.
    #function_args: {TASK_ID {}} {JOURNAL_ID {}}
foreach var [list TASK_ID JOURNAL_ID]  {
  set varname [string tolower $var]
  if {[info exists $varname]} {
    set $var [set $varname]
    set _$var :$var
  } else {
    set _$var null
  }
}
set sql "
select workflow_case__fire_transition_internal($_TASK_ID, $_JOURNAL_ID) 
    "
db_with_handle -dbn $dbn db {
  #ns_log notice "--sql=$sql"
  return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}

  • get_attribute_value (scripted, public)

     xo::db::sql::workflow_case[i] get_attribute_value [ -dbn dbn ] \
    -case_id case_id  -attribute_name attribute_name

    Automatically generated method

    Switches:
    -dbn (optional)
    -case_id (required)
    -attribute_name (required)

    Testcases:
    No testcase defined.
    #function_args: {CASE_ID {}} {ATTRIBUTE_NAME {}}
foreach var [list CASE_ID ATTRIBUTE_NAME]  {
  set varname [string tolower $var]
  if {[info exists $varname]} {
    set $var [set $varname]
    set _$var :$var
  } else {
    set _$var null
  }
}
set sql "
select workflow_case__get_attribute_value($_CASE_ID, $_ATTRIBUTE_NAME) 
    "
db_with_handle -dbn $dbn db {
  #ns_log notice "--sql=$sql"
  return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}

  • get_task_deadline (scripted, public)

     xo::db::sql::workflow_case[i] get_task_deadline [ -dbn dbn ] \
    -callback callback  -custom_arg custom_arg  \
    -attribute_name attribute_name  -case_id case_id  \
    -transition_key transition_key

    Automatically generated method

    Switches:
    -dbn (optional)
    -callback (required)
    -custom_arg (required)
    -attribute_name (required)
    -case_id (required)
    -transition_key (required)

    Testcases:
    No testcase defined.
    #function_args: {CALLBACK {}} {CUSTOM_ARG {}} {ATTRIBUTE_NAME {}} {CASE_ID {}} {TRANSITION_KEY {}}
foreach var [list CALLBACK CUSTOM_ARG ATTRIBUTE_NAME CASE_ID TRANSITION_KEY]  {
  set varname [string tolower $var]
  if {[info exists $varname]} {
    set $var [set $varname]
    set _$var :$var
  } else {
    set _$var null
  }
}
set sql "
select workflow_case__get_task_deadline($_CALLBACK, $_CUSTOM_ARG, $_ATTRIBUTE_NAME, $_CASE_ID, $_TRANSITION_KEY) 
    "
db_with_handle -dbn $dbn db {
  #ns_log notice "--sql=$sql"
  return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}

  • get_task_id (scripted, public)

     xo::db::sql::workflow_case[i] get_task_id [ -dbn dbn ] -case_id case_id  \
    -transition_key transition_key

    Automatically generated method

    Switches:
    -dbn (optional)
    -case_id (required)
    -transition_key (required)

    Testcases:
    No testcase defined.
    #function_args: {CASE_ID {}} {TRANSITION_KEY {}}
foreach var [list CASE_ID TRANSITION_KEY]  {
  set varname [string tolower $var]
  if {[info exists $varname]} {
    set $var [set $varname]
    set _$var :$var
  } else {
    set _$var null
  }
}
set sql "
select workflow_case__get_task_id($_CASE_ID, $_TRANSITION_KEY) 
    "
db_with_handle -dbn $dbn db {
  #ns_log notice "--sql=$sql"
  return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}

  • lock_token (scripted, public)

     xo::db::sql::workflow_case[i] lock_token [ -dbn dbn ] -case_id case_id  \
    -place_key place_key  -journal_id journal_id  -task_id task_id

    Automatically generated method

    Switches:
    -dbn (optional)
    -case_id (required)
    -place_key (required)
    -journal_id (required)
    -task_id (required)

    Testcases:
    No testcase defined.
    #function_args: {CASE_ID {}} {PLACE_KEY {}} {JOURNAL_ID {}} {TASK_ID {}}
foreach var [list CASE_ID PLACE_KEY JOURNAL_ID TASK_ID]  {
  set varname [string tolower $var]
  if {[info exists $varname]} {
    set $var [set $varname]
    set _$var :$var
  } else {
    set _$var null
  }
}
set sql "
select workflow_case__lock_token($_CASE_ID, $_PLACE_KEY, $_JOURNAL_ID, $_TASK_ID) 
    "
db_with_handle -dbn $dbn db {
  #ns_log notice "--sql=$sql"
  return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}

  • new (scripted, public)

     xo::db::sql::workflow_case[i] new [ -dbn dbn ] [ -case_id case_id ] \
    -workflow_key workflow_key  [ -context_key context_key ] \
    -object_id object_id  [ -creation_date creation_date ] \
    [ -creation_user creation_user ] [ -creation_ip creation_ip ] \
    [ -childof childof ]

    Automatically generated method

    Switches:
    -dbn (optional)
    -case_id (optional)
    -workflow_key (required)
    -context_key (optional)
    -object_id (required)
    -creation_date (optional, defaults to "now()")
    -creation_user (optional)
    -creation_ip (optional)
    -childof (optional)

    Testcases:
    No testcase defined.
    #function_args: {CASE_ID null} {WORKFLOW_KEY {}} {CONTEXT_KEY null} {OBJECT_ID {}} {CREATION_DATE now()} {CREATION_USER null} {CREATION_IP null}
foreach var [list CASE_ID WORKFLOW_KEY CONTEXT_KEY OBJECT_ID CREATION_DATE CREATION_USER CREATION_IP]  {
  set varname [string tolower $var]
  if {[info exists $varname]} {
    set $var [set $varname]
    set _$var :$var
  } else {
    set _$var null
  }
}
set sql "
select workflow_case__new($_CASE_ID, $_WORKFLOW_KEY, $_CONTEXT_KEY, $_OBJECT_ID, $_CREATION_DATE, $_CREATION_USER, $_CREATION_IP) 
    "
db_with_handle -dbn $dbn db {
  #ns_log notice "--sql=$sql"
  return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}

  • notify_assignee (scripted, public)

     xo::db::sql::workflow_case[i] notify_assignee [ -dbn dbn ] \
    -task_id task_id  -user_id user_id  -callback callback  \
    -custom_arg custom_arg

    Automatically generated method

    Switches:
    -dbn (optional)
    -task_id (required)
    -user_id (required)
    -callback (required)
    -custom_arg (required)

    Testcases:
    No testcase defined.
    #function_args: {TASK_ID {}} {USER_ID {}} {CALLBACK {}} {CUSTOM_ARG {}}
foreach var [list TASK_ID USER_ID CALLBACK CUSTOM_ARG]  {
  set varname [string tolower $var]
  if {[info exists $varname]} {
    set $var [set $varname]
    set _$var :$var
  } else {
    set _$var null
  }
}
set sql "
select workflow_case__notify_assignee($_TASK_ID, $_USER_ID, $_CALLBACK, $_CUSTOM_ARG) 
    "
db_with_handle -dbn $dbn db {
  #ns_log notice "--sql=$sql"
  return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}

  • release_token (scripted, public)

     xo::db::sql::workflow_case[i] release_token [ -dbn dbn ] \
    -task_id task_id  -journal_id journal_id

    Automatically generated method

    Switches:
    -dbn (optional)
    -task_id (required)
    -journal_id (required)

    Testcases:
    No testcase defined.
    #function_args: {TASK_ID {}} {JOURNAL_ID {}}
foreach var [list TASK_ID JOURNAL_ID]  {
  set varname [string tolower $var]
  if {[info exists $varname]} {
    set $var [set $varname]
    set _$var :$var
  } else {
    set _$var null
  }
}
set sql "
select workflow_case__release_token($_TASK_ID, $_JOURNAL_ID) 
    "
db_with_handle -dbn $dbn db {
  #ns_log notice "--sql=$sql"
  return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}

  • remove_case_deadline (scripted, public)

     xo::db::sql::workflow_case[i] remove_case_deadline [ -dbn dbn ] \
    -case_id case_id  -transition_key transition_key

    Automatically generated method

    Switches:
    -dbn (optional)
    -case_id (required)
    -transition_key (required)

    Testcases:
    No testcase defined.
    #function_args: {CASE_ID {}} {TRANSITION_KEY {}}
foreach var [list CASE_ID TRANSITION_KEY]  {
  set varname [string tolower $var]
  if {[info exists $varname]} {
    set $var [set $varname]
    set _$var :$var
  } else {
    set _$var null
  }
}
set sql "
select workflow_case__remove_case_deadline($_CASE_ID, $_TRANSITION_KEY) 
    "
db_with_handle -dbn $dbn db {
  #ns_log notice "--sql=$sql"
  return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}

  • remove_manual_assignment (scripted, public)

     xo::db::sql::workflow_case[i] remove_manual_assignment [ -dbn dbn ] \
    -case_id case_id  -role_key role_key  -party_id party_id

    Automatically generated method

    Switches:
    -dbn (optional)
    -case_id (required)
    -role_key (required)
    -party_id (required)

    Testcases:
    No testcase defined.
    #function_args: {CASE_ID {}} {ROLE_KEY {}} {PARTY_ID {}}
foreach var [list CASE_ID ROLE_KEY PARTY_ID]  {
  set varname [string tolower $var]
  if {[info exists $varname]} {
    set $var [set $varname]
    set _$var :$var
  } else {
    set _$var null
  }
}
set sql "
select workflow_case__remove_manual_assignment($_CASE_ID, $_ROLE_KEY, $_PARTY_ID) 
    "
db_with_handle -dbn $dbn db {
  #ns_log notice "--sql=$sql"
  return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}

  • remove_task_assignment (scripted, public)

     xo::db::sql::workflow_case[i] remove_task_assignment [ -dbn dbn ] \
    -task_id task_id  -party_id party_id  -permanent_p permanent_p

    Automatically generated method

    Switches:
    -dbn (optional)
    -task_id (required)
    -party_id (required)
    -permanent_p (required)

    Testcases:
    No testcase defined.
    #function_args: {TASK_ID {}} {PARTY_ID {}} {PERMANENT_P {}}
foreach var [list TASK_ID PARTY_ID PERMANENT_P]  {
  set varname [string tolower $var]
  if {[info exists $varname]} {
    set $var [set $varname]
    set _$var :$var
  } else {
    set _$var null
  }
}
set sql "
select workflow_case__remove_task_assignment($_TASK_ID, $_PARTY_ID, $_PERMANENT_P) 
    "
db_with_handle -dbn $dbn db {
  #ns_log notice "--sql=$sql"
  return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}

  • resume (scripted, public)

     xo::db::sql::workflow_case[i] resume [ -dbn dbn ] -case_id case_id  \
    [ -user_id user_id ] [ -ip_address ip_address ] [ -msg msg ]

    Automatically generated method

    Switches:
    -dbn (optional)
    -case_id (required)
    -user_id (optional)
    -ip_address (optional)
    -msg (optional)

    Testcases:
    No testcase defined.
    #function_args: {CASE_ID {}} {USER_ID null} {IP_ADDRESS null} {MSG null}
foreach var [list CASE_ID USER_ID IP_ADDRESS MSG]  {
  set varname [string tolower $var]
  if {[info exists $varname]} {
    set $var [set $varname]
    set _$var :$var
  } else {
    set _$var null
  }
}
set sql "
select workflow_case__resume($_CASE_ID, $_USER_ID, $_IP_ADDRESS, $_MSG) 
    "
db_with_handle -dbn $dbn db {
  #ns_log notice "--sql=$sql"
  return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}

  • set_attribute_value (scripted, public)

     xo::db::sql::workflow_case[i] set_attribute_value [ -dbn dbn ] \
    -journal_id journal_id  -attribute_name attribute_name  \
    -value value

    Automatically generated method

    Switches:
    -dbn (optional)
    -journal_id (required)
    -attribute_name (required)
    -value (required)

    Testcases:
    No testcase defined.
    #function_args: {JOURNAL_ID {}} {ATTRIBUTE_NAME {}} {VALUE {}}
foreach var [list JOURNAL_ID ATTRIBUTE_NAME VALUE]  {
  set varname [string tolower $var]
  if {[info exists $varname]} {
    set $var [set $varname]
    set _$var :$var
  } else {
    set _$var null
  }
}
set sql "
select workflow_case__set_attribute_value($_JOURNAL_ID, $_ATTRIBUTE_NAME, $_VALUE) 
    "
db_with_handle -dbn $dbn db {
  #ns_log notice "--sql=$sql"
  return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}

  • set_case_deadline (scripted, public)

     xo::db::sql::workflow_case[i] set_case_deadline [ -dbn dbn ] \
    -case_id case_id  -transition_key transition_key  \
    -deadline deadline

    Automatically generated method

    Switches:
    -dbn (optional)
    -case_id (required)
    -transition_key (required)
    -deadline (required)

    Testcases:
    No testcase defined.
    #function_args: {CASE_ID {}} {TRANSITION_KEY {}} {DEADLINE {}}
foreach var [list CASE_ID TRANSITION_KEY DEADLINE]  {
  set varname [string tolower $var]
  if {[info exists $varname]} {
    set $var [set $varname]
    set _$var :$var
  } else {
    set _$var null
  }
}
set sql "
select workflow_case__set_case_deadline($_CASE_ID, $_TRANSITION_KEY, $_DEADLINE) 
    "
db_with_handle -dbn $dbn db {
  #ns_log notice "--sql=$sql"
  return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}

  • set_task_assignments (scripted, public)

     xo::db::sql::workflow_case[i] set_task_assignments [ -dbn dbn ] \
    -task_id task_id  -callback callback  -custom_arg custom_arg

    Automatically generated method

    Switches:
    -dbn (optional)
    -task_id (required)
    -callback (required)
    -custom_arg (required)

    Testcases:
    No testcase defined.
    #function_args: {TASK_ID {}} {CALLBACK {}} {CUSTOM_ARG {}}
foreach var [list TASK_ID CALLBACK CUSTOM_ARG]  {
  set varname [string tolower $var]
  if {[info exists $varname]} {
    set $var [set $varname]
    set _$var :$var
  } else {
    set _$var null
  }
}
set sql "
select workflow_case__set_task_assignments($_TASK_ID, $_CALLBACK, $_CUSTOM_ARG) 
    "
db_with_handle -dbn $dbn db {
  #ns_log notice "--sql=$sql"
  return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}

  • start_case (scripted, public)

     xo::db::sql::workflow_case[i] start_case [ -dbn dbn ] -case_id case_id  \
    [ -creation_user creation_user ] [ -creation_ip creation_ip ] \
    [ -msg msg ]

    Automatically generated method

    Switches:
    -dbn (optional)
    -case_id (required)
    -creation_user (optional)
    -creation_ip (optional)
    -msg (optional)

    Testcases:
    No testcase defined.
    #function_args: {CASE_ID {}} {CREATION_USER null} {CREATION_IP null} {MSG null}
foreach var [list CASE_ID CREATION_USER CREATION_IP MSG]  {
  set varname [string tolower $var]
  if {[info exists $varname]} {
    set $var [set $varname]
    set _$var :$var
  } else {
    set _$var null
  }
}
set sql "
select workflow_case__start_case($_CASE_ID, $_CREATION_USER, $_CREATION_IP, $_MSG) 
    "
db_with_handle -dbn $dbn db {
  #ns_log notice "--sql=$sql"
  return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}

  • start_task (scripted, public)

     xo::db::sql::workflow_case[i] start_task [ -dbn dbn ] -task_id task_id  \
    -user_id user_id  -journal_id journal_id

    Automatically generated method

    Switches:
    -dbn (optional)
    -task_id (required)
    -user_id (required)
    -journal_id (required)

    Testcases:
    No testcase defined.
    #function_args: {TASK_ID {}} {USER_ID {}} {JOURNAL_ID {}}
foreach var [list TASK_ID USER_ID JOURNAL_ID]  {
  set varname [string tolower $var]
  if {[info exists $varname]} {
    set $var [set $varname]
    set _$var :$var
  } else {
    set _$var null
  }
}
set sql "
select workflow_case__start_task($_TASK_ID, $_USER_ID, $_JOURNAL_ID) 
    "
db_with_handle -dbn $dbn db {
  #ns_log notice "--sql=$sql"
  return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}

  • suspend (scripted, public)

     xo::db::sql::workflow_case[i] suspend [ -dbn dbn ] -case_id case_id  \
    [ -user_id user_id ] [ -ip_address ip_address ] [ -msg msg ]

    Automatically generated method

    Switches:
    -dbn (optional)
    -case_id (required)
    -user_id (optional)
    -ip_address (optional)
    -msg (optional)

    Testcases:
    No testcase defined.
    #function_args: {CASE_ID {}} {USER_ID null} {IP_ADDRESS null} {MSG null}
foreach var [list CASE_ID USER_ID IP_ADDRESS MSG]  {
  set varname [string tolower $var]
  if {[info exists $varname]} {
    set $var [set $varname]
    set _$var :$var
  } else {
    set _$var null
  }
}
set sql "
select workflow_case__suspend($_CASE_ID, $_USER_ID, $_IP_ADDRESS, $_MSG) 
    "
db_with_handle -dbn $dbn db {
  #ns_log notice "--sql=$sql"
  return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}

  • sweep_automatic_transitions (scripted, public)

     xo::db::sql::workflow_case[i] sweep_automatic_transitions [ -dbn dbn ] \
    -case_id case_id  -journal_id journal_id

    Automatically generated method

    Switches:
    -dbn (optional)
    -case_id (required)
    -journal_id (required)

    Testcases:
    No testcase defined.
    #function_args: {CASE_ID {}} {JOURNAL_ID {}}
foreach var [list CASE_ID JOURNAL_ID]  {
  set varname [string tolower $var]
  if {[info exists $varname]} {
    set $var [set $varname]
    set _$var :$var
  } else {
    set _$var null
  }
}
set sql "
select workflow_case__sweep_automatic_transitions($_CASE_ID, $_JOURNAL_ID) 
    "
db_with_handle -dbn $dbn db {
  #ns_log notice "--sql=$sql"
  return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}

  • sweep_hold_timeout (scripted, public)

     xo::db::sql::workflow_case[i] sweep_hold_timeout [ -dbn dbn ]

    Automatically generated method

    Switches:
    -dbn (optional)

    Testcases:
    No testcase defined.
    #function_args: 
foreach var [list ]  {
  set varname [string tolower $var]
  if {[info exists $varname]} {
    set $var [set $varname]
    set _$var :$var
  } else {
    set _$var null
  }
}
set sql "
select workflow_case__sweep_hold_timeout() 
    "
db_with_handle -dbn $dbn db {
  #ns_log notice "--sql=$sql"
  return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}

  • sweep_timed_transitions (scripted, public)

     xo::db::sql::workflow_case[i] sweep_timed_transitions [ -dbn dbn ]

    Automatically generated method

    Switches:
    -dbn (optional)

    Testcases:
    No testcase defined.
    #function_args: 
foreach var [list ]  {
  set varname [string tolower $var]
  if {[info exists $varname]} {
    set $var [set $varname]
    set _$var :$var
  } else {
    set _$var null
  }
}
set sql "
select workflow_case__sweep_timed_transitions() 
    "
db_with_handle -dbn $dbn db {
  #ns_log notice "--sql=$sql"
  return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}

  • task_action (scripted, public)

     xo::db::sql::workflow_case[i] task_action [ -dbn dbn ] -task_id task_id  \
    -action action  -action_ip action_ip  -user_id user_id  \
    [ -msg msg ]

    Automatically generated method

    Switches:
    -dbn (optional)
    -task_id (required)
    -action (required)
    -action_ip (required)
    -user_id (required)
    -msg (optional)

    Testcases:
    No testcase defined.
    #function_args: {TASK_ID {}} {ACTION {}} {ACTION_IP {}} {USER_ID {}} {MSG null}
foreach var [list TASK_ID ACTION ACTION_IP USER_ID MSG]  {
  set varname [string tolower $var]
  if {[info exists $varname]} {
    set $var [set $varname]
    set _$var :$var
  } else {
    set _$var null
  }
}
set sql "
select workflow_case__task_action($_TASK_ID, $_ACTION, $_ACTION_IP, $_USER_ID, $_MSG) 
    "
db_with_handle -dbn $dbn db {
  #ns_log notice "--sql=$sql"
  return [ ns_set value [ns_pg_bind 0or1row $db $sql] 0 ]
}