Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Internet
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Grupo de Teaming del ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 07-04-2017
juabero juabero is offline
Registrado
NULL
 
Registrado: abr 2017
Posts: 6
Poder: 0
juabero Va por buen camino
Ayuda por favor

Buenos dias compañeros:

Esto desarrollando el SII en VB.Net con la versión 6 de Hacienda, generó perfectamente el xml con el WDSL, pero a la hora de enviar por siiSOAPClient, me devuelve el error de "El tipo de contenido text/html del mensaje de respuesta no coincide con el tipo de contenido del enlace (text/xml; charset=utf-8). Si usa un codificador personalizado, asegúrese de que el método IsContentTypeSupported se implemente correctamente", he repasado el config, todas la configuraciones que vosotros habeis puesto y no hay forma.

Alguien podría echarme una mano
Responder Con Cita
  #2  
Antiguo 07-04-2017
javi_valencia44 javi_valencia44 is offline
Miembro
 
Registrado: mar 2017
Posts: 50
Poder: 8
javi_valencia44 Va por buen camino
Una duda...

Cual es el objeto a utilizar cuando se hace una consulta?

Para Suministros es: SuministroLRFacturasEmitidas(en el caso de facturas emitidas)
Para Bajas es: BajaLRFacturasEmitidas

Pero, para Consultas cuál es?
Pensaba que era este ConsultaLRFacturasEmitidasRequest pero me da error a la hora de deserializar el XML
Responder Con Cita
  #3  
Antiguo 07-04-2017
Virman Virman is offline
Miembro
 
Registrado: ene 2017
Posts: 67
Poder: 8
Virman Va por buen camino
Cita:
Empezado por javi_valencia44 Ver Mensaje
Una duda...

Cual es el objeto a utilizar cuando se hace una consulta?

Para Suministros es: SuministroLRFacturasEmitidas(en el caso de facturas emitidas)
Para Bajas es: BajaLRFacturasEmitidas

Pero, para Consultas cuál es?
Pensaba que era este ConsultaLRFacturasEmitidasRequest pero me da error a la hora de deserializar el XML
El objeto a usar es: LRConsultaEmitidasType y te devuelve RespuestaConsultaLRFacturasEmitidasType.
Con respecto a esto, habría alguna forma de convertir el tipo RegistroRespuestaConsultaLRFacturasEmitidas a LRfacturasEmitidasType, es para comprobar si una factura ya existe, emitir esa factura como A1 en tipo de comunicación.
Responder Con Cita
  #4  
Antiguo 07-04-2017
javi_valencia44 javi_valencia44 is offline
Miembro
 
Registrado: mar 2017
Posts: 50
Poder: 8
javi_valencia44 Va por buen camino
Cita:
Empezado por Virman Ver Mensaje
El objeto a usar es: LRConsultaEmitidasType y te devuelve RespuestaConsultaLRFacturasEmitidasType.
Con respecto a esto, habría alguna forma de convertir el tipo RegistroRespuestaConsultaLRFacturasEmitidas a LRfacturasEmitidasType, es para comprobar si una factura ya existe, emitir esa factura como A1 en tipo de comunicación.
Sólo se me ocurre que crees un objeto del tipo LRfacturasEmitidasType y le pases uno a uno cada dato del otro objeto que ya tienes.

Sobre la consulta de facturas emitidas me sigue dando el mismo error, creo que es por algo que pongo mal en el XML de entrada. Le pongo un formato así:

<ConsultaLRFacturasEmitidas>
<!--Datos de contexto de un suministro sin especificar el timpo de comunicacion-->
<Cabecera xmlns="https://www2.agenciatributaria.gob.es/static_files/common/internet/dep/aplicaciones/es/aeat/ssii/fact/ws/SuministroInformacion.xsd">
<IDVersionSii>[string]</IDVersionSii>
<!--Titular de los libros de registro que suministra la información
Datos de una persona física o jurídica Española con un NIF asociado-->
<Titular>
<NombreRazon>[string]</NombreRazon>
<NIF>[string]</NIF>
</Titular>
</Cabecera>
<FiltroConsulta>
<!--Período al que corresponden los apuntes. todos los apuntes deben corresponder al mismo período impositivo-->
<PeriodoImpositivo xmlns="https://www2.agenciatributaria.gob.es/static_files/common/internet/dep/aplicaciones/es/aeat/ssii/fact/ws/SuministroInformacion.xsd">
<Ejercicio>[string]</Ejercicio>
<Periodo>[string]</Periodo>
</PeriodoImpositivo>
<!--Datos de identificación de factura expedida para operaciones de baja y consulta-->
<!-- Optional -->
<ClavePaginacion>
<IDEmisorFactura xmlns="https://www2.agenciatributaria.gob.es/static_files/common/internet/dep/aplicaciones/es/aeat/ssii/fact/ws/SuministroInformacion.xsd">
<NIF>[string]</NIF>
</IDEmisorFactura>
<!--Número y serie de la Factura del Emisor.-->
<NumSerieFacturaEmisor xmlns="https://www2.agenciatributaria.gob.es/static_files/common/internet/dep/aplicaciones/es/aeat/ssii/fact/ws/SuministroInformacion.xsd">[string]</NumSerieFacturaEmisor>
<!--Fecha de emisión de la factura-->
<FechaExpedicionFacturaEmisor xmlns="https://www2.agenciatributaria.gob.es/static_files/common/internet/dep/aplicaciones/es/aeat/ssii/fact/ws/SuministroInformacion.xsd">[string]</FechaExpedicionFacturaEmisor>
</ClavePaginacion>
</FiltroConsulta>
</ConsultaLRFacturasEmitidas>
Responder Con Cita
  #5  
