SII -Nuevo sistema de la Agencia Tributaria española de envío de datos vía Webservice

keys · #1 23-02-2017

Hola. Al llamar a la funcion GetssiSoap este devuelve una respuesta según el tipo de envío que se este realizando. Por ejemplo lo siguiente es un envio de facturas Emitidas. El orden de las respuestas es la misma que las que se envían.

Código Delphi [-]      var 
      resultado : RespuestaLRFacturasEmitidas;

      resultado := GetsiiSOAP(true, '', nil).SuministroLRFacturasEmitidas(ASuministroLRFacturasEmitidas);

       //mostrar los resultados devueltos por la llamada
       for i := low(resultado.RespuestaLinea) to High(resultado.RespuestaLinea) do
        begin

          with resultado.RespuestaLinea[i] do
            begin                           
                    case EstadoRegistro of
                      EstadoRegistroType.Correcto : begin //LA FACTURA ES CORRECTA                                                                  
                                                                     REsultado.CSV;
                                                                    
                                                              end;
                      EstadoRegistroType.AceptadoConErrores : begin                                                                
                                                                                   REsultado.CSV;
                                                                                   DescripcionErrorRegistro; //Descripcion del resultado devuelto
                                                              end;
                      EstadoRegistroType.Incorrecto : begin
                                                       
                                                       CodigoErrorRegistro;
                                                        DescripcionErrorRegistro; //Descripcion del resultado devuelto
                                                      end;
                    end; //cASE
                    
                
         end; //fOR

Busca en los mensajes anteriores que hay un ejemplo entero de envío y se trata esto.

Un Saludo.

Nasca · #2 23-02-2017

Nuevo documento publicado:

http://www.agenciatributaria.es/stat...ondiciones.pdf

Es interesante a efectos técnicos.

Aunque tampoco dice mucho más de lo que ya se sabía a través de los WSDL.

CMB · #3 24-02-2017

Cita:

Empezado por keys

Hola. Al llamar a la funcion GetssiSoap este devuelve una respuesta según el tipo de envío que se este realizando. Por ejemplo lo siguiente es un envio de facturas Emitidas. El orden de las respuestas es la misma que las que se envían. Busca en los mensajes anteriores que hay un ejemplo entero de envío y se trata esto.

Hola keys:

Muchas gracias por tu respuesta.

Con toda seguridad será de gran utilidad para la mayoría, aunque en mi caso, dado que envío un XML ya creado y cerrado, y recibo una respuesta también en formato XML, tendré que trabajarme un parsing manual para extraer el estado de cada factura y guardarlo en disco para conocimiento del usuario. Ya sé que Delphi tiene el TXMLDocument y los ChildNodes y demás, pero me inclino por meter la respuesta en un TStringList y analizarla línea a línea. Nada del otro mundo.

Gracias de nuevo, y saludos cordiales,

Nasca · #4 24-02-2017

Cita:

Empezado por CMB

Ya sé que Delphi tiene el TXMLDocument y los ChildNodes y demás, pero me inclino por meter la respuesta en un TStringList y analizarla línea a línea. Nada del otro mundo.

Yo también me inclino por esa opción. Es mas manual pero se mantiene un mejor control y se reducen las dependencias.
De todas formas miraré si hay algún parser que lo simplifique sin dependencias, que se compile en la propia aplicación. Si alguno conoce alguno le agradecería referencias.

Miraré:
https://github.com/Fr0sT-Brutal/awes...hi#xmljsonyaml

CMB · #5 24-02-2017

Cita:

Empezado por Nasca

Yo también me inclino por esa opción. Es mas manual pero se mantiene un mejor control y se reducen las dependencias. De todas formas miraré si hay algún parser que lo simplifique sin dependencias, que se compile en la propia aplicación. Si alguno conoce alguno le agradecería referencias.

