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 03-04-2017
seccion_31 seccion_31 is offline
Miembro
 
Registrado: ene 2017
Posts: 112
Poder: 8
seccion_31 Va por buen camino
Buenas, me vuelvo a incorporar a este tema, tras haberlo dejado un par de meses.

he leído alguno de los posteos pero no todos...

He notado:

que han jodido el interface de facturas recibidas,....

que han puesto en marcha la web SII para enviar XML y consultar lo enviado. Entiendo que les falta el formulario para introducirlas manualmente, AEAT me dice que estará durante este mes.

Ahora estoy re-adaptando el envio con las facturas recibidas y -...

con los cobros en metalico que creo es obligatorio comunicar ¿no? (atraves del envio de cobros)

Saludos !

y de aquí ya hasta Julio. Cualquier cosa en que pueda ayudar por aquí estare.
Responder Con Cita
  #2  
Antiguo 03-04-2017
Virman Virman is offline
Miembro
 
Registrado: ene 2017
Posts: 67
Poder: 8
Virman Va por buen camino
Buenos días, alguno ha conseguido enviar un xml deserealizando uno de partida? Yo estoy intentando hacerlo y no hay forma.
He creado una clase Deserializador() donde creo un objeto XMLSerializer para facturas emitidas: XmlSerializer serializer = new XmlSerializer(typeof(SuministroLRFacturasEmitidas), "https://www2.agenciatributaria.gob.es/static_files/common/internet/dep/aplicaciones/es/aeat/ssii/fact/ws/SuministroLR.xsd");

Al que le paso un fichero XML como referencia. Lo primero que me encuentro es que me obliga a quitar todas las apariciones de la palabra <sii: en las etiquetas sino, me devuelve el error: "Error en el documento XML (2, 2)." Donde el primer dígito es la línea donde aparece un <sii:
Al quitar todos los sii: ya me deja ejecutar, pero me devuelve un objeto sin valores devueltos.

Mi clase sólo contiene lo siguiente:
Código:
try
{
                XmlSerializer serializer = new XmlSerializer(typeof(SuministroLRFacturasEmitidas), "https://www2.agenciatributaria.gob.es/static_files/common/internet/dep/aplicaciones/es/aeat/ssii/fact/ws/SuministroLR.xsd");

                FileStream fs = new FileStream(filename, FileMode.Open);
                XmlReader reader = XmlReader.Create(fs);

                SuministroLRFacturasEmitidas i;

                i = (SuministroLRFacturasEmitidas)serializer.Deserialize(reader);
                fs.Close();
                return i;
            }
            catch (System.Exception ex)
El fichero XML de entrada tiene la siguiente estructura (adjunto parte de él):
Código:
<?xml version="1.0" encoding="UTF-8"?>
<SuministroLRFacturasEmitidas xmlns="https://www2.agenciatributaria.gob.es/static_files/common/internet/dep/aplicaciones/es/aeat/ssii/fact/ws/SuministroLR.xsd">
<Cabecera>
<IDVersionSii>0.6</IDVersionSii>
<Titular>
<NombreRazon>ENTIDAD XXXXXXXXXXXXXX</NombreRazon>
<NIF>XXXXXXXXX</NIF>
</Titular>
<TipoComunicacion>A0</TipoComunicacion>
</Cabecera>
<RegistroLRFacturasEmitidas>
<PeriodoImpositivo>
<Ejercicio>2015</Ejercicio>
<Periodo>01</Periodo>
</PeriodoImpositivo>
<IDFactura>
<IDEmisorFactura>
<NIF>XXXXXXXXX</NIF>
</IDEmisorFactura>
<NumSerieFacturaEmisor>2017032100000001</NumSerieFacturaEmisor>
<FechaExpedicionFacturaEmisor>15-01-2015</FechaExpedicionFacturaEmisor>
</IDFactura>
<FacturaExpedida>
<TipoFactura>F1</TipoFactura>
<ClaveRegimenEspecialOTrascendencia>01</ClaveRegimenEspecialOTrascendencia>
<ImporteTotal>26.70</ImporteTotal>
Alguien ha conseguido hacer una deserialización de xml?
Muchas gracias.
Responder Con Cita
  #3  
Antiguo 03-04-2017
CMB CMB is offline
Miembro
 
Registrado: ene 2017
Posts: 349
Poder: 8
CMB Va por buen camino
Consulta de facturas expedidas o recibidas