Antiguo 07-04-2017
javi_valencia44 javi_valencia44 is offline
Miembro
 
Registrado: mar 2017
Posts: 50
Poder: 8
javi_valencia44 Va por buen camino
Cita:
Empezado por juabero Ver Mensaje
Buenos dias compañeros:

Esto desarrollando el SII en VB.Net con la versión 6 de Hacienda, generó perfectamente el xml con el WDSL, pero a la hora de enviar por siiSOAPClient, me devuelve el error de "El tipo de contenido text/html del mensaje de respuesta no coincide con el tipo de contenido del enlace (text/xml; charset=utf-8). Si usa un codificador personalizado, asegúrese de que el método IsContentTypeSupported se implemente correctamente", he repasado el config, todas la configuraciones que vosotros habeis puesto y no hay forma.

Alguien podría echarme una mano
Pon el código que estás usando
Responder Con Cita
  #6  
Antiguo 07-04-2017
juabero juabero is offline
Registrado
NULL
 
Registrado: abr 2017
Posts: 6
Poder: 0
juabero Va por buen camino
Ayuda por Favos

Este es el codigo que utilizo

Dim certificado As New X509Certificate2("d:\certificado.cer", "password")

Dim servicio As New SuministroLRFacturasEmitidas
servicio.Cabecera = New CabeceraSii
servicio.Cabecera.IDVersionSii = VersionSiiType.Item06
servicio.Cabecera.TipoComunicacion = ClaveTipoComunicacionType.A0
servicio.Cabecera.Titular = New PersonaFisicaJuridicaESType
servicio.Cabecera.Titular.NIF = "xxxxx"

servicio.Cabecera.Titular.NIFRepresentante = "yyyyy"
servicio.Cabecera.Titular.NombreRazon = "Mi Empresa"
Try
Dim fac As New LRfacturasEmitidasType
fac.PeriodoImpositivo = New RegistroSiiPeriodoImpositivo
fac.PeriodoImpositivo.Ejercicio = 2017
fac.PeriodoImpositivo.Periodo = TipoPeriodoType.Item03

Dim fact As New IDFacturaExpedidaType
Dim EmisorFactura = New IDFacturaExpedidaTypeIDEmisorFactura
EmisorFactura.NIF = "xxxxx"
fact.IDEmisorFactura = EmisorFactura
fact.NumSerieFacturaEmisor = "SN0001"
fact.FechaExpedicionFacturaEmisor = "14-03-2017"
fac.IDFactura = fact


fac.FacturaExpedida = New FacturaExpedidaType
fac.FacturaExpedida.TipoFactura = ClaveTipoFacturaType.F1

fac.FacturaExpedida.ClaveRegimenEspecialOTrascendencia = IdOperacionesTrascendenciaTributariaType.Item01
fac.FacturaExpedida.DescripcionOperacion = "VENTAS GENERALES"
fac.FacturaExpedida.ImporteTotal = "121.0"
fac.FacturaExpedida.BaseImponibleACoste = "100"
fac.FacturaExpedida.DescripcionOperacion = "Ventas"

fac.FacturaExpedida.Contraparte = New PersonaFisicaJuridicaType
fac.FacturaExpedida.Contraparte.NombreRazon = "Mi Cliente"
fac.FacturaExpedida.Contraparte.NIFRepresentante = "xxxxx"
Dim a As New IDOtroType
a.CodigoPais = CountryType2.ES
a.CodigoPaisSpecified = True
a.IDType = PersonaFisicaJuridicaIDTypeType.Item02
a.ID = "xxxxxx"
fac.FacturaExpedida.Contraparte.Item = a

