(VB.NET UWP/WinRT) SII GET boleta.electronica.semilla

Obtención de la semilla

For more information, see https://www4c.sii.cl/bolcoreinternetui/api/

Chilkat Universal Windows Platform (UWP) / WinRT Downloads Chilkat for the Universal Windows Platform (UWP)

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

Dim http As New Chilkat.Http
Dim success As Boolean

' 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

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

' Use one of the following domains, depending on the environment:
' apicert.sii.cl  - Certification Environment
' api.sii.cl      - Production Environment
Dim sbResponseBody As New Chilkat.StringBuilder
success = Await http.QuickGetSbAsync("https://apicert.sii.cl/recursos/v1/boleta.electronica.semilla",sbResponseBody)
If (success = False) Then
    Debug.WriteLine(http.LastErrorText)
    Exit Sub
End If


Dim xmlResponse As New Chilkat.Xml
xmlResponse.LoadSb(sbResponseBody,True)
Debug.WriteLine(xmlResponse.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

Dim SII_RESPUESTA_xmlns_SII As String = xmlResponse.GetAttrValue("xmlns:SII")
Dim SEMILLA As String = xmlResponse.GetChildContent("SII:RESP_BODY|SEMILLA")
Dim ESTADO As Integer = xmlResponse.GetChildIntValue("SII:RESP_HDR|ESTADO")