(Visual FoxPro) POST XML to https://apicert.sii.cl/recursos/v1/boleta.electronica.token

Demonstrates how to send an HTTPS POST XML request to POST XML to https://apicert.sii.cl/recursos/v1/boleta.electronica.token and retrieve the response.

Chilkat ActiveX Downloads ActiveX for 32-bit and 64-bit Windows

LOCAL loHttp
LOCAL lcXmlStr
LOCAL lcUrlEndpoint
LOCAL lcXmlCharset
LOCAL loResp

* This example assumes the Chilkat API to have been previously unlocked.
* See Global Unlock Sample for sample code.

* For versions of Chilkat < 10.0.0, use CreateObject('Chilkat_9_5_0.Http')
loHttp = CreateObject('Chilkat.Http')

* XML to send in the body of the HTTPS POST
lcXmlStr = "..."

lcUrlEndpoint = "https://apicert.sii.cl/recursos/v1/boleta.electronica.token"
lcXmlCharset = "utf-8"

loResp = loHttp.PostXml(lcUrlEndpoint,lcXmlStr,lcXmlCharset)
IF (loHttp.LastMethodSuccess <> 1) THEN
    ? loHttp.LastErrorText
    RELEASE loHttp
    CANCEL
ENDIF

* Get the response status code and body
? "response status code = " + STR(loResp.StatusCode)

* This would be the XML response sent by the server.
? loResp.BodyStr

RELEASE loResp

RELEASE loHttp