ds_get_user_id (private)

 ds_get_user_id [ original ]

Defined in packages/acs-developer-support/tcl/acs-developer-support-procs.tcl

Developer support version of ad_get_user_id, used for debugging sites.

Parameters:
original (optional, defaults to "0")

Testcases:
No testcase defined.
Source code:
    set orig_user_id [ds_get_real_user_id]
    if {$original == 0
        && [ds_user_switching_enabled_p]
        && [ds_permission_p]
    } {
        set ds_user_id [ad_get_client_property -default $orig_user_id developer-support user_id]
        return $ds_user_id
    } else {
        return $orig_user_id
    }
XQL Not present:
Generic, PostgreSQL, Oracle
[ hide source ] | [ make this the default ]
Show another procedure: