Chilkat Tools

sfVerifactu / ConsultaFactuSistemaFacturacion

ASP AutoIt C C (Unicode) C++ C++ (Unicode) C# DataFlex Delphi Foxpro Go Java Node.js Objective-C Perl PHP Extension PowerBuilder Powershell PureBasic Python CkPython Ruby SQL Server Swift TCL VB.NET VB6 VBScript Xojo

Min Request Full Request

Dim xml As New ChilkatXml
xml.Tag = "soapenv:Envelope"
success = xml.AddAttribute("xmlns:soapenv","http://schemas.xmlsoap.org/soap/envelope/")
success = xml.AddAttribute("xmlns:sfLRC","https://www2.agenciatributaria.gob.es/static_files/common/internet/dep/aplicaciones/es/aeat/tike/cont/ws/ConsultaLR.xsd")
success = xml.AddAttribute("xmlns:sf","https://www2.agenciatributaria.gob.es/static_files/common/internet/dep/aplicaciones/es/aeat/tike/cont/ws/SuministroInformacion.xsd")
xml.UpdateChildContent "soapenv:Header",""
xml.UpdateChildContent "soapenv:Body|sfLRC:ConsultaFactuSistemaFacturacion|sfLRC:Cabecera|sf:IDVersion","1.0"
xml.UpdateChildContent "soapenv:Body|sfLRC:ConsultaFactuSistemaFacturacion|sfLRC:Cabecera|sf:ObligadoEmision|sf:NombreRazon","string"
xml.UpdateChildContent "soapenv:Body|sfLRC:ConsultaFactuSistemaFacturacion|sfLRC:Cabecera|sf:ObligadoEmision|sf:NIF","string"
xml.UpdateChildContent "soapenv:Body|sfLRC:ConsultaFactuSistemaFacturacion|sfLRC:Cabecera|sf:IndicadorRepresentante","S"
xml.UpdateChildContent "soapenv:Body|sfLRC:ConsultaFactuSistemaFacturacion|sfLRC:FiltroConsulta|sfLRC:PeriodoImputacion|sf:Ejercicio","string"
xml.UpdateChildContentInt "soapenv:Body|sfLRC:ConsultaFactuSistemaFacturacion|sfLRC:FiltroConsulta|sfLRC:PeriodoImputacion|sf:Periodo",01
xml.UpdateChildContent "soapenv:Body|sfLRC:ConsultaFactuSistemaFacturacion|sfLRC:FiltroConsulta|sfLRC:NumSerieFactura","string"
xml.UpdateChildContent "soapenv:Body|sfLRC:ConsultaFactuSistemaFacturacion|sfLRC:FiltroConsulta|sfLRC:Contraparte|sf:NombreRazon","string"
xml.UpdateChildContent "soapenv:Body|sfLRC:ConsultaFactuSistemaFacturacion|sfLRC:FiltroConsulta|sfLRC:Contraparte|sf:NIF","string"
xml.UpdateChildContent "soapenv:Body|sfLRC:ConsultaFactuSistemaFacturacion|sfLRC:FiltroConsulta|sfLRC:FechaExpedicionFactura",""
xml.UpdateChildContent "soapenv:Body|sfLRC:ConsultaFactuSistemaFacturacion|sfLRC:FiltroConsulta|sfLRC:SistemaInformatico|sf:NombreRazon","string"
xml.UpdateChildContent "soapenv:Body|sfLRC:ConsultaFactuSistemaFacturacion|sfLRC:FiltroConsulta|sfLRC:SistemaInformatico|sf:NIF","string"
xml.UpdateChildContent "soapenv:Body|sfLRC:ConsultaFactuSistemaFacturacion|sfLRC:FiltroConsulta|sfLRC:SistemaInformatico|sf:NombreSistemaInformatico","string"
xml.UpdateChildContent "soapenv:Body|sfLRC:ConsultaFactuSistemaFacturacion|sfLRC:FiltroConsulta|sfLRC:SistemaInformatico|sf:IdSistemaInformatico","string"
xml.UpdateChildContent "soapenv:Body|sfLRC:ConsultaFactuSistemaFacturacion|sfLRC:FiltroConsulta|sfLRC:SistemaInformatico|sf:Version","string"
xml.UpdateChildContent "soapenv:Body|sfLRC:ConsultaFactuSistemaFacturacion|sfLRC:FiltroConsulta|sfLRC:SistemaInformatico|sf:NumeroInstalacion","string"
xml.UpdateChildContent "soapenv:Body|sfLRC:ConsultaFactuSistemaFacturacion|sfLRC:FiltroConsulta|sfLRC:SistemaInformatico|sf:TipoUsoPosibleSoloVerifactu","S"
xml.UpdateChildContent "soapenv:Body|sfLRC:ConsultaFactuSistemaFacturacion|sfLRC:FiltroConsulta|sfLRC:SistemaInformatico|sf:TipoUsoPosibleMultiOT","S"
xml.UpdateChildContent "soapenv:Body|sfLRC:ConsultaFactuSistemaFacturacion|sfLRC:FiltroConsulta|sfLRC:SistemaInformatico|sf:IndicadorMultiplesOT","S"
xml.UpdateChildContent "soapenv:Body|sfLRC:ConsultaFactuSistemaFacturacion|sfLRC:FiltroConsulta|sfLRC:RefExterna","string"
xml.UpdateChildContent "soapenv:Body|sfLRC:ConsultaFactuSistemaFacturacion|sfLRC:FiltroConsulta|sfLRC:ClavePaginacion|sf:IDEmisorFactura","string"
xml.UpdateChildContent "soapenv:Body|sfLRC:ConsultaFactuSistemaFacturacion|sfLRC:FiltroConsulta|sfLRC:ClavePaginacion|sf:NumSerieFactura","string"
xml.UpdateChildContent "soapenv:Body|sfLRC:ConsultaFactuSistemaFacturacion|sfLRC:FiltroConsulta|sfLRC:ClavePaginacion|sf:FechaExpedicionFactura","string"
xml.UpdateChildContent "soapenv:Body|sfLRC:ConsultaFactuSistemaFacturacion|sfLRC:DatosAdicionalesRespuesta|sfLRC:MostrarNombreRazonEmisor","S"
xml.UpdateChildContent "soapenv:Body|sfLRC:ConsultaFactuSistemaFacturacion|sfLRC:DatosAdicionalesRespuesta|sfLRC:MostrarSistemaInformatico","S"

