LOCAL loNotification AS "MSSOAP.SoapClient"
* Do not remove or alter following line. It is used to support IntelliSense for your XML Web service.
*__VFPWSDef__: lonotification = http://www.webservicemart.com/uszip.asmx?wsdl notification , notificationSoap

lcZip = "33029"
loNotification = CREATEOBJECT("MSSOAP.SoapClient")
leRtnVal = loNotification.MSSoapInit("http://www.webservicemart.com/uszip.asmx?wsdl")
leResult = loNotification.ValidateZip(lcZip)

XMLTOCURSOR(leResult,'ZIP')

SELECT ZIP
BROWSE