Cuando se envía una consulta, la respuesta contiene todas las facturas del período solicitado, que pueden ser docenas o cientos, hasta 10.000.

¿Existe la posibilidad de enviar una consulta referida a una factura concreta y recibir la respuesta solamente de esa factura?

El campo <ClavePaginacion> sólo permite indicar la factura a partir de la cual deseas la información, pero no tiene previsto indicar la última, de modo que se pudiera obtener solamente el estado de una factura concreta. O por lo menos yo no lo he podido encontrar.


Saludos,
Responder Con Cita
  #4  
Antiguo 03-04-2017
Avatar de keys
keys keys is offline
Miembro
 
Registrado: sep 2003
Ubicación: Bilbao
Posts: 1.054
Poder: 22
keys Va por buen camino
Los cobros y pagos de las facturas sólo hay que declararlos si la empresa esta dentro del regimen de criterio de caja no del de prorrata. La prorrata es para el libro de bienes de inversión

Los cobros en metálico sólo hay que declararlos a final de año si han superado los 6000 euros por un cliente, en el libro de cobros en metalico dentro del libro de operaciones de transcendencia, que es lo que han cambiado en la versión 0.6.
Responder Con Cita
  #5  
Antiguo 03-04-2017
Avatar de newtron
[newtron] newtron is offline
Membrillo Premium
 
Registrado: abr 2007
Ubicación: Motril, Granada
Posts: 3.479
Poder: 21
newtron Va camino a la fama
Cita:
Empezado por keys Ver Mensaje
Los cobros y pagos de las facturas sólo hay que declararlos si la empresa esta dentro del regimen de criterio de caja no del de prorrata. La prorrata es para el libro de bienes de inversión

Los cobros en metálico sólo hay que declararlos a final de año si han superado los 6000 euros por un cliente, en el libro de cobros en metalico dentro del libro de operaciones de transcendencia, que es lo que han cambiado en la versión 0.6.
Ves tú como no me fío mucho de mi memoria.....
__________________
Be water my friend.
Responder Con Cita
  #6  
Antiguo 03-04-2017
jcapilla jcapilla is offline
Miembro
NULL
 
Registrado: feb 2017
Posts: 29
Poder: 0
jcapilla Va por buen camino
Serializar objeto para el SII de la AEAT

Buenas a todos.

Yo no programo con Delphi. Estoy con .Net pero veo que aquí nos ayudamos todos. Veo que lo que hacéis mas que nada es coger un xml y deserializarlo en un objeto para enviarlo. Mi caso es al revés. Monto un objeto y lo serializo para obtener el xml que posteriormente otra empresa se encargará de enviarlo. El problema es que al serializarlo no me escribe los Namespaces SiiLR y Sii y no se como hacerlo.

Este es mi código:

Código:
Dim oSfe As New SuministroFactEmitidas.SuministroLRFacturasEmitidas
oSfe.Cabecera = New SuministroFactEmitidas.CabeceraSii
oSfe.Cabecera.IDVersionSii = SuministroFactEmitidas.VersionSiiType.Item06
oSfe.Cabecera.Titular = New SuministroFactEmitidas.PersonaFisicaJuridicaESType
oSfe.Cabecera.Titular.NombreRazon = "EMPRESA EMISORA"
oSfe.Cabecera.Titular.NIF = "A00000000"
oSfe.Cabecera.TipoComunicacion = SuministroFactEmitidas.ClaveTipoComunicacionType.A0
oSfe.RegistroLRFacturasEmitidas = New SuministroFactEmitidas.LRfacturasEmitidasType(0) {}
oSfe.RegistroLRFacturasEmitidas(0) = New SuministroFactEmitidas.LRfacturasEmitidasType
oSfe.RegistroLRFacturasEmitidas(0).PeriodoImpositivo = New SuministroFactEmitidas.RegistroSiiPeriodoImpositivo
oSfe.RegistroLRFacturasEmitidas(0).PeriodoImpositivo.Ejercicio = 2017 
oSfe.RegistroLRFacturasEmitidas(0).PeriodoImpositivo.Periodo = SuministroFactEmitidas.TipoPeriodoType.Item01
oSfe.RegistroLRFacturasEmitidas(0).IDFactura = New SuministroFactEmitidas.IDFacturaExpedidaType
oSfe.RegistroLRFacturasEmitidas(0).IDFactura.IDEmisorFactura = New SuministroFactEmitidas.IDFacturaExpedidaTypeIDEmisorFactura
oSfe.RegistroLRFacturasEmitidas(0).IDFactura.IDEmisorFactura.NIF = "A00000000" 
oSfe.RegistroLRFacturasEmitidas(0).IDFactura.NumSerieFacturaEmisor = "FA1700001"
oSfe.RegistroLRFacturasEmitidas(0).IDFactura.FechaExpedicionFacturaEmisor = Now.ToString("dd-MM-yyyy")
oSfe.RegistroLRFacturasEmitidas(0).FacturaExpedida = New SuministroFactEmitidas.FacturaExpedidaType
oSfe.RegistroLRFacturasEmitidas(0).FacturaExpedida.TipoFactura = SuministroFactEmitidas.ClaveTipoFacturaType.F1
oSfe.RegistroLRFacturasEmitidas(0).FacturaExpedida.FechaOperacion = Now.ToString("dd-MM-yyyy")
oSfe.RegistroLRFacturasEmitidas(0).FacturaExpedida.ClaveRegimenEspecialOTrascendencia = SuministroFactEmitidas.IdOperacionesTrascendenciaTributariaType.Item01
oSfe.RegistroLRFacturasEmitidas(0).FacturaExpedida.DescripcionOperacion = "Venta de mercaderia" 
oSfe.RegistroLRFacturasEmitidas(0).FacturaExpedida.Contraparte = New SuministroFactEmitidas.PersonaFisicaJuridicaType
oSfe.RegistroLRFacturasEmitidas(0).FacturaExpedida.Contraparte.NombreRazon = "EMPRESA RECEPTORA" 
oSfe.RegistroLRFacturasEmitidas(0).FacturaExpedida.Contraparte.Item = "B00000000" 
oSfe.RegistroLRFacturasEmitidas(0).FacturaExpedida.TipoDesglose = New SuministroFactEmitidas.FacturaExpedidaTypeTipoDesglose
oSfe.RegistroLRFacturasEmitidas(0).FacturaExpedida.TipoDesglose.Item = New SuministroFactEmitidas.TipoSinDesgloseType
CType(oSfe.RegistroLRFacturasEmitidas(0).FacturaExpedida.TipoDesglose.Item, SuministroFactEmitidas.TipoSinDesgloseType).Sujeta = New SuministroFactEmitidas.SujetaType
CType(oSfe.RegistroLRFacturasEmitidas(0).FacturaExpedida.TipoDesglose.Item, SuministroFactEmitidas.TipoSinDesgloseType).Sujeta.NoExenta = New SuministroFactEmitidas.SujetaTypeNoExenta
CType(oSfe.RegistroLRFacturasEmitidas(0).FacturaExpedida.TipoDesglose.Item, SuministroFactEmitidas.TipoSinDesgloseType).Sujeta.NoExenta.TipoNoExenta = SuministroFactEmitidas.TipoOperacionSujetaNoExentaType.S1 
CType(oSfe.RegistroLRFacturasEmitidas(0).FacturaExpedida.TipoDesglose.Item, SuministroFactEmitidas.TipoSinDesgloseType).Sujeta.NoExenta.DesgloseIVA = New SuministroFactEmitidas.DetalleIVAEmitidaType(0) {}
CType(oSfe.RegistroLRFacturasEmitidas(0).FacturaExpedida.TipoDesglose.Item, SuministroFactEmitidas.TipoSinDesgloseType).Sujeta.NoExenta.DesgloseIVA(0) = New SuministroFactEmitidas.DetalleIVAEmitidaType
CType(oSfe.RegistroLRFacturasEmitidas(0).FacturaExpedida.TipoDesglose.Item, SuministroFactEmitidas.TipoSinDesgloseType).Sujeta.NoExenta.DesgloseIVA(0).TipoImpositivo = "21"
CType(oSfe.RegistroLRFacturasEmitidas(0).FacturaExpedida.TipoDesglose.Item, SuministroFactEmitidas.TipoSinDesgloseType).Sujeta.NoExenta.DesgloseIVA(0).BaseImponible = "100"
CType(oSfe.RegistroLRFacturasEmitidas(0).FacturaExpedida.TipoDesglose.Item, SuministroFactEmitidas.TipoSinDesgloseType).Sujeta.NoExenta.DesgloseIVA(0).CuotaRepercutida = "21"

