%curRecord = %{SelectedRecords()};
	Error: Tix Error: Can't locate object method "CLEAR" via package Tcl::Var" at...