Envio de facturas a sii bizkaia / AEAT

Estoy intentando enviar facturas al SII de bizkaia me sirve tambien para AEAT

Var sock As New HTTPSecureSocket
Var f As FolderItem
f = new FolderItem(“carpeta de certificado\nombreo.pem”)
If f <> Nil Then
sock.CertificateFile = f
End If

dim wsdlFile As new FolderItem(“c:\rb21\facturasEmitidas.xml”, FolderItem.PathModes.Native)
dim wsdlDocument As New XmlDocument

If wsdlFile <> Nil Then
Try
wsdlDocument.LoadXml(wsdlFile)
Catch e As XmlException
MessageBox("WSDL error: " + e.Message)
End Try
End If

dim xmlFacturas As new FolderItem(“c:\rb21\facturas.xml”, FolderItem.PathModes.Native)
dim docFacturas As New XmlDocument

If xmlFacturas <> Nil Then

Try
docFacturas.LoadXml(xmlFacturas)
Catch e As XmlException
MessageBox("XML facturas error: " + e.Message)
End Try
End If
dim aa as String

dim sr as soapResult
Dim sm As New SOAPMethod
sm.wsdl=wsdlDocument
sm.UseSocket(sock)
sm.timeout = 20
sm.url = “https://pruapps.bizkaia.eus/SSII-FACT/ws/fe/SiiFactFEV1SOAP
sr = sm.invoke(“SuministroLRFacturasEmitidas”)
dim xmlresp as XmlDocument
xmlresp=sr.document
msgbox (xmlresp.tostring)

no se como pasar como parametro o como sea el xml de las facturas que quiero incluir.
sabe alguien como se puede hacer.
muchas gracias por anticipado.

Intenta usar URLConnection en lugar de HTTPSecureSocket

Hola @ADOLFO_SANTOS1

No sé cómo funciona exactamente la API SOAP de SII… pero quizá podrías echar un vistazo a SOAPMethod.Parameter para ver si por ahí pueden ir los tiros.

Forum for Xojo Programming Language and IDE. Copyright © 2021 Xojo, Inc.