ad_partner_list_all_varsWhat it does:
Returns a list of pairs. Each pair isDefined in: /web/philip/tcl/ad-partner-defs.tclwhere variable_name is one of the variables in the ad_partner table. This is great for simple text fields
Source code:
# we could use ad_parameter_section (defined in ad-defs.tcl) # but don't want to rely on it being defined already, so we get # the .ini section directly set server_name [ns_info server] set config_path "" append config_path "ns/server/" $server_name "/acs/partner" set ad_partner_vars [ns_configsection $config_path] ns_log Notice "/tcl/ad-partner.tcl has found [ns_set size $ad_partner_vars] variables (specified in $config_path)" set var_list [list] # now we have an ns_set of all the specs for {set i 0} {$i<[ns_set size $ad_partner_vars]} {incr i} { set key [ns_set key $ad_partner_vars $i] if { [string compare $key "Variable"] == 0 } { set value [ns_set value $ad_partner_vars $i] lappend var_list [split $value "|"] } } return $var_list