fac.FacturaExpedida.TipoDesglose = New FacturaExpedidaTypeTipoDesglose

Dim tipo As New TipoSinDesgloseType
tipo.Sujeta = New SujetaType
tipo.Sujeta.NoExenta = New SujetaTypeNoExenta
Dim tipoivas(0) As DetalleIVAEmitidaType
Dim tipoiva As New DetalleIVAEmitidaType
tipoiva.BaseImponible = "100.00"
tipoiva.TipoImpositivo = "21.00"
tipoiva.CuotaRepercutida = "21.00"
tipoivas(0) = tipoiva
tipo.Sujeta.NoExenta.DesgloseIVA = tipoivas
fac.FacturaExpedida.TipoDesglose.Item = tipo


Dim facturas(0) As LRfacturasEmitidasType
facturas(0) = fac
servicio.RegistroLRFacturasEmitidas = facturas
Dim enviar As New ServiceEmitidas.siiSOAPClient
Dim respuesta As New RespuestaLRFEmitidasType
Try

enviar.ClientCredentials.ClientCertificate.Certificate = certificado
respuesta = enviar.SuministroLRFacturasEmitidas(servicio)
Catch ex As Exception
Throw New System.ServiceModel.ProtocolException(ex.Message)
End Try
Catch ex As System.ServiceModel.ProtocolException
Dim visor As New visor
visor.WebBrowser1.DocumentText = ex.Message
visor.ShowDialog()
Dim pepe As String = ""
End Try
Responder Con Cita
  #7  
Antiguo 07-04-2017
javi_valencia44 javi_valencia44 is offline
Miembro
 
Registrado: mar 2017
Posts: 50
Poder: 8
javi_valencia44 Va por buen camino
Cita:
Empezado por juabero Ver Mensaje
Este es el codigo que utilizo

Dim certificado As New X509Certificate2("d:\certificado.cer", "password")

Dim servicio As New SuministroLRFacturasEmitidas
servicio.Cabecera = New CabeceraSii
servicio.Cabecera.IDVersionSii = VersionSiiType.Item06
servicio.Cabecera.TipoComunicacion = ClaveTipoComunicacionType.A0
servicio.Cabecera.Titular = New PersonaFisicaJuridicaESType
servicio.Cabecera.Titular.NIF = "xxxxx"

servicio.Cabecera.Titular.NIFRepresentante = "yyyyy"
servicio.Cabecera.Titular.NombreRazon = "Mi Empresa"
Try
Dim fac As New LRfacturasEmitidasType
fac.PeriodoImpositivo = New RegistroSiiPeriodoImpositivo
fac.PeriodoImpositivo.Ejercicio = 2017
fac.PeriodoImpositivo.Periodo = TipoPeriodoType.Item03

Dim fact As New IDFacturaExpedidaType
Dim EmisorFactura = New IDFacturaExpedidaTypeIDEmisorFactura
EmisorFactura.NIF = "xxxxx"
fact.IDEmisorFactura = EmisorFactura
fact.NumSerieFacturaEmisor = "SN0001"
fact.FechaExpedicionFacturaEmisor = "14-03-2017"
fac.IDFactura = fact


fac.FacturaExpedida = New FacturaExpedidaType
fac.FacturaExpedida.TipoFactura = ClaveTipoFacturaType.F1

fac.FacturaExpedida.ClaveRegimenEspecialOTrascendencia = IdOperacionesTrascendenciaTributariaType.Item01
fac.FacturaExpedida.DescripcionOperacion = "VENTAS GENERALES"
fac.FacturaExpedida.ImporteTotal = "121.0"
fac.FacturaExpedida.BaseImponibleACoste = "100"
fac.FacturaExpedida.DescripcionOperacion = "Ventas"

fac.FacturaExpedida.Contraparte = New PersonaFisicaJuridicaType
fac.FacturaExpedida.Contraparte.NombreRazon = "Mi Cliente"
fac.FacturaExpedida.Contraparte.NIFRepresentante = "xxxxx"
Dim a As New IDOtroType
a.CodigoPais = CountryType2.ES
a.CodigoPaisSpecified = True
a.IDType = PersonaFisicaJuridicaIDTypeType.Item02
a.ID = "xxxxxx"
fac.FacturaExpedida.Contraparte.Item = a

fac.FacturaExpedida.TipoDesglose = New FacturaExpedidaTypeTipoDesglose