' In a SOAP HTTP request, including the XML declaration (<?xml version="1.0" encoding="UTF-8"?>) in the XML body is generally not required. 
xml.EmitXmlDecl = 0
Dim soapRequestBody As String
soapRequestBody = xml.GetXml()

Dim endpoint As String
endpoint = "https://www1.agenciatributaria.gob.es/wlpl/TIKE-CONT/ws/SistemaFacturacion/VerifactuSOAP"
Dim soapAction As String
soapAction = ""
'  For SOAP requests, the standard Content-Type is usually set to "text/xml" or "application/soap+xml"
Dim contentType As String
contentType = "text/xml"

Dim http As New ChilkatHttp

http.ClearHeaders 
http.SetRequestHeader "Content-Type",contentType
http.SetRequestHeader "SOAPAction",soapAction

Dim resp As ChilkatHttpResponse
Set resp = http.PostXml(endpoint,soapRequestBody,"utf-8")
If (http.LastMethodSuccess = 0) Then
    Debug.Print http.LastErrorText
    Debug.Print "Failed to send SOAP request."
    Exit Sub
End If

' Get the XML response body.
Dim responseXml As New ChilkatXml
success = resp.GetBodyXml(responseXml)

Dim statusCode As Long
statusCode = resp.StatusCode
Debug.Print "response status code: " & statusCode

' If the status code does not indicate succcess, then show the response XML,
' which probably contains error information.
If (statusCode <> 200) Then
    Debug.Print responseXml.GetXml()
    Exit Sub
End If

Debug.Print responseXml.GetXml()

' Parse the successful SOAP response XML.

' This is a sample of the response XML, but the namespace prefixes will be different.
' We can parse the result using "*" for the namespace prefixes (see below).

