person::get_bio (public)

 person::get_bio [ -person_id person_id ] [ -exists_var exists_var ]

Defined in packages/acs-tcl/tcl/community-core-procs.tcl

Get the value of the user's bio(graphy) field.

Switches:

-person_id (optional)

-exists_var (optional)

Options:

-person_id

The person_id of the person to get the bio for. Leave blank for currently logged-in user.

-exists_var

The name of a variable in the caller's namespace, which will be set to 1 if the bio column is not null. Leave blank if you're not interested in this information.

Returns:

The bio of the user as a text string.

Author:

Lars Pind <lars@collaboraid.biz>

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

Testcases:

person_procs_test

Source code:

    if { $person_id eq "" } {
        set person_id [ad_conn user_id]
    }

    if { $exists_var ne "" } {
        upvar $exists_var exists_p
    }

    set bio [person::get_person_info -person_id $person_id -element bio]

    set exists_p [expr {$bio ne ""}]

    return $bio

Generic XQL file:

packages/acs-tcl/tcl/community-core-procs.xql

PostgreSQL XQL file:

packages/acs-tcl/tcl/community-core-procs-postgresql.xql

Oracle XQL file:

packages/acs-tcl/tcl/community-core-procs-oracle.xql