cs_next_session_idWhat it does:
Returns the next value for the session ID.Defined in: /web/philip/tcl/1-cs-defs.tcl
Source code:
set lock [nsv_get cs_session_id_sequence lock]
set counter [nsv_incr cs_session_id_sequence counter]
if { $counter >= 1000 } {
set db [ns_db gethandle clickstream]
nsv_set cs_session_id_sequence nextval [database_to_tcl_string $db "
select cs_session_id_sequence.nextval from dual
"]
set counter 0
nsv_set cs_session_id_sequence counter 0
ns_db releasehandle $db
}
set retvalue [expr { [nsv_get cs_session_id_sequence nextval] + $counter }]
return $retvalue