In proc "proc1": In proc "proc2": --- WARNING ---: variable "id" already exists. Use unset before reference? file "Err.10.tcl" line 35. At or near: "upvar $searchid id" --- ERROR ---: missing " file "Err.10.tcl" line . At or near: ...