Defined in
- Partial Call Graph (max 5 caller/called nodes):
- Testcases:
-
No testcase defined.
Source code:
set startclicks [clock clicks -microseconds]
lassign $argv proc_index debug_p arg_count proc arg
rp_debug -debug $debug_p "Invoking registered procedure $proc"
switch -- $arg_count {
0 { set cmd $proc }
1 { set cmd [list $proc {*}$arg] }
default { set cmd [list $proc $conn {*}$arg] }
}
ad_try -auto_abort=false {
{*}$cmd
} trap {AD EXCEPTION ad_script_abort} {r} {
ns_log notice "rp_invoke_proc: aborted cmd: $cmd"
ds_add rp [list registered_proc $cmd $startclicks [clock clicks -microseconds]]
} on error {errMsg} {
ds_add rp [list registered_proc $cmd $startclicks [clock clicks -microseconds] error $::errorInfo]
rp_debug "error in $proc for [ns_conn method] [ns_conn url]?[ns_conn query] errorInfo is $::errorInfo"
ns_log Error "rp_invoke_proc: '$cmd' returned error: $errMsg\n$::errorInfo"
rp_report_error
} on ok {r} {
ds_add rp [list registered_proc $cmd $startclicks [clock clicks -microseconds]]
} finally {
rp_debug -debug $debug_p "Done Invoking registered procedure $proc"
}
rp_finish_serving_page
XQL Not present:Generic, PostgreSQL, Oracle