CLEAR xPN = "4059712445" xID = "WS8-PHF3-GRT1" WS=Createobject("mssoap.soapclient30") WS.mssoapinit("http://ws2.serviceobjects.net/gp/GeoPhone.asmx?WSDL") Adr = WS.GetPhoneInfo(m.xPN, m.xID) IF Adr.Item(0).childNodes.length > 0 lcProviderName = Adr.Item(0).childNodes.Item(0).firstChild.nodeTypedValue lcProviderURL = Adr.Item(0).childNodes.Item(0).childNodes(1).nodeTypedValue lcProviderCity = Adr.Item(0).childNodes.Item(0).childNodes(2).nodeTypedValue lcProviderState = Adr.Item(0).childNodes.Item(0).lastChild.nodeTypedValue ? lcProviderName ? lcProviderURL ? lcProviderCity ? lcProviderState ENDIF IF Adr.Item(1).childNodes.length > 0 lcContactName = Adr.Item(1).childNodes.Item(0).firstChild.nodeTypedValue lcContactAddress = Adr.Item(1).childNodes.Item(0).childNodes(1).nodeTypedValue lcContactCity = Adr.Item(1).childNodes.Item(0).childNodes(2).nodeTypedValue lcContactState = Adr.Item(1).childNodes.Item(0).childNodes(3).nodeTypedValue lcContactZip = Adr.Item(1).childNodes.Item(0).childNodes(4).nodeTypedValue ? lcContactName ? lcContactAddress ? lcContactCity ? lcContactState ? lcContactZip ENDIF