chat_room_get_not_cached (private, deprecated)

 chat_room_get_not_cached room_id

Defined in packages/chat/tcl/chat-procs.tcl

Deprecated. Invoking this procedure generates a warning.

Parameters:

room_id

See Also:

• xo::db::chat_room

Partial Call Graph (max 5 caller/called nodes):

Testcases:

No testcase defined.

Source code:

ad_log_deprecated proc chat_room_get_not_cached
    set r [::xo::db::Class get_instance_from_db -id $room_id]
    foreach var [$r info vars] {
        set row($var) [$r set $var]
    }
    # todo: extend oo machinery so these attributes are also returned
    # by get_instance_from_db
    acs_object::get  -object_id $room_id  -array obj
    set row(object_id)      $obj(object_id)
    set row(context_id)     $obj(context_id)
    set row(creation_user)  $obj(creation_user)
    set row(creation_date)  $obj(creation_date_ansi)
    set row(creation_ip)    $obj(creation_ip)
    set row(modifying_user) $obj(modifying_user)
    set row(last_modified)  $obj(last_modified_ansi)
    set row(modifying_ip)   $obj(modifying_ip)
    return [array get row]

XQL Not present:

Generic, PostgreSQL, Oracle