![]() |
Chilkat HOME Android™ AutoIt C C# C++ Chilkat2-Python CkPython Classic ASP DataFlex Delphi DLL Go Java Node.js Objective-C PHP Extension Perl PowerBuilder PowerShell PureBasic Ruby SQL Server Swift Tcl Unicode C Unicode C++ VB.NET VBScript Visual Basic 6.0 Visual FoxPro Xojo Plugin
(Xojo Plugin) palena.sii.cl getSeed SOAP RequestDemonstrates how to call getSeed SOAP request at palena.sii.cl Note: This example requires Chilkat v11.0.0 or greater.
Dim success As Boolean success = False Dim http As New Chilkat.Http // This example requires the Chilkat API to have been previously unlocked. // See Global Unlock Sample for sample code. Dim responseStatusCode As Int32 http.UncommonOptions = "AllowEmptyHeaders" http.SetRequestHeader "SOAPAction","" // The endpoint for this soap service is: Dim endPoint As String endPoint = "https://palena.sii.cl/DTEWS/CrSeed.jws" // Send the following SOAP XML // <soapenv:Envelope xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:soapenv="http://schemas.xmlsoap.org/soap/envelope/" xmlns:def="http://DefaultNamespace"> // <soapenv:Header/> // <soapenv:Body> // <def:getSeed soapenv:encodingStyle="http://schemas.xmlsoap.org/soap/encoding/"/> // </soapenv:Body> // </soapenv:Envelope> Dim xml As New Chilkat.Xml xml.Tag = "soapenv:Envelope" success = xml.AddAttribute("xmlns:xsi","http://www.w3.org/2001/XMLSchema-instance") success = xml.AddAttribute("xmlns:xsd","http://www.w3.org/2001/XMLSchema") success = xml.AddAttribute("xmlns:soapenv","http://schemas.xmlsoap.org/soap/envelope/") success = xml.AddAttribute("xmlns:def","http://DefaultNamespace") xml.UpdateChildContent "soapenv:Header","" success = xml.UpdateAttrAt("soapenv:Body|def:getSeed",True,"soapenv:encodingStyle","http://schemas.xmlsoap.org/soap/encoding/") Dim resp As New Chilkat.HttpResponse success = http.HttpStr("POST",endPoint,xml.GetXml(),"utf-8","text/xml",resp) If (success = False) Then System.DebugLog(http.LastErrorText) Return End If responseStatusCode = resp.StatusCode System.DebugLog("Response Status Code: " + Str(responseStatusCode)) // You may examine the exact HTTP header sent with the POST like this: System.DebugLog("LastHeader:") System.DebugLog(http.LastHeader) // Examine the XML returned by the web service: System.DebugLog("XML Response:") Dim xmlResp As New Chilkat.Xml success = xmlResp.LoadXml(resp.BodyStr) System.DebugLog(xmlResp.GetXml()) // Use this online tool to generate parsing code from response XML: // Generate Parsing Code from XML // The response is: // <?xml version="1.0" encoding="UTF-8"?> // <soapenv:Envelope xmlns:soapenv="http://schemas.xmlsoap.org/soap/envelope/" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"> // <soapenv:Body> // <ns1:getSeedResponse soapenv:encodingStyle="http://schemas.xmlsoap.org/soap/encoding/" xmlns:ns1="http://DefaultNamespace"> // <ns1:getSeedReturn xsi:type="xsd:string"><?xml version="1.0" encoding="UTF-8"?><SII:RESPUESTA xmlns:SII="http://www.sii.cl/XMLSchema"><SII:RESP_BODY><SEMILLA>039159253918</SEMILLA></SII:RESP_BODY><SII:RESP_HDR><ESTADO>00</ESTADO></SII:RESP_HDR></SII:RESPUESTA></ns1:getSeedReturn> // </ns1:getSeedResponse> // </soapenv:Body> // </soapenv:Envelope> // Get the XML contained in the getSeedReturn element: Dim embeddedXml As String embeddedXml = xmlResp.GetChildContent("soapenv:Body|ns1:getSeedResponse|ns1:getSeedReturn") System.DebugLog(embeddedXml) // The embedded XML is: // <?xml version="1.0" encoding="UTF-8"?> // <SII:RESPUESTA xmlns:SII="http://www.sii.cl/XMLSchema"> // <SII:RESP_BODY> // <SEMILLA>039159397998</SEMILLA> // </SII:RESP_BODY> // <SII:RESP_HDR> // <ESTADO>00</ESTADO> // </SII:RESP_HDR> // </SII:RESPUESTA> // Get the seed: Dim xml2 As New Chilkat.Xml success = xml2.LoadXml(embeddedXml) Dim seed As String seed = xml2.GetChildContent("SII:RESP_BODY|SEMILLA") System.DebugLog("seed = " + seed) // -------------------------------------------------------------------------------- // Also see Chilkat's Online WSDL Code Generator // to generate code and SOAP Request and Response XML for each operation in a WSDL. // -------------------------------------------------------------------------------- |
© 2000-2025 Chilkat Software, Inc. All Rights Reserved.