A falta de parser, yo estoy pensando en meter las líneas del XML de respuesta en un TStringList. A partir de ahí, ir buscando los tags que son clave (<siiR:EstadoEnvio>, <siiR:EstadoRegistro>, <siiR:CSV>, <siiR:CodigoErrorRegistro>, <siiR: DescripcionErrorRegistro>) y asociar los valores que contengan con el número de factura que se encuentra en <sii:NumSerieFacturaEmisor>. Luego meter los valores hallados en el registro correspondiente del fichero de facturas, con el fin de que el usuario disponga de esa información. Si la factura ha sido aceptada, o lo ha sido con errores, o rechazada explicando por qué...

Si alguien tuviese una idea mejor se le agradecería.

Saludos,

paquimd · #6 24-02-2017

Yo estoy haciendolo en c#. Ya me conecto pero no soy capaz de enviar el xml. ¿podríais pasarme un xml válido? O incluso orientarme en c#.

Gracias

CMB · #7 24-02-2017

Cita:

Empezado por paquimd

Yo estoy haciendolo en c#. Ya me conecto pero no soy capaz de enviar el xml. ¿podríais pasarme un xml válido? O incluso orientarme en c#.

Aquí tienes un ejemplo de XML para facturas emitidas. Es válido, pero tendrás que poner nombres y NIF reconocidos por la AEAT donde hay letras repetidas.

Y en este documento, distribuido por la AEAT, tienes varios ejemplos más: SII_Descripcion_ServicioWeb_v0.5_es_es.pdf

Código:

<?xml version="1.0" encoding="UTF-8"?>
<soapenv:Envelope xmlns:soapenv="http://schemas.xmlsoap.org/soap/envelope/" xmlns:siiLR="https://www2.agenciatributaria.gob.es/static_files/common/internet/dep/aplicaciones/es/aeat/ssii/fact/ws/SuministroLR.xsd" xmlns:sii="https://www2.agenciatributaria.gob.es/static_files/common/internet/dep/aplicaciones/es/aeat/ssii/fact/ws/SuministroInformacion.xsd">
    <soapenv:Header/>
    <soapenv:Body>
        <siiLR:SuministroLRFacturasEmitidas>
            <sii:Cabecera>
                <sii:IDVersionSii>0.5</sii:IDVersionSii>
                <sii:Titular>
                    <sii:NombreRazon>AAAAAAAAAAAAAAAAAAAA</sii:NombreRazon>
                    <sii:NIF>XXXXXXXXX</sii:NIF>
                </sii:Titular>
                <sii:TipoComunicacion>A0</sii:TipoComunicacion>
            </sii:Cabecera>
            <siiLR:RegistroLRFacturasEmitidas>
                <sii:PeriodoImpositivo>
                    <sii:Ejercicio>2017</sii:Ejercicio>
                    <sii:Periodo>02</sii:Periodo>
                </sii:PeriodoImpositivo>
                <siiLR:IDFactura>
                    <sii:IDEmisorFactura>
                        <sii:NIF>XXXXXXXXX</sii:NIF>
                    </sii:IDEmisorFactura>
                    <sii:NumSerieFacturaEmisor>99103</sii:NumSerieFacturaEmisor>
                    <sii:FechaExpedicionFacturaEmisor>15-02-2017</sii:FechaExpedicionFacturaEmisor>
                </siiLR:IDFactura>
                <siiLR:FacturaExpedida>
                    <sii:TipoFactura>F1</sii:TipoFactura>
                    <sii:ClaveRegimenEspecialOTrascendencia>01</sii:ClaveRegimenEspecialOTrascendencia>
                    <sii:ImporteTotal>5.69</sii:ImporteTotal>
                    <sii:DescripcionOperacion>COMPRA-XXXXXX</sii:DescripcionOperacion>
                    <sii:Contraparte>
                        <sii:NombreRazon>BBBBBBBBBBBBBBBBBBBB</sii:NombreRazon>
                        <sii:NIF>YYYYYYYYY</sii:NIF>
                    </sii:Contraparte>
                    <sii:TipoDesglose>
                        <sii:DesgloseFactura>
                            <sii:Sujeta>
                                <sii:NoExenta>
                                    <sii:TipoNoExenta>S1</sii:TipoNoExenta>
                                    <sii:DesgloseIVA>
                                        <sii:DetalleIVA>
                                            <sii:TipoImpositivo>21.00</sii:TipoImpositivo>
                                            <sii:BaseImponible>4.70</sii:BaseImponible>
                                            <sii:CuotaRepercutida>0.99</sii:CuotaRepercutida>
                                        </sii:DetalleIVA>
                                    </sii:DesgloseIVA>
                                </sii:NoExenta>
                            </sii:Sujeta>
                        </sii:DesgloseFactura>
                    </sii:TipoDesglose>
                </siiLR:FacturaExpedida>
            </siiLR:RegistroLRFacturasEmitidas>
            <siiLR:RegistroLRFacturasEmitidas>
                <sii:PeriodoImpositivo>
                    <sii:Ejercicio>2017</sii:Ejercicio>
                    <sii:Periodo>02</sii:Periodo>
                </sii:PeriodoImpositivo>
                <siiLR:IDFactura>
                    <sii:IDEmisorFactura>
                        <sii:NIF>XXXXXXXXX</sii:NIF>
                    </sii:IDEmisorFactura>
                    <sii:NumSerieFacturaEmisor>99101</sii:NumSerieFacturaEmisor>
                    <sii:FechaExpedicionFacturaEmisor>14-02-2017</sii:FechaExpedicionFacturaEmisor>
                </siiLR:IDFactura>
                <siiLR:FacturaExpedida>
                    <sii:TipoFactura>F1</sii:TipoFactura>
                    <sii:ClaveRegimenEspecialOTrascendencia>01</sii:ClaveRegimenEspecialOTrascendencia>
                    <sii:ImporteTotal>275.00</sii:ImporteTotal>
                    <sii:DescripcionOperacion>COMPRA-XXXXXX</sii:DescripcionOperacion>
                    <sii:Contraparte>
                        <sii:NombreRazon>CCCCCCCCCCCCCCCCCCCC</sii:NombreRazon>
                        <sii:NIF>ZZZZZZZZZ</sii:NIF>
                    </sii:Contraparte>
                    <sii:TipoDesglose>
                        <sii:DesgloseFactura>
                            <sii:Sujeta>
                                <sii:NoExenta>
                                    <sii:TipoNoExenta>S1</sii:TipoNoExenta>
                                    <sii:DesgloseIVA>
                                        <sii:DetalleIVA>
                                            <sii:TipoImpositivo>10.00</sii:TipoImpositivo>
                                            <sii:BaseImponible>250.00</sii:BaseImponible>
                                            <sii:CuotaRepercutida>25.00</sii:CuotaRepercutida>
                                        </sii:DetalleIVA>
                                    </sii:DesgloseIVA>
                                </sii:NoExenta>
                            </sii:Sujeta>
                        </sii:DesgloseFactura>
                    </sii:TipoDesglose>
                </siiLR:FacturaExpedida>
            </siiLR:RegistroLRFacturasEmitidas>
        </siiLR:SuministroLRFacturasEmitidas>
    </soapenv:Body>
</soapenv:Envelope>

dtovar8a · #8 29-03-2017

Buenos días,
En el caso de la construcción del XML he optado por su creación manual. En este sentido no tengo ningún problema, puedo subir manualmente el fichero desde el portal de AEAT con su certificado y pasa correctamente, puediendo ver la factura subida desde la consulta de facturas.

El problema viene cuando intento subir dicho archivo mediante C# o VB.

He utilizado diferentes mecanismos, y en ambos me encuentro varios problemas:

Utilizando HttpWebRequest, aparece el error "Fin prematuro del archivo".
Comenta @CMB que puede ser problema del fichero y que al abrir con un explorador me indicará la línea/columna del error, pero el fichero abre correctamente, de hecho, como he dicho antes, lo he subido sin problemas desde el portal.
El código que utilizo es el que utiliza @angelhorse:

Código:

    Public Sub sendXML(_subjectname As String, _filepath As String)
        subjectName = _subjectname
        filepath = _filepath

        Dim req As HttpWebRequest
        Dim url As String = "https://www7.aeat.es/wlpl/SSII-FACT/ws/fe/SiiFactFEV1SOAP"
        'inicializar propiedades request--------------------------------
        req = HttpWebRequest.Create(url)
        req.Headers.Add("SOAP:Action")
        req.ContentType = "text/xml;charset=""utf-8"""
        req.Accept = "text/xml"
        req.Method = "POST"

        Dim soapEnvelopeXml As XmlDocument = New XmlDocument()
        soapEnvelopeXml.Load(_filepath)

        cert = New X509Certificate2("c:\Temp\certificado.pfx", "12345")
        req.ClientCertificates.Add(cert)

        Dim rest As WebResponse = req.GetResponse()

        Dim reader As StreamReader = New StreamReader(rest.GetResponseStream())
        soapResult = reader.ReadToEnd()
    End Sub

¿Que está ocurriendo?

Utilizando la clase siiService, creada a partir del WS y cambianado inheerits por: Microsoft.Web.Services3.WebServicesClientProtocol, como describe @batuzail.
Los pasos que sigo son los siguientes:

Agrego a referencias de mi proyecto "Microsoft.Web.Services3"

Utilizo la siguiente instrucción para generar la clase siiService a partir del servicio web:

Código:

wsdl https://www2.agenciatributaria.gob.es/static_files/common/internet/dep/aplicaciones/es/aeat/ssii/fact/ws/SuministroFactEmitidas.wsdl /language=VB

Una vez generada la clase, la edito y cambio

Código:

Partial Public Class siiService
    Inherits System.Web.Services.Protocols.SoapHttpClientProtocol

por

Código:

Partial Public Class siiSuministroFactEmitidas
    Inherits Microsoft.Web.Services3.WebServicesClientProtocol

Importo a mi proyecto la clase recién generada
Agrego la referencia al servico web para tener acceso a los datasets y la llamo SuministroFactEmitidas

Añado los siguientes imports:

Código:

Imports System.IO
Imports System.Security.Cryptography.X509Certificates
Imports System.Xml.Serialization
Imports Microsoft.Web.Services3
Imports Microsoft.Web.Services3.Security
Imports Microsoft.Web.Services3.Security.Tokens

Añado el siguiente código

Código:

    Private Sub send()

        Try
            cert = findCertificate()
            Dim signatureToken As X509SecurityToken = New X509SecurityToken(cert)
            Dim sig As New MessageSignature(signatureToken)

            Dim webserviceProxy As New siiSuministroFactEmitidas
            webserviceProxy.ClientCertificates.Add(cert)

            Dim requestContext As SoapContext = webserviceProxy.RequestSoapContext
            requestContext.Security.Tokens.Add(signatureToken)
            requestContext.Security.Timestamp.TtlInSeconds = 60
            requestContext.Security.Elements.Add(sig)

            Dim suministroLRFacturasEmitidas As New SuministroLRFacturasEmitidas

            Dim xmlSerializer As New XmlSerializer(suministroLRFacturasEmitidas.GetType, "https://www2.agenciatributaria.gob.es/static_files/common/internet/dep/aplicaciones/es/aeat/ssii/fact/ws/SuministroLR.xsd")

            Using reader As New FileStream(filepath, FileMode.Open)
                suministroLRFacturasEmitidas = CType(xmlSerializer.Deserialize(reader), SuministroLRFacturasEmitidas)
            End Using

            Dim resp As SuministroFactEmitidas.RespuestaLRFEmitidasType

            webserviceProxy.SuministroLRFacturasEmitidas(suministroLRFacturasEmitidas)

        Catch ex As Exception
            Console.WriteLine(ex.ToString())
        End Try

    End Sub