Dim tipo As New TipoSinDesgloseType
tipo.Sujeta = New SujetaType
tipo.Sujeta.NoExenta = New SujetaTypeNoExenta
Dim tipoivas(0) As DetalleIVAEmitidaType
Dim tipoiva As New DetalleIVAEmitidaType
tipoiva.BaseImponible = "100.00"
tipoiva.TipoImpositivo = "21.00"
tipoiva.CuotaRepercutida = "21.00"
tipoivas(0) = tipoiva
tipo.Sujeta.NoExenta.DesgloseIVA = tipoivas
fac.FacturaExpedida.TipoDesglose.Item = tipo


Dim facturas(0) As LRfacturasEmitidasType
facturas(0) = fac
servicio.RegistroLRFacturasEmitidas = facturas
Dim enviar As New ServiceEmitidas.siiSOAPClient
Dim respuesta As New RespuestaLRFEmitidasType
Try

enviar.ClientCredentials.ClientCertificate.Certificate = certificado
respuesta = enviar.SuministroLRFacturasEmitidas(servicio)
Catch ex As Exception
Throw New System.ServiceModel.ProtocolException(ex.Message)
End Try
Catch ex As System.ServiceModel.ProtocolException
Dim visor As New visor
visor.WebBrowser1.DocumentText = ex.Message
visor.ShowDialog()
Dim pepe As String = ""
End Try
Tienes puesto en el fichero App.config esto así?

<binding name="siiBinding">
<security mode="Transport">
<transport clientCredentialType="Certificate" />
</security>
</binding>
Responder Con Cita
  #8  
Antiguo 07-04-2017
juabero juabero is offline
Registrado
NULL
 
Registrado: abr 2017
Posts: 6
Poder: 0
juabero Va por buen camino
Ayuda por favor

Este es mi app.config

<system.serviceModel>
<bindings>
<basicHttpBinding>
<binding name="siiBinding">
<security mode="Transport" >
<transport clientCredentialType="Certificate" />
</security>
</binding>
<binding name="siiBinding2" />
</basicHttpBinding>
<customBinding>
<binding name="siiBinding">
<textMessageEncoding messageVersion="Soap11" />
<httpsTransport />
</binding>
</customBinding>
</bindings>
<client>
<endpoint address="https://www7.aeat.es/wlpl/SSII-FACT/ws/fe/SiiFactFEV1SOAP"
binding="basicHttpBinding" bindingConfiguration="siiBinding"
contract="ServiceEmitidas.siiSOAP" name="SuministroFactEmitidasPruebas" />
</client>
</system.serviceModel>
Responder Con Cita
  #9  
Antiguo 07-04-2017
javi_valencia44 javi_valencia44 is offline
Miembro
 
Registrado: mar 2017
Posts: 50
Poder: 8
javi_valencia44 Va por buen camino
Cita:
Empezado por juabero Ver Mensaje
Este es mi app.config

<system.serviceModel>
<bindings>
<basicHttpBinding>
<binding name="siiBinding">
<security mode="Transport" >
<transport clientCredentialType="Certificate" />
</security>
</binding>
<binding name="siiBinding2" />
</basicHttpBinding>
<customBinding>
<binding name="siiBinding">
<textMessageEncoding messageVersion="Soap11" />
<httpsTransport />
</binding>
</customBinding>
</bindings>
<client>
<endpoint address="https://www7.aeat.es/wlpl/SSII-FACT/ws/fe/SiiFactFEV1SOAP"
binding="basicHttpBinding" bindingConfiguration="siiBinding"
contract="ServiceEmitidas.siiSOAP" name="SuministroFactEmitidasPruebas" />
</client>
</system.serviceModel>
Yo esta parte no la tengo puesta:

<customBinding>
<binding name="siiBinding">
<textMessageEncoding messageVersion="Soap11" />
<httpsTransport />
</binding>
</customBinding>
Responder Con Cita
  #10  
Antiguo 07-04-2017
juabero juabero is offline
Registrado
NULL
 
Registrado: abr 2017
Posts: 6
Poder: 0
juabero Va por buen camino
Ayuda por Favor

Cita:
Empezado por javi_valencia44 Ver Mensaje
Yo esta parte no la tengo puesta:

<customBinding>
<binding name="siiBinding">
<textMessageEncoding messageVersion="Soap11" />
<httpsTransport />
</binding>
</customBinding>
Lo he intentado de todas formas.
A ti te funciona, si es asi pasame un ejemplo por favor
Responder Con Cita
  #11  
Antiguo 17-05-2017
dgalindosaeta dgalindosaeta is offline
Registrado
NULL
 
Registrado: may 2017
Posts: 2
Poder: 0
dgalindosaeta Va por buen camino
Cita:
Empezado por juabero Ver Mensaje
Este es el codigo que utilizo