Dim xmlSerial As New XmlSerializer(oSfe.GetType(), "")
Dim SufijoFecha As String = String.Format("_{0:yyyyMMdd}_{1:HHmmssfff}", Now, Now)
Dim nombreFichero As String = String.Format("FE{0}", SufijoFecha)
Dim strWriter As New StreamWriter(String.Format("D:\Proyectos\IDI\S.I.I\PruebasGeneracionFicheros\{0}.xml", nombreFichero))
xmlSerial.Serialize(strWriter, oSfe)
strWriter.Close()

¿Alguien puede ayudarme?
Responder Con Cita
  #7  
Antiguo 03-04-2017
seccion_31 seccion_31 is offline
Miembro
 
Registrado: ene 2017
Posts: 112
Poder: 8
seccion_31 Va por buen camino
Cita:
Empezado por keys Ver Mensaje
Los cobros en metálico sólo hay que declararlos a final de año si han superado los 6000 euros por un cliente, en el libro de cobros en metalico dentro del libro de operaciones de transcendencia, que es lo que han cambiado en la versión 0.6.
gracias keys ya me has quitado un tema asi de golpe, con el que estaba ahora mismo. (porque no tenemos clientes que a final de año superaran esa cifra de contado)

Por cierto, las facturas recibidas, (exentas, por ejemplo por no tener animo de lucro) ¿que esquema sigues para enviarla? le he colocado el tipo a cero y el importe del iva a cero y ha pasado, pero no se si lo estoy haciendo bien.


Saludos !
Responder Con Cita
  #8  
Antiguo 03-04-2017
Avatar de keys
keys keys is offline
Miembro
 
Registrado: sep 2003
Ubicación: Bilbao
Posts: 1.054
Poder: 22
keys Va por buen camino
4.12. ¿Se registra una factura recibida que recoge una operación exenta?

Sí, teniendo en cuenta que en los campos correspondientes al importe de la factura únicamente deberá consignarse la “Base imponible”
Responder Con Cita
  #9  
Antiguo 03-04-2017
Avatar de keys
keys keys is offline
Miembro
 
Registrado: sep 2003
Ubicación: Bilbao
Posts: 1.054
Poder: 22
keys Va por buen camino
Alguien esta presentando ahora mismo. Me da un error de certificado que no daba hace 5 minutos.
Responder Con Cita
  #10  
Antiguo 03-04-2017
aposi aposi is offline
Miembro
 
Registrado: dic 2006
Posts: 148
Poder: 18
aposi Va por buen camino
Cita:
Empezado por CMB Ver Mensaje
Cuando se envía una consulta, la respuesta contiene todas las facturas del período solicitado, que pueden ser docenas o cientos, hasta 10.000.

¿Existe la posibilidad de enviar una consulta referida a una factura concreta y recibir la respuesta solamente de esa factura?

El campo <ClavePaginacion> sólo permite indicar la factura a partir de la cual deseas la información, pero no tiene previsto indicar la última, de modo que se pudiera obtener solamente el estado de una factura concreta. O por lo menos yo no lo he podido encontrar.


Saludos,
Hola.
Creo que por aqui puedes filtrar por la factura
ACONSULTALRFacturasEmitidas.FiltroConsulta.ClavePaginacion.NumSerieFacturaEmisor
Responder Con Cita
  #11  
Antiguo 03-04-2017
CMB CMB is offline
Miembro
 
Registrado: ene 2017
Posts: 349
Poder: 8
CMB Va por buen camino
Cita:
Empezado por aposi Ver Mensaje
Hola.
Creo que por aqui puedes filtrar por la factura
ACONSULTALRFacturasEmitidas.FiltroConsulta.ClavePaginacion.NumSerieFacturaEmisor
Con esos parámetros devuelve una larga lista de facturas, no una sola.

¿Alguien tiene idea de cómo se maneja el campo <FiltroConsulta> para obtener el estado de una única factura?

Muchas gracias a todos.

Saludos,
Responder Con Cita
  #12  
Antiguo 03-04-2017
Avatar de newtron
[newtron] newtron is offline
Membrillo Premium
 
Registrado: abr 2007
Ubicación: Motril, Granada
Posts: 3.479
Poder: 21
newtron Va camino a la fama
Cita:
Empezado por seccion_31 Ver Mensaje
con los cobros en metalico que creo es obligatorio comunicar ¿no? (atraves del envio de cobros)
Negativo, si mal no recuerdo solo hay que enviar los cobros si se está incluido en la ley de la prorrata.

Saludos
__________________
Be water my friend.
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 4186 Hace 1 Hora 13:01:53
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 14:59:40.


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