Dim IDVersion As String
IDVersion = responseXml.GetChildContent("*:Body|*:RespuestaConsultaFactuSistemaFacturacion|*:Cabecera|*:IDVersion")
Dim NombreRazon As String
NombreRazon = responseXml.GetChildContent("*:Body|*:RespuestaConsultaFactuSistemaFacturacion|*:Cabecera|*:ObligadoEmision|*:NombreRazon")
Dim NIF As String
NIF = responseXml.GetChildContent("*:Body|*:RespuestaConsultaFactuSistemaFacturacion|*:Cabecera|*:ObligadoEmision|*:NIF")
Dim IndicadorRepresentante As String
IndicadorRepresentante = responseXml.GetChildContent("*:Body|*:RespuestaConsultaFactuSistemaFacturacion|*:Cabecera|*:IndicadorRepresentante")
Dim Ejercicio As String
Ejercicio = responseXml.GetChildContent("*:Body|*:RespuestaConsultaFactuSistemaFacturacion|*:PeriodoImputacion|*:Ejercicio")
Dim Periodo As Long
Periodo = responseXml.GetChildIntValue("*:Body|*:RespuestaConsultaFactuSistemaFacturacion|*:PeriodoImputacion|*:Periodo")
Dim IndicadorPaginacion As String
IndicadorPaginacion = responseXml.GetChildContent("*:Body|*:RespuestaConsultaFactuSistemaFacturacion|*:IndicadorPaginacion")
Dim ResultadoConsulta As String
ResultadoConsulta = responseXml.GetChildContent("*:Body|*:RespuestaConsultaFactuSistemaFacturacion|*:ResultadoConsulta")
Dim IDEmisorFactura As String
IDEmisorFactura = responseXml.GetChildContent("*:Body|*:RespuestaConsultaFactuSistemaFacturacion|*:RegistroRespuestaConsultaFactuSistemaFacturacion|*:IDFactura|*:IDEmisorFactura")
Dim NumSerieFactura As String
NumSerieFactura = responseXml.GetChildContent("*:Body|*:RespuestaConsultaFactuSistemaFacturacion|*:RegistroRespuestaConsultaFactuSistemaFacturacion|*:IDFactura|*:NumSerieFactura")
Dim FechaExpedicionFactura As String
FechaExpedicionFactura = responseXml.GetChildContent("*:Body|*:RespuestaConsultaFactuSistemaFacturacion|*:RegistroRespuestaConsultaFactuSistemaFacturacion|*:IDFactura|*:FechaExpedicionFactura")
Dim NombreRazonEmisor As String
NombreRazonEmisor = responseXml.GetChildContent("*:Body|*:RespuestaConsultaFactuSistemaFacturacion|*:RegistroRespuestaConsultaFactuSistemaFacturacion|*:DatosRegistroFacturacion|*:NombreRazonEmisor")
Dim RefExterna As String
RefExterna = responseXml.GetChildContent("*:Body|*:RespuestaConsultaFactuSistemaFacturacion|*:RegistroRespuestaConsultaFactuSistemaFacturacion|*:DatosRegistroFacturacion|*:RefExterna")
Dim Subsanacion As String
Subsanacion = responseXml.GetChildContent("*:Body|*:RespuestaConsultaFactuSistemaFacturacion|*:RegistroRespuestaConsultaFactuSistemaFacturacion|*:DatosRegistroFacturacion|*:Subsanacion")
Dim RechazoPrevio As String
RechazoPrevio = responseXml.GetChildContent("*:Body|*:RespuestaConsultaFactuSistemaFacturacion|*:RegistroRespuestaConsultaFactuSistemaFacturacion|*:DatosRegistroFacturacion|*:RechazoPrevio")
Dim SinRegistroPrevio As String
SinRegistroPrevio = responseXml.GetChildContent("*:Body|*:RespuestaConsultaFactuSistemaFacturacion|*:RegistroRespuestaConsultaFactuSistemaFacturacion|*:DatosRegistroFacturacion|*:SinRegistroPrevio")
Dim GeneradoPor As String
GeneradoPor = responseXml.GetChildContent("*:Body|*:RespuestaConsultaFactuSistemaFacturacion|*:RegistroRespuestaConsultaFactuSistemaFacturacion|*:DatosRegistroFacturacion|*:GeneradoPor")
NombreRazon = responseXml.GetChildContent("*:Body|*:RespuestaConsultaFactuSistemaFacturacion|*:RegistroRespuestaConsultaFactuSistemaFacturacion|*:DatosRegistroFacturacion|*:Generador|*:NombreRazon")
NIF = responseXml.GetChildContent("*:Body|*:RespuestaConsultaFactuSistemaFacturacion|*:RegistroRespuestaConsultaFactuSistemaFacturacion|*:DatosRegistroFacturacion|*:Generador|*:NIF")
Dim TipoFactura As String
TipoFactura = responseXml.GetChildContent("*:Body|*:RespuestaConsultaFactuSistemaFacturacion|*:RegistroRespuestaConsultaFactuSistemaFacturacion|*:DatosRegistroFacturacion|*:TipoFactura")
Dim TipoRectificativa As String
TipoRectificativa = responseXml.GetChildContent("*:Body|*:RespuestaConsultaFactuSistemaFacturacion|*:RegistroRespuestaConsultaFactuSistemaFacturacion|*:DatosRegistroFacturacion|*:TipoRectificativa")
IDEmisorFactura = responseXml.GetChildContent("*:Body|*:RespuestaConsultaFactuSistemaFacturacion|*:RegistroRespuestaConsultaFactuSistemaFacturacion|*:DatosRegistroFacturacion|*:FacturasRectificadas|*:IDFacturaRectificada|*:IDEmisorFactura")
NumSerieFactura = responseXml.GetChildContent("*:Body|*:RespuestaConsultaFactuSistemaFacturacion|*:RegistroRespuestaConsultaFactuSistemaFacturacion|*:DatosRegistroFacturacion|*:FacturasRectificadas|*:IDFacturaRectificada|*:NumSerieFactura")
FechaExpedicionFactura = responseXml.GetChildContent("*:Body|*:RespuestaConsultaFactuSistemaFacturacion|*:RegistroRespuestaConsultaFactuSistemaFacturacion|*:DatosRegistroFacturacion|*:FacturasRectificadas|*:IDFacturaRectificada|*:FechaExpedicionFactura")
IDEmisorFactura = responseXml.GetChildContent("*:Body|*:RespuestaConsultaFactuSistemaFacturacion|*:RegistroRespuestaConsultaFactuSistemaFacturacion|*:DatosRegistroFacturacion|*:FacturasSustituidas|*:IDFacturaSustituida|*:IDEmisorFactura")
NumSerieFactura = responseXml.GetChildContent("*:Body|*:RespuestaConsultaFactuSistemaFacturacion|*:RegistroRespuestaConsultaFactuSistemaFacturacion|*:DatosRegistroFacturacion|*:FacturasSustituidas|*:IDFacturaSustituida|*:NumSerieFactura")
FechaExpedicionFactura = responseXml.GetChildContent("*:Body|*:RespuestaConsultaFactuSistemaFacturacion|*:RegistroRespuestaConsultaFactuSistemaFacturacion|*:DatosRegistroFacturacion|*:FacturasSustituidas|*:IDFacturaSustituida|*:FechaExpedicionFactura")
Dim BaseRectificada As String
BaseRectificada = responseXml.GetChildContent("*:Body|*:RespuestaConsultaFactuSistemaFacturacion|*:RegistroRespuestaConsultaFactuSistemaFacturacion|*:DatosRegistroFacturacion|*:ImporteRectificacion|*:BaseRectificada")
Dim CuotaRectificada As String
CuotaRectificada = responseXml.GetChildContent("*:Body|*:RespuestaConsultaFactuSistemaFacturacion|*:RegistroRespuestaConsultaFactuSistemaFacturacion|*:DatosRegistroFacturacion|*:ImporteRectificacion|*:CuotaRectificada")
Dim CuotaRecargoRectificado As String
CuotaRecargoRectificado = responseXml.GetChildContent("*:Body|*:RespuestaConsultaFactuSistemaFacturacion|*:RegistroRespuestaConsultaFactuSistemaFacturacion|*:DatosRegistroFacturacion|*:ImporteRectificacion|*:CuotaRecargoRectificado")
Dim FechaOperacion As String
FechaOperacion = responseXml.GetChildContent("*:Body|*:RespuestaConsultaFactuSistemaFacturacion|*:RegistroRespuestaConsultaFactuSistemaFacturacion|*:DatosRegistroFacturacion|*:FechaOperacion")
Dim DescripcionOperacion As String
DescripcionOperacion = responseXml.GetChildContent("*:Body|*:RespuestaConsultaFactuSistemaFacturacion|*:RegistroRespuestaConsultaFactuSistemaFacturacion|*:DatosRegistroFacturacion|*:DescripcionOperacion")
Dim FacturaSimplificadaArt7273 As String
FacturaSimplificadaArt7273 = responseXml.GetChildContent("*:Body|*:RespuestaConsultaFactuSistemaFacturacion|*:RegistroRespuestaConsultaFactuSistemaFacturacion|*:DatosRegistroFacturacion|*:FacturaSimplificadaArt7273")
Dim FacturaSinIdentifDestinatarioArt61d As String
FacturaSinIdentifDestinatarioArt61d = responseXml.GetChildContent("*:Body|*:RespuestaConsultaFactuSistemaFacturacion|*:RegistroRespuestaConsultaFactuSistemaFacturacion|*:DatosRegistroFacturacion|*:FacturaSinIdentifDestinatarioArt61d")
Dim Macrodato As String
Macrodato = responseXml.GetChildContent("*:Body|*:RespuestaConsultaFactuSistemaFacturacion|*:RegistroRespuestaConsultaFactuSistemaFacturacion|*:DatosRegistroFacturacion|*:Macrodato")
Dim EmitidaPorTerceroODestinatario As String
EmitidaPorTerceroODestinatario = responseXml.GetChildContent("*:Body|*:RespuestaConsultaFactuSistemaFacturacion|*:RegistroRespuestaConsultaFactuSistemaFacturacion|*:DatosRegistroFacturacion|*:EmitidaPorTerceroODestinatario")
NombreRazon = responseXml.GetChildContent("*:Body|*:RespuestaConsultaFactuSistemaFacturacion|*:RegistroRespuestaConsultaFactuSistemaFacturacion|*:DatosRegistroFacturacion|*:Tercero|*:NombreRazon")
NIF = responseXml.GetChildContent("*:Body|*:RespuestaConsultaFactuSistemaFacturacion|*:RegistroRespuestaConsultaFactuSistemaFacturacion|*:DatosRegistroFacturacion|*:Tercero|*:NIF")
NombreRazon = responseXml.GetChildContent("*:Body|*:RespuestaConsultaFactuSistemaFacturacion|*:RegistroRespuestaConsultaFactuSistemaFacturacion|*:DatosRegistroFacturacion|*:Destinatarios|*:IDDestinatario|*:NombreRazon")
NIF = responseXml.GetChildContent("*:Body|*:RespuestaConsultaFactuSistemaFacturacion|*:RegistroRespuestaConsultaFactuSistemaFacturacion|*:DatosRegistroFacturacion|*:Destinatarios|*:IDDestinatario|*:NIF")
Dim Cupon As String
Cupon = responseXml.GetChildContent("*:Body|*:RespuestaConsultaFactuSistemaFacturacion|*:RegistroRespuestaConsultaFactuSistemaFacturacion|*:DatosRegistroFacturacion|*:Cupon")
Dim Impuesto As Long
Impuesto = responseXml.GetChildIntValue("*:Body|*:RespuestaConsultaFactuSistemaFacturacion|*:RegistroRespuestaConsultaFactuSistemaFacturacion|*:DatosRegistroFacturacion|*:Desglose|*:DetalleDesglose|*:Impuesto")
Dim ClaveRegimen As Long
ClaveRegimen = responseXml.GetChildIntValue("*:Body|*:RespuestaConsultaFactuSistemaFacturacion|*:RegistroRespuestaConsultaFactuSistemaFacturacion|*:DatosRegistroFacturacion|*:Desglose|*:DetalleDesglose|*:ClaveRegimen")
Dim CalificacionOperacion As String
CalificacionOperacion = responseXml.GetChildContent("*:Body|*:RespuestaConsultaFactuSistemaFacturacion|*:RegistroRespuestaConsultaFactuSistemaFacturacion|*:DatosRegistroFacturacion|*:Desglose|*:DetalleDesglose|*:CalificacionOperacion")
Dim TipoImpositivo As String
TipoImpositivo = responseXml.GetChildContent("*:Body|*:RespuestaConsultaFactuSistemaFacturacion|*:RegistroRespuestaConsultaFactuSistemaFacturacion|*:DatosRegistroFacturacion|*:Desglose|*:DetalleDesglose|*:TipoImpositivo")
Dim BaseImponibleOimporteNoSujeto As String
BaseImponibleOimporteNoSujeto = responseXml.GetChildContent("*:Body|*:RespuestaConsultaFactuSistemaFacturacion|*:RegistroRespuestaConsultaFactuSistemaFacturacion|*:DatosRegistroFacturacion|*:Desglose|*:DetalleDesglose|*:BaseImponibleOimporteNoSujeto")
Dim BaseImponibleACoste As String
BaseImponibleACoste = responseXml.GetChildContent("*:Body|*:RespuestaConsultaFactuSistemaFacturacion|*:RegistroRespuestaConsultaFactuSistemaFacturacion|*:DatosRegistroFacturacion|*:Desglose|*:DetalleDesglose|*:BaseImponibleACoste")
Dim CuotaRepercutida As String
CuotaRepercutida = responseXml.GetChildContent("*:Body|*:RespuestaConsultaFactuSistemaFacturacion|*:RegistroRespuestaConsultaFactuSistemaFacturacion|*:DatosRegistroFacturacion|*:Desglose|*:DetalleDesglose|*:CuotaRepercutida")
Dim TipoRecargoEquivalencia As String
TipoRecargoEquivalencia = responseXml.GetChildContent("*:Body|*:RespuestaConsultaFactuSistemaFacturacion|*:RegistroRespuestaConsultaFactuSistemaFacturacion|*:DatosRegistroFacturacion|*:Desglose|*:DetalleDesglose|*:TipoRecargoEquivalencia")
Dim CuotaRecargoEquivalencia As String
CuotaRecargoEquivalencia = responseXml.GetChildContent("*:Body|*:RespuestaConsultaFactuSistemaFacturacion|*:RegistroRespuestaConsultaFactuSistemaFacturacion|*:DatosRegistroFacturacion|*:Desglose|*:DetalleDesglose|*:CuotaRecargoEquivalencia")
Dim CuotaTotal As String
CuotaTotal = responseXml.GetChildContent("*:Body|*:RespuestaConsultaFactuSistemaFacturacion|*:RegistroRespuestaConsultaFactuSistemaFacturacion|*:DatosRegistroFacturacion|*:CuotaTotal")
Dim ImporteTotal As String
ImporteTotal = responseXml.GetChildContent("*:Body|*:RespuestaConsultaFactuSistemaFacturacion|*:RegistroRespuestaConsultaFactuSistemaFacturacion|*:DatosRegistroFacturacion|*:ImporteTotal")
NombreRazon = responseXml.GetChildContent("*:Body|*:RespuestaConsultaFactuSistemaFacturacion|*:RegistroRespuestaConsultaFactuSistemaFacturacion|*:DatosRegistroFacturacion|*:SistemaInformatico|*:NombreRazon")
NIF = responseXml.GetChildContent("*:Body|*:RespuestaConsultaFactuSistemaFacturacion|*:RegistroRespuestaConsultaFactuSistemaFacturacion|*:DatosRegistroFacturacion|*:SistemaInformatico|*:NIF")
Dim NombreSistemaInformatico As String
NombreSistemaInformatico = responseXml.GetChildContent("*:Body|*:RespuestaConsultaFactuSistemaFacturacion|*:RegistroRespuestaConsultaFactuSistemaFacturacion|*:DatosRegistroFacturacion|*:SistemaInformatico|*:NombreSistemaInformatico")
Dim IdSistemaInformatico As String
IdSistemaInformatico = responseXml.GetChildContent("*:Body|*:RespuestaConsultaFactuSistemaFacturacion|*:RegistroRespuestaConsultaFactuSistemaFacturacion|*:DatosRegistroFacturacion|*:SistemaInformatico|*:IdSistemaInformatico")
Dim Version As String
Version = responseXml.GetChildContent("*:Body|*:RespuestaConsultaFactuSistemaFacturacion|*:RegistroRespuestaConsultaFactuSistemaFacturacion|*:DatosRegistroFacturacion|*:SistemaInformatico|*:Version")
Dim NumeroInstalacion As String
NumeroInstalacion = responseXml.GetChildContent("*:Body|*:RespuestaConsultaFactuSistemaFacturacion|*:RegistroRespuestaConsultaFactuSistemaFacturacion|*:DatosRegistroFacturacion|*:SistemaInformatico|*:NumeroInstalacion")
Dim TipoUsoPosibleSoloVerifactu As String
TipoUsoPosibleSoloVerifactu = responseXml.GetChildContent("*:Body|*:RespuestaConsultaFactuSistemaFacturacion|*:RegistroRespuestaConsultaFactuSistemaFacturacion|*:DatosRegistroFacturacion|*:SistemaInformatico|*:TipoUsoPosibleSoloVerifactu")
Dim TipoUsoPosibleMultiOT As String
TipoUsoPosibleMultiOT = responseXml.GetChildContent("*:Body|*:RespuestaConsultaFactuSistemaFacturacion|*:RegistroRespuestaConsultaFactuSistemaFacturacion|*:DatosRegistroFacturacion|*:SistemaInformatico|*:TipoUsoPosibleMultiOT")
Dim IndicadorMultiplesOT As String
IndicadorMultiplesOT = responseXml.GetChildContent("*:Body|*:RespuestaConsultaFactuSistemaFacturacion|*:RegistroRespuestaConsultaFactuSistemaFacturacion|*:DatosRegistroFacturacion|*:SistemaInformatico|*:IndicadorMultiplesOT")
Dim FechaHoraHusoGenRegistro As String
FechaHoraHusoGenRegistro = responseXml.GetChildContent("*:Body|*:RespuestaConsultaFactuSistemaFacturacion|*:RegistroRespuestaConsultaFactuSistemaFacturacion|*:DatosRegistroFacturacion|*:FechaHoraHusoGenRegistro")
Dim NumRegistroAcuerdoFacturacion As String
NumRegistroAcuerdoFacturacion = responseXml.GetChildContent("*:Body|*:RespuestaConsultaFactuSistemaFacturacion|*:RegistroRespuestaConsultaFactuSistemaFacturacion|*:DatosRegistroFacturacion|*:NumRegistroAcuerdoFacturacion")
Dim IdAcuerdoSistemaInformatico As String
IdAcuerdoSistemaInformatico = responseXml.GetChildContent("*:Body|*:RespuestaConsultaFactuSistemaFacturacion|*:RegistroRespuestaConsultaFactuSistemaFacturacion|*:DatosRegistroFacturacion|*:IdAcuerdoSistemaInformatico")
Dim TipoHuella As Long
TipoHuella = responseXml.GetChildIntValue("*:Body|*:RespuestaConsultaFactuSistemaFacturacion|*:RegistroRespuestaConsultaFactuSistemaFacturacion|*:DatosRegistroFacturacion|*:TipoHuella")
Dim Huella As String
Huella = responseXml.GetChildContent("*:Body|*:RespuestaConsultaFactuSistemaFacturacion|*:RegistroRespuestaConsultaFactuSistemaFacturacion|*:DatosRegistroFacturacion|*:Huella")
Dim NifRepresentante As String
NifRepresentante = responseXml.GetChildContent("*:Body|*:RespuestaConsultaFactuSistemaFacturacion|*:RegistroRespuestaConsultaFactuSistemaFacturacion|*:DatosRegistroFacturacion|*:NifRepresentante")
Dim FechaFinVeriFactu As String
FechaFinVeriFactu = responseXml.GetChildContent("*:Body|*:RespuestaConsultaFactuSistemaFacturacion|*:RegistroRespuestaConsultaFactuSistemaFacturacion|*:DatosRegistroFacturacion|*:FechaFinVeriFactu")
Dim Incidencia As String
Incidencia = responseXml.GetChildContent("*:Body|*:RespuestaConsultaFactuSistemaFacturacion|*:RegistroRespuestaConsultaFactuSistemaFacturacion|*:DatosRegistroFacturacion|*:Incidencia")
Dim NIFPresentador As String
NIFPresentador = responseXml.GetChildContent("*:Body|*:RespuestaConsultaFactuSistemaFacturacion|*:RegistroRespuestaConsultaFactuSistemaFacturacion|*:DatosPresentacion|*:NIFPresentador")
Dim TimestampPresentacion As String
TimestampPresentacion = responseXml.GetChildContent("*:Body|*:RespuestaConsultaFactuSistemaFacturacion|*:RegistroRespuestaConsultaFactuSistemaFacturacion|*:DatosPresentacion|*:TimestampPresentacion")
Dim IdPeticion As String
IdPeticion = responseXml.GetChildContent("*:Body|*:RespuestaConsultaFactuSistemaFacturacion|*:RegistroRespuestaConsultaFactuSistemaFacturacion|*:DatosPresentacion|*:IdPeticion")
Dim TimestampUltimaModificacion As String
TimestampUltimaModificacion = responseXml.GetChildContent("*:Body|*:RespuestaConsultaFactuSistemaFacturacion|*:RegistroRespuestaConsultaFactuSistemaFacturacion|*:EstadoRegistro|*:TimestampUltimaModificacion")
Dim EstadoRegistro As String
EstadoRegistro = responseXml.GetChildContent("*:Body|*:RespuestaConsultaFactuSistemaFacturacion|*:RegistroRespuestaConsultaFactuSistemaFacturacion|*:EstadoRegistro|*:EstadoRegistro")
Dim CodigoErrorRegistro As String
CodigoErrorRegistro = responseXml.GetChildContent("*:Body|*:RespuestaConsultaFactuSistemaFacturacion|*:RegistroRespuestaConsultaFactuSistemaFacturacion|*:EstadoRegistro|*:CodigoErrorRegistro")
Dim DescripcionErrorRegistro As String
DescripcionErrorRegistro = responseXml.GetChildContent("*:Body|*:RespuestaConsultaFactuSistemaFacturacion|*:RegistroRespuestaConsultaFactuSistemaFacturacion|*:EstadoRegistro|*:DescripcionErrorRegistro")
IDEmisorFactura = responseXml.GetChildContent("*:Body|*:RespuestaConsultaFactuSistemaFacturacion|*:ClavePaginacion|*:IDEmisorFactura")
NumSerieFactura = responseXml.GetChildContent("*:Body|*:RespuestaConsultaFactuSistemaFacturacion|*:ClavePaginacion|*:NumSerieFactura")
FechaExpedicionFactura = responseXml.GetChildContent("*:Body|*:RespuestaConsultaFactuSistemaFacturacion|*:ClavePaginacion|*:FechaExpedicionFactura")