Dim certificado As New X509Certificate2("d:\certificado.cer", "password")

Dim servicio As New SuministroLRFacturasEmitidas
servicio.Cabecera = New CabeceraSii
servicio.Cabecera.IDVersionSii = VersionSiiType.Item06
servicio.Cabecera.TipoComunicacion = ClaveTipoComunicacionType.A0
servicio.Cabecera.Titular = New PersonaFisicaJuridicaESType
servicio.Cabecera.Titular.NIF = "xxxxx"

servicio.Cabecera.Titular.NIFRepresentante = "yyyyy"
servicio.Cabecera.Titular.NombreRazon = "Mi Empresa"
Try
Dim fac As New LRfacturasEmitidasType
fac.PeriodoImpositivo = New RegistroSiiPeriodoImpositivo
fac.PeriodoImpositivo.Ejercicio = 2017
fac.PeriodoImpositivo.Periodo = TipoPeriodoType.Item03

Dim fact As New IDFacturaExpedidaType
Dim EmisorFactura = New IDFacturaExpedidaTypeIDEmisorFactura
EmisorFactura.NIF = "xxxxx"
fact.IDEmisorFactura = EmisorFactura
fact.NumSerieFacturaEmisor = "SN0001"
fact.FechaExpedicionFacturaEmisor = "14-03-2017"
fac.IDFactura = fact


fac.FacturaExpedida = New FacturaExpedidaType
fac.FacturaExpedida.TipoFactura = ClaveTipoFacturaType.F1

fac.FacturaExpedida.ClaveRegimenEspecialOTrascendencia = IdOperacionesTrascendenciaTributariaType.Item01
fac.FacturaExpedida.DescripcionOperacion = "VENTAS GENERALES"
fac.FacturaExpedida.ImporteTotal = "121.0"
fac.FacturaExpedida.BaseImponibleACoste = "100"
fac.FacturaExpedida.DescripcionOperacion = "Ventas"

fac.FacturaExpedida.Contraparte = New PersonaFisicaJuridicaType
fac.FacturaExpedida.Contraparte.NombreRazon = "Mi Cliente"
fac.FacturaExpedida.Contraparte.NIFRepresentante = "xxxxx"
Dim a As New IDOtroType
a.CodigoPais = CountryType2.ES
a.CodigoPaisSpecified = True
a.IDType = PersonaFisicaJuridicaIDTypeType.Item02
a.ID = "xxxxxx"
fac.FacturaExpedida.Contraparte.Item = a

fac.FacturaExpedida.TipoDesglose = New FacturaExpedidaTypeTipoDesglose

Dim tipo As New TipoSinDesgloseType
tipo.Sujeta = New SujetaType
tipo.Sujeta.NoExenta = New SujetaTypeNoExenta
Dim tipoivas(0) As DetalleIVAEmitidaType
Dim tipoiva As New DetalleIVAEmitidaType
tipoiva.BaseImponible = "100.00"
tipoiva.TipoImpositivo = "21.00"
tipoiva.CuotaRepercutida = "21.00"
tipoivas(0) = tipoiva
tipo.Sujeta.NoExenta.DesgloseIVA = tipoivas
fac.FacturaExpedida.TipoDesglose.Item = tipo


Dim facturas(0) As LRfacturasEmitidasType
facturas(0) = fac
servicio.RegistroLRFacturasEmitidas = facturas
Dim enviar As New ServiceEmitidas.siiSOAPClient
Dim respuesta As New RespuestaLRFEmitidasType
Try

enviar.ClientCredentials.ClientCertificate.Certificate = certificado
respuesta = enviar.SuministroLRFacturasEmitidas(servicio)
Catch ex As Exception
Throw New System.ServiceModel.ProtocolException(ex.Message)
End Try
Catch ex As System.ServiceModel.ProtocolException
Dim visor As New visor
visor.WebBrowser1.DocumentText = ex.Message
visor.ShowDialog()
Dim pepe As String = ""
End Try

busca mi post y mira el código, he solucionado tu problema, aunque me produce otro de comunicacion SSL/TLS.

En cuanto al tema con el que recuperas el certificado, mejor hazlo así:

Código:
       [SecurityPermission(SecurityAction.LinkDemand,Unrestricted =true)]
        internal static X509Certificate2 EncontrarCertificado(string NombreCertificado)
        {
            X509Certificate2 resultado = null;
            X509Store almacen = null;            

            try
            {
                almacen = new X509Store(StoreLocation.LocalMachine);
                almacen.Open(OpenFlags.ReadOnly | OpenFlags.OpenExistingOnly);

                foreach(X509Certificate2 certificado in almacen.Certificates)
                {
                    string Nombre = certificado.SubjectName.Name;
                    if(Nombre==NombreCertificado)
                    {
                        resultado = certificado;
                        break;
                    }
                }
            }
            catch
            {

            }


            return resultado;
        }
