Sample code for 30+ languages & platforms
Visual FoxPro

SII GET boleta.electronica.semilla

See more SII Chile Examples

Obtención de la semilla

Chilkat Visual FoxPro Downloads

Visual FoxPro
LOCAL lnSuccess
LOCAL loHttp
LOCAL loSbResponseBody
LOCAL loXmlResponse
LOCAL lcSII_RESPUESTA_xmlns_SII
LOCAL lcSEMILLA
LOCAL lnESTADO

lnSuccess = 0

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

loHttp = CreateObject('Chilkat.Http')

* Implements the following CURL command:

* curl -X GET "https://apicert.sii.cl/recursos/v1/boleta.electronica.semilla" -H  "accept: application/xml"

* Use the following online tool to generate HTTP code from a CURL command
* Convert a cURL Command to HTTP Source Code

loHttp.SetRequestHeader("accept","application/xml")

* Use one of the following domains, depending on the environment:
* apicert.sii.cl  - Certification Environment
* api.sii.cl      - Production Environment
loSbResponseBody = CreateObject('Chilkat.StringBuilder')
lnSuccess = loHttp.QuickGetSb("https://apicert.sii.cl/recursos/v1/boleta.electronica.semilla",loSbResponseBody)
IF (lnSuccess = 0) THEN
    ? loHttp.LastErrorText
    RELEASE loHttp
    RELEASE loSbResponseBody
    CANCEL
ENDIF

loXmlResponse = CreateObject('Chilkat.Xml')
loXmlResponse.LoadSb(loSbResponseBody,1)
? loXmlResponse.GetXml()

* Sample XML response:
* (Sample code for parsing the XML response is shown below)

* <?xml version="1.0" encoding="UTF-8"?>
* <SII:RESPUESTA xmlns:SII="http://www.sii.cl/XMLSchema">
*     <SII:RESP_BODY>
*         <SEMILLA>030530912644</SEMILLA>
*     </SII:RESP_BODY>
*     <SII:RESP_HDR>
*         <ESTADO>0</ESTADO>
*     </SII:RESP_HDR>
* </SII:RESPUESTA>

* Sample code for parsing the XML response...
* Use the following online tool to generate parsing code from sample XML:
* Generate Parsing Code from XML

lcSII_RESPUESTA_xmlns_SII = loXmlResponse.GetAttrValue("xmlns:SII")
lcSEMILLA = loXmlResponse.GetChildContent("SII:RESP_BODY|SEMILLA")
lnESTADO = loXmlResponse.GetChildIntValue("SII:RESP_HDR|ESTADO")

RELEASE loHttp
RELEASE loSbResponseBody
RELEASE loXmlResponse