Request XML

<soapenv:Envelope xmlns:soapenv="http://schemas.xmlsoap.org/soap/envelope/" xmlns:sfLRC="https://www2.agenciatributaria.gob.es/static_files/common/internet/dep/aplicaciones/es/aeat/tike/cont/ws/ConsultaLR.xsd" xmlns:sf="https://www2.agenciatributaria.gob.es/static_files/common/internet/dep/aplicaciones/es/aeat/tike/cont/ws/SuministroInformacion.xsd">
    <soapenv:Header/>
    <soapenv:Body>
        <sfLRC:ConsultaFactuSistemaFacturacion>
            <sfLRC:Cabecera>
                <sf:IDVersion>1.0</sf:IDVersion>
                <sf:ObligadoEmision>
                    <sf:NombreRazon>string</sf:NombreRazon>
                    <sf:NIF>string</sf:NIF>
                </sf:ObligadoEmision>
                <sf:IndicadorRepresentante>S</sf:IndicadorRepresentante>
            </sfLRC:Cabecera>
            <sfLRC:FiltroConsulta>
                <sfLRC:PeriodoImputacion>
                    <sf:Ejercicio>string</sf:Ejercicio>
                    <sf:Periodo>01</sf:Periodo>
                </sfLRC:PeriodoImputacion>
                <sfLRC:NumSerieFactura>string</sfLRC:NumSerieFactura>
                <sfLRC:Contraparte>
                    <sf:NombreRazon>string</sf:NombreRazon>
                    <sf:NIF>string</sf:NIF>
                </sfLRC:Contraparte>
                <sfLRC:FechaExpedicionFactura/>
                <sfLRC:SistemaInformatico>
                    <sf:NombreRazon>string</sf:NombreRazon>
                    <sf:NIF>string</sf:NIF>
                    <sf:NombreSistemaInformatico>string</sf:NombreSistemaInformatico>
                    <sf:IdSistemaInformatico>string</sf:IdSistemaInformatico>
                    <sf:Version>string</sf:Version>
                    <sf:NumeroInstalacion>string</sf:NumeroInstalacion>
                    <sf:TipoUsoPosibleSoloVerifactu>S</sf:TipoUsoPosibleSoloVerifactu>
                    <sf:TipoUsoPosibleMultiOT>S</sf:TipoUsoPosibleMultiOT>
                    <sf:IndicadorMultiplesOT>S</sf:IndicadorMultiplesOT>
                </sfLRC:SistemaInformatico>
                <sfLRC:RefExterna>string</sfLRC:RefExterna>
                <sfLRC:ClavePaginacion>
                    <sf:IDEmisorFactura>string</sf:IDEmisorFactura>
                    <sf:NumSerieFactura>string</sf:NumSerieFactura>
                    <sf:FechaExpedicionFactura>string</sf:FechaExpedicionFactura>
                </sfLRC:ClavePaginacion>
            </sfLRC:FiltroConsulta>
            <sfLRC:DatosAdicionalesRespuesta>
                <sfLRC:MostrarNombreRazonEmisor>S</sfLRC:MostrarNombreRazonEmisor>
                <sfLRC:MostrarSistemaInformatico>S</sfLRC:MostrarSistemaInformatico>
            </sfLRC:DatosAdicionalesRespuesta>
        </sfLRC:ConsultaFactuSistemaFacturacion>
    </soapenv:Body>