Responder Con Cita
  #12  
Antiguo 07-08-2023
IcuScc IcuScc is offline
Registrado
 
Registrado: abr 2017
Posts: 9
Poder: 0
IcuScc Va por buen camino
Cita:
Empezado por juabero Ver Mensaje
Buenos dias compañeros:

Esto desarrollando el SII en VB.Net con la versión 6 de Hacienda, generó perfectamente el xml con el WDSL, pero a la hora de enviar por siiSOAPClient, me devuelve el error de "El tipo de contenido text/html del mensaje de respuesta no coincide con el tipo de contenido del enlace (text/xml; charset=utf-8). Si usa un codificador personalizado, asegúrese de que el método IsContentTypeSupported se implemente correctamente", he repasado el config, todas la configuraciones que vosotros habeis puesto y no hay forma.

Alguien podría echarme una mano



hola... recuerdas como lo solventaste?
Gracias.
Responder Con Cita
  #13  
Antiguo 17-08-2023
xamminf xamminf is offline
Miembro
 
Registrado: ene 2017
Posts: 149
Poder: 8
xamminf Va por buen camino
Numeracion de Tickets

Hola,

Ya sé que los tickets no existen, que son facturas simplificadas, pero tengo un cliente que vende entradas de espectaculos
Los numera con numeros sin serie y sin nada mas.
En cambio en el programa la numeracion de las fras. es del tipo SERIE-NUMERO/AÑO

Ahora necesito mandar Resumen de Facturas al SII. Quiero utilizar la clave F4 y poner el primer y ultimo ticket.

¿ Qué hago con el tema de los numeros de ticket teniendo en cuenta que en el programa cada fra. SII lleva su numero de factura como clave y ese es el que se mandara al SII como primer ticket ?


Salu2
Responder Con Cita
  #14  
Antiguo 18-08-2023
antoine0 antoine0 is offline
Miembro
 
Registrado: oct 2021
Posts: 144
Poder: 3
antoine0 Va por buen camino
Cita:
Empezado por xamminf Ver Mensaje
[...] tengo un cliente que vende entradas de espectaculos
Los numera con numeros sin serie y sin nada mas.
Algo no entiendo.
¿Los números se repiten? ¿Es decir, hay tantos tickets 0001 como hay espectáculos?
Si es así, tu cliente tiene un problema, y es que faltaría número de serie, efectivamente.
Pero si los tickets van con números que no se repiten (por ejemplo ticket 0123456789, otro ticket 0123456790 &c.) no veo ningún problema (aparte de las menciones que falten, CIF, fecha, precio, «IVA incluido», obviamente), si los números están emitidos en orden.


Cita:
Ahora necesito mandar Resumen de Facturas al SII. Quiero utilizar la clave F4 y poner el primer y ultimo ticket.

¿ Qué hago con el tema de los numeros de ticket teniendo en cuenta que en el programa cada fra. SII lleva su numero de factura como clave y ese es el que se mandara al SII como primer ticket ?
El hecho que la numeración de las facturas simplificadas no tienen nada que ver con los números de las facturas normales no tiene ninguna importancia: la coherencia en esta materia no es un requisito del reglamento de facturación; lo que importa es que los números sigan correlativos dentro de cada serie.

Primero, tienes que separar los tickets por fecha.
Luego, por bloque de tickets sucesivos (sin número faltante). Digamos 10 tickets del 012345 hasta el 012354. El registro será
Código:
<sii:IDFactura>
  <IDEmisorFactura><NIF>E00000000</NIF></IDEmisorFactura>
  <NumSerieFacturaEmisor>012345</NumSerieFacturaEmisor>
  <NumSerieFacturaEmisorResumenFin>012354</NumSerieFacturaEmisorResumenFin>
  <FechaExpedicionFacturaEmisor>04-08-2023</FechaExpedicionFacturaEmisor>
</sii:IDFactura>
<sii:FacturaExpedida>
  <TipoFactura>F4</TipoFactura>
Caso especial: si solo te queda un ticket en un bloque, hay que ponerle tipo F2 y no rellenar el campo NumSerieFacturaEmisorResumenFin.
Responder Con Cita
  #15  
Antiguo 22-11-2023
Avatar de keys
keys keys is offline
Miembro
 
Registrado: sep 2003
Ubicación: Bilbao
Posts: 1.030
Poder: 22
keys Va por buen camino
Hola a todos.