No tengo ningún error de compilación, pero al ejecutarlo aparece un error en tiempo de ejecución en la siguiente línea:

Código:

Dim webserviceProxy As New siiSuministroFactEmitidas

con el error "URI no válido: no se puede determinar el formato del URI."

¿Alguien podría darme algo de luz por alguna de las dos vías?

Gracias

bartag · #9 25-02-2017

Cita:

Empezado por paquimd

Yo estoy haciendolo en c#. Ya me conecto pero no soy capaz de enviar el xml. ¿podríais pasarme un xml válido? O incluso orientarme en c#.

Gracias

Yo estoy haciendo también pruebas en VB/C# y me estoy encontrando con campos que no aparecen (por ejemplo 'ARegistroLRFacturasEmitidas(0).FacturaExpedida.Contraparte.NIF' lo he tenido que crear y también todos los relacionados con 'ARegistroLRFacturasEmitidas(0).FacturaExpedida.TipoDesglose.desgloseFactura...').

Alguien ha tenido el mismo problema? Veo que a los que utilizan Delphi les funciona perfectamente en ese aspecto. Ya no sé si es un problema del lenguaje utilizado o de los cambios que está realizando la Administración...

CMB · #10 25-02-2017

Cita:

Empezado por bartag

Yo estoy haciendo también pruebas en VB/C# y me estoy encontrando con campos que no aparecen (por ejemplo 'ARegistroLRFacturasEmitidas(0).FacturaExpedida.Contraparte.NIF' lo he tenido que crear y también todos los relacionados con 'ARegistroLRFacturasEmitidas(0).FacturaExpedida.TipoDesglose.desgloseFactura...').
Alguien ha tenido el mismo problema? Veo que a los que utilizan Delphi les funciona perfectamente en ese aspecto. Ya no sé si es un problema del lenguaje utilizado o de los cambios que está realizando la Administración...

Mejor creas un XML paso a paso, lo envías, y recoges la respuesta. En mi humilde opinión es lo más sencillo y posees tú todo el control. Yo lo estoy haciendo así y me va muy bien.

Saludos,

paquimd · #11 01-03-2017

Cita:

Empezado por bartag

Yo estoy haciendo también pruebas en VB/C# y me estoy encontrando con campos que no aparecen (por ejemplo 'ARegistroLRFacturasEmitidas(0).FacturaExpedida.Contraparte.NIF' lo he tenido que crear y también todos los relacionados con 'ARegistroLRFacturasEmitidas(0).FacturaExpedida.TipoDesglose.desgloseFactura...').

Alguien ha tenido el mismo problema? Veo que a los que utilizan Delphi les funciona perfectamente en ese aspecto. Ya no sé si es un problema del lenguaje utilizado o de los cambios que está realizando la Administración...

Hola bartag

Yo lo que intento es subir un xml ya generado que en teoría tiene el formato correcto. Mi problema es al deserializarlo para convertirlo en SuministroLRFacturasEmitidas. La conexión la hago con el certificado, ¿alguien ha subido el xml?

Gracias

Temas Similares
Tema	Autor	Foro	Respuestas	Último mensaje
TICKET BAI (TicketBAI); Nuevo sistema de la Agencia Tributaria del Pais Vasco	keys	Internet	4170	Hace 1 Semana 17:29:05
AEAT envio de datos vía Webservice problemas con WSDL	CelsoO	Internet	11	09-10-2019 20:03:41
webService Soap de la Administración Digital Española notific@	apicito	Internet	3	31-01-2017 11:25:28
Error en Webservice funcion envio de sms	webmasterplc	Delphi para la web	5	25-07-2013 20:10:29
Problemas con envío de XML a un WebService	davidvamo	Internet	1	13-02-2007 15:49:20