</soapenv:Envelope>

Response XML

<soapenv:Envelope xmlns:soapenv="http://schemas.xmlsoap.org/soap/envelope/" xmlns:sfLRRC="https://www2.agenciatributaria.gob.es/static_files/common/internet/dep/aplicaciones/es/aeat/tike/cont/ws/RespuestaConsultaLR.xsd" xmlns:sf="https://www2.agenciatributaria.gob.es/static_files/common/internet/dep/aplicaciones/es/aeat/tike/cont/ws/SuministroInformacion.xsd">
    <soapenv:Header/>
    <soapenv:Body>
        <sfLRRC:RespuestaConsultaFactuSistemaFacturacion>
            <sfLRRC:Cabecera>
                <sf:IDVersion>1.0</sf:IDVersion>
                <sf:ObligadoEmision>
                    <sf:NombreRazon>string</sf:NombreRazon>
                    <sf:NIF>string</sf:NIF>
                </sf:ObligadoEmision>
                <sf:IndicadorRepresentante>S</sf:IndicadorRepresentante>
            </sfLRRC:Cabecera>
            <sfLRRC:PeriodoImputacion>
                <sfLRRC:Ejercicio>string</sfLRRC:Ejercicio>
                <sfLRRC:Periodo>01</sfLRRC:Periodo>
            </sfLRRC:PeriodoImputacion>
            <sfLRRC:IndicadorPaginacion>S</sfLRRC:IndicadorPaginacion>
            <sfLRRC:ResultadoConsulta>ConDatos</sfLRRC:ResultadoConsulta>
            <sfLRRC:RegistroRespuestaConsultaFactuSistemaFacturacion>
                <sfLRRC:IDFactura>
                    <sf:IDEmisorFactura>string</sf:IDEmisorFactura>
                    <sf:NumSerieFactura>string</sf:NumSerieFactura>
                    <sf:FechaExpedicionFactura>string</sf:FechaExpedicionFactura>
                </sfLRRC:IDFactura>
                <sfLRRC:DatosRegistroFacturacion>
                    <sfLRRC:NombreRazonEmisor>string</sfLRRC:NombreRazonEmisor>
                    <sfLRRC:RefExterna>string</sfLRRC:RefExterna>
                    <sfLRRC:Subsanacion>S</sfLRRC:Subsanacion>
                    <sfLRRC:RechazoPrevio>N</sfLRRC:RechazoPrevio>
                    <sfLRRC:SinRegistroPrevio>S</sfLRRC:SinRegistroPrevio>
                    <sfLRRC:GeneradoPor>E</sfLRRC:GeneradoPor>
                    <sfLRRC:Generador>
                        <sf:NombreRazon>string</sf:NombreRazon>
                        <sf:NIF>string</sf:NIF>
                    </sfLRRC:Generador>
                    <sfLRRC:TipoFactura>F1</sfLRRC:TipoFactura>
                    <sfLRRC:TipoRectificativa>S</sfLRRC:TipoRectificativa>
                    <sfLRRC:FacturasRectificadas>
                        <sfLRRC:IDFacturaRectificada>
                            <sf:IDEmisorFactura>string</sf:IDEmisorFactura>
                            <sf:NumSerieFactura>string</sf:NumSerieFactura>
                            <sf:FechaExpedicionFactura>string</sf:FechaExpedicionFactura>
                        </sfLRRC:IDFacturaRectificada>
                    </sfLRRC:FacturasRectificadas>
                    <sfLRRC:FacturasSustituidas>
                        <sfLRRC:IDFacturaSustituida>
                            <sf:IDEmisorFactura>string</sf:IDEmisorFactura>
                            <sf:NumSerieFactura>string</sf:NumSerieFactura>
                            <sf:FechaExpedicionFactura>string</sf:FechaExpedicionFactura>
                        </sfLRRC:IDFacturaSustituida>
                    </sfLRRC:FacturasSustituidas>
                    <sfLRRC:ImporteRectificacion>
                        <sf:BaseRectificada>string</sf:BaseRectificada>
                        <sf:CuotaRectificada>string</sf:CuotaRectificada>
                        <sf:CuotaRecargoRectificado>string</sf:CuotaRecargoRectificado>
                    </sfLRRC:ImporteRectificacion>
                    <sfLRRC:FechaOperacion>string</sfLRRC:FechaOperacion>
                    <sfLRRC:DescripcionOperacion>string</sfLRRC:DescripcionOperacion>
                    <sfLRRC:FacturaSimplificadaArt7273>S</sfLRRC:FacturaSimplificadaArt7273>
                    <sfLRRC:FacturaSinIdentifDestinatarioArt61d>S</sfLRRC:FacturaSinIdentifDestinatarioArt61d>
                    <sfLRRC:Macrodato>S</sfLRRC:Macrodato>
                    <sfLRRC:EmitidaPorTerceroODestinatario>D</sfLRRC:EmitidaPorTerceroODestinatario>
                    <sfLRRC:Tercero>
                        <sf:NombreRazon>string</sf:NombreRazon>
                        <sf:NIF>string</sf:NIF>
                    </sfLRRC:Tercero>
                    <sfLRRC:Destinatarios>
                        <sfLRRC:IDDestinatario>
                            <sf:NombreRazon>string</sf:NombreRazon>
                            <sf:NIF>string</sf:NIF>
                        </sfLRRC:IDDestinatario>
                    </sfLRRC:Destinatarios>
                    <sfLRRC:Cupon>S</sfLRRC:Cupon>
                    <sfLRRC:Desglose>
                        <sf:DetalleDesglose>
                            <sf:Impuesto>01</sf:Impuesto>
                            <sf:ClaveRegimen>01</sf:ClaveRegimen>
                            <sf:CalificacionOperacion>S1</sf:CalificacionOperacion>
                            <sf:TipoImpositivo>string</sf:TipoImpositivo>
                            <sf:BaseImponibleOimporteNoSujeto>string</sf:BaseImponibleOimporteNoSujeto>
                            <sf:BaseImponibleACoste>string</sf:BaseImponibleACoste>
                            <sf:CuotaRepercutida>string</sf:CuotaRepercutida>
                            <sf:TipoRecargoEquivalencia>string</sf:TipoRecargoEquivalencia>
                            <sf:CuotaRecargoEquivalencia>string</sf:CuotaRecargoEquivalencia>
                        </sf:DetalleDesglose>
                    </sfLRRC:Desglose>
                    <sfLRRC:CuotaTotal>string</sfLRRC:CuotaTotal>
                    <sfLRRC:ImporteTotal>string</sfLRRC:ImporteTotal>
                    <sfLRRC:Encadenamiento/>
                    <sfLRRC:SistemaInformatico>
                        <sf:NombreRazon>string</sf:NombreRazon>
                        <sf:NIF>string</sf:NIF>
                        <sf:NombreSistemaInformatico>string</sf:NombreSistemaInformatico>
                        <sf:IdSistemaInformatico>string</sf:IdSistemaInformatico>
                        <sf:Version>string</sf:Version>
                        <sf:NumeroInstalacion>string</sf:NumeroInstalacion>
                        <sf:TipoUsoPosibleSoloVerifactu>S</sf:TipoUsoPosibleSoloVerifactu>
                        <sf:TipoUsoPosibleMultiOT>S</sf:TipoUsoPosibleMultiOT>
                        <sf:IndicadorMultiplesOT>S</sf:IndicadorMultiplesOT>
                    </sfLRRC:SistemaInformatico>
                    <sfLRRC:FechaHoraHusoGenRegistro>dateTime</sfLRRC:FechaHoraHusoGenRegistro>
                    <sfLRRC:NumRegistroAcuerdoFacturacion>string</sfLRRC:NumRegistroAcuerdoFacturacion>
                    <sfLRRC:IdAcuerdoSistemaInformatico>string</sfLRRC:IdAcuerdoSistemaInformatico>
                    <sfLRRC:TipoHuella>01</sfLRRC:TipoHuella>
                    <sfLRRC:Huella>string</sfLRRC:Huella>
                    <sfLRRC:NifRepresentante>string</sfLRRC:NifRepresentante>
                    <sfLRRC:FechaFinVeriFactu>string</sfLRRC:FechaFinVeriFactu>
                    <sfLRRC:Incidencia>S</sfLRRC:Incidencia>
                </sfLRRC:DatosRegistroFacturacion>
                <sfLRRC:DatosPresentacion>
                    <sf:NIFPresentador>string</sf:NIFPresentador>
                    <sf:TimestampPresentacion>dateTime</sf:TimestampPresentacion>
                    <sf:IdPeticion>string</sf:IdPeticion>
                </sfLRRC:DatosPresentacion>
                <sfLRRC:EstadoRegistro>
                    <sfLRRC:TimestampUltimaModificacion>dateTime</sfLRRC:TimestampUltimaModificacion>
                    <sfLRRC:EstadoRegistro>Correcta</sfLRRC:EstadoRegistro>
                    <sfLRRC:CodigoErrorRegistro>integer</sfLRRC:CodigoErrorRegistro>
                    <sfLRRC:DescripcionErrorRegistro>string</sfLRRC:DescripcionErrorRegistro>
                </sfLRRC:EstadoRegistro>
            </sfLRRC:RegistroRespuestaConsultaFactuSistemaFacturacion>
            <sfLRRC:ClavePaginacion>
                <sf:IDEmisorFactura>string</sf:IDEmisorFactura>
                <sf:NumSerieFactura>string</sf:NumSerieFactura>
                <sf:FechaExpedicionFactura>string</sf:FechaExpedicionFactura>
            </sfLRRC:ClavePaginacion>
        </sfLRRC:RespuestaConsultaFactuSistemaFacturacion>
    </soapenv:Body>
</soapenv:Envelope>

SOAP WSDL Generate Code

sfVerifactu / ConsultaFactuSistemaFacturacion

Request XML

Response XML