A alguien más le esta pasando desde el viernes mas o menos, que al enviar facturas emitidas al SII de la aeat le aparece el siguiente error.

Cita:
Unable to load WSDL File/Location: https://www2.agenciatributaria.gob.e...tEmitidas.wsdl. Error [Empty document]
Ya se que si le pongo UseWSDL := false funciona, pero alguien sabe que ha pasado. Es como si ese enlace ya no estuviera disponible, pero si pinchas sobre el si funciona.

Lo mismo ocurre con todos los demás envíos, ventas, pagos, etc...
Gracias.
Responder Con Cita
  #16  
Antiguo 22-11-2023
Nasca Nasca is offline
Miembro
 
Registrado: abr 2007
Ubicación: Almería (España)
Posts: 249
Poder: 18
Nasca Va por buen camino
Pues lo cierto es que no he notado nada así al enviar y te puedo asegurar que me habría enterado inmediatamente.
Responder Con Cita
  #17  
Antiguo 22-11-2023
Avatar de keys
keys keys is offline
Miembro
 
Registrado: sep 2003
Ubicación: Bilbao
Posts: 1.030
Poder: 22
keys Va por buen camino
Cita:
Empezado por Nasca Ver Mensaje
Pues lo cierto es que no he notado nada así al enviar y te puedo asegurar que me habría enterado inmediatamente.
¿Estas enviando con con la versión 1.1? Me temo que han dejado de aceptar los wsdl de la anterior.
Responder Con Cita
  #18  
Antiguo 30-12-2023
nincillo nincillo is offline
Miembro
 
Registrado: may 2017
Posts: 151
Poder: 8
nincillo Va por buen camino
Cita:
Empezado por keys Ver Mensaje
Hola a todos.

A alguien más le esta pasando desde el viernes mas o menos, que al enviar facturas emitidas al SII de la aeat le aparece el siguiente error.



Ya se que si le pongo UseWSDL := false funciona, pero alguien sabe que ha pasado. Es como si ese enlace ya no estuviera disponible, pero si pinchas sobre el si funciona.

Lo mismo ocurre con todos los demás envíos, ventas, pagos, etc...
Gracias.


Cita:
Empezado por pablog2k Ver Mensaje
Address: https://prewww1.aeat.es/wlpl/SSII-FA...iiFactFEV1SOAP

