Sub FillInstitutionTVRec(node)
	if node.tag = "" then 
		xpath="not (DrugStore_Owner)"
	else
		xpath="DrugStore_Owner='"+node.tag+"'"
	end if
	'alert(xpath)
	'xpath="DrugStore_Owner='90'"
	For Each InsC in EnterpriseXML.childnodes.item( 0 ).selectnodes("TB_DrugStore["+xpath+"]")	
		'alert(InsC.selectsinglenode("DrugStore_UID").text)
		set nNode=tvInstitution.nodes.add (node.index, 4 ,,InsC.selectsinglenode("Institution_Name").text)
		nNode.tag=InsC.selectsinglenode("Institution_UID").text
		FillInstitutionTVRec(nNode)
	Next
End Sub