ad_proc -public myProc {Var} {} { upvar X_var vv_var set vv_var $Var uplevel { set Y_var "${X_var}bar" } } myProc "foo" set Y_var