de los WSDL no enviamos nada, utilizamos un componente THTTPRIO que le pasamos la Address que te he comentado arriba, utilizando la función GetsiiSOAP que viene definida en la unidad que se crea al importar el WSDL de facturas emitidas ( que por lo que veo ahora es esta: https://sede.agenciatributaria.gob.e...tEmitidas.wsdl , pero nosotros no enviamos dicha url)
Hola. ¿Habéis conseguido solucionar lo del problema del Empty Document?

Yo estaba intentando hacer la importación del wsdl en un nuevo proyecto de Delphi 2007 y me da el mismo error. Con ambos links de los post que he citado me pasa lo mismo.

Si me descargo el wsdl a un fichero local, entonces ya no me da error al cargarlo, pero luego no lo puedo compilar ya que me da error en la declaración de las siguientes funciones:

Código:
  siiSOAP = interface(IInvokable)
  ['{1E877A56-F627-1434-7788-1955A279ED58}']

    // Cannot unwrap:
    //     - Input part does not refer to an element
    //     - Output part does not refer to an element
    function  SuministroLRFacturasEmitidas(const SuministroLRFacturasEmitidas: SuministroLRFacturasEmitidas): RespuestaLRFacturasEmitidas; stdcall;

    // Cannot unwrap:
    //     - Input part does not refer to an element
    //     - Output part does not refer to an element
    function  AnulacionLRFacturasEmitidas(const AnulacionLRFacturasEmitidas: BajaLRFacturasEmitidas): RespuestaLRBajaFacturasEmitidas; stdcall;

    // Cannot unwrap:
    //     - Input part does not refer to an element
    //     - Output part does not refer to an element
    function  ConsultaLRFacturasEmitidas(const ConsultaLRFacturasEmitidas: ConsultaLRFacturasEmitidas): RespuestaConsultaLRFacturasEmitidas; stdcall;

    // Cannot unwrap:
    //     - Input part does not refer to an element
    //     - Output part does not refer to an element
    function  ConsultaLRFactInformadasCliente(const ConsultaLRFactInformadasCliente: ConsultaLRFactInformadasCliente): RespuestaConsultaLRFactInformadasCliente; stdcall;

    // Cannot unwrap:
    //     - Input part does not refer to an element
    //     - Output part does not refer to an element
    function  ConsultaLRFactInformadasAgrupadasCliente(const ConsultaLRFactInformadasAgrupadasCliente: ConsultaLRFactInformadasAgrupadasCliente): RespuestaConsultaLRFactInformadasAgrupadasCliente; stdcall;
  end;
¿Ese "Cannot unwrap" que aparece delante de cada función puede servirle de "pista" a alguien para saber que problema podemos estar teniendo?.

Gracias.

Edito: Acabo de hacer la importación del wsdl mediante la url en un Delphi 11.3, no me ha dado error de "Empty Document" que me daba al importarlo en el Delphi 2007, pero se me dan dos casos:
- Si el que importo es el wsdl https://sede.agenciatributaria.gob.e...tEmitidas.wsdl si que tengo el mismo problema a la hora de compilar. Las funciones siguen dando los mismos errores.
- Si por el contrario importo el https://www2.agenciatributaria.gob.e...tEmitidas.wsdl entonces aparentemente me lo hace todo normal.

Última edición por nincillo fecha: 30-12-2023 a las 13:42:00.
Responder Con Cita
  #19  
Antiguo 30-12-2023
nincillo nincillo is offline
Miembro
 
Registrado: may 2017
Posts: 151
Poder: 8
nincillo Va por buen camino
Cita:
Empezado por nincillo Ver Mensaje
Hola. ¿Habéis conseguido solucionar lo del problema del Empty Document?

Yo estaba intentando hacer la importación del wsdl en un nuevo proyecto de Delphi 2007 y me da el mismo error. Con ambos links de los post que he citado me pasa lo mismo.

Si me descargo el wsdl a un fichero local, entonces ya no me da error al cargarlo, pero luego no lo puedo compilar ya que me da error en la declaración de las siguientes funciones:

Código:
  siiSOAP = interface(IInvokable)
  ['{1E877A56-F627-1434-7788-1955A279ED58}']

    // Cannot unwrap:
    //     - Input part does not refer to an element
    //     - Output part does not refer to an element
    function  SuministroLRFacturasEmitidas(const SuministroLRFacturasEmitidas: SuministroLRFacturasEmitidas): RespuestaLRFacturasEmitidas; stdcall;

    // Cannot unwrap:
    //     - Input part does not refer to an element
    //     - Output part does not refer to an element
    function  AnulacionLRFacturasEmitidas(const AnulacionLRFacturasEmitidas: BajaLRFacturasEmitidas): RespuestaLRBajaFacturasEmitidas; stdcall;

    // Cannot unwrap:
    //     - Input part does not refer to an element
    //     - Output part does not refer to an element
    function  ConsultaLRFacturasEmitidas(const ConsultaLRFacturasEmitidas: ConsultaLRFacturasEmitidas): RespuestaConsultaLRFacturasEmitidas; stdcall;

    // Cannot unwrap:
    //     - Input part does not refer to an element
    //     - Output part does not refer to an element
    function  ConsultaLRFactInformadasCliente(const ConsultaLRFactInformadasCliente: ConsultaLRFactInformadasCliente): RespuestaConsultaLRFactInformadasCliente; stdcall;

    // Cannot unwrap:
    //     - Input part does not refer to an element
    //     - Output part does not refer to an element
    function  ConsultaLRFactInformadasAgrupadasCliente(const ConsultaLRFactInformadasAgrupadasCliente: ConsultaLRFactInformadasAgrupadasCliente): RespuestaConsultaLRFactInformadasAgrupadasCliente; stdcall;
  end;
¿Ese "Cannot unwrap" que aparece delante de cada función puede servirle de "pista" a alguien para saber que problema podemos estar teniendo?.

Gracias.

Edito: Acabo de hacer la importación del wsdl mediante la url en un Delphi 11.3, no me ha dado error de "Empty Document" que me daba al importarlo en el Delphi 2007, pero se me dan dos casos:
- Si el que importo es el wsdl https://sede.agenciatributaria.gob.e...tEmitidas.wsdl si que tengo el mismo problema a la hora de compilar. Las funciones siguen dando los mismos errores.
- Si por el contrario importo el https://www2.agenciatributaria.gob.e...tEmitidas.wsdl entonces aparentemente me lo hace todo normal.
Amplio la información sobre el mi post anterior ya que ya no me lo deja editar:

Tras intentar utilizar el wsdl que me deja compilar y empezar a rellenar los datos de la cabecera y meter Versión del SII, solo me da la versión 1.0 y si no me confundo, ahora debería de ser la 1.1, con lo cual me temo que tienen / tenemos algún lío con los wsdl a utilizar...
Responder Con Cita
Respuesta



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

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


La franja horaria es GMT +2. Ahora son las 02:19:48.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi