Ley antifraude 2021 (VERIFACTU) - Programas informáticos

[ermendalenda]

Empezado por Delphier

Actualizo los fichero con la generación facturae ya entera y validado con el portal FACE

h t t p s://drive.google.com/file/d/1vrtpSGHje-l-3XW6peIGqYxHkH0g9aYx/view?usp=drive_link

Ficheros actulizados:
SistemaFacturaev3_2_2.pas
UFacturaE.pas

Hola Delphier, cuidado con las Validacionea son solo estructurales. Me ha pasado que ya me había confiado y he enviado un par de facturas por face y me la han rechazado por no coincidir importes, tenía errores de algún campo con impuesto en vez de sin impuesto...

[Delphier]

Empezado por ermendalenda

Hola Delphier, cuidado con las Validacionea son solo estructurales. Me ha pasado que ya me había confiado y he enviado un par de facturas por face y me la han rechazado por no coincidir importes, tenía errores de algún campo con impuesto en vez de sin impuesto...

Claro , hace años que generamos facturae , solo que hacía el XML a pelo , con la película de verifactu he aprovechado para cambiar la generación a "pelo" por la del esquema con XML schema binding , simplemente comparto el código de como se hace por si a alguno le interesa.

Saludos

[Delphier]

Delphi 11.3

Uses System.hash

CadenaVerifactu :=
'IDEmisorFactura=89890001K&'+
'NumSerieFactura=12345679/G34&'+
'FechaExpedicionFactura=01-01-2024&'+
'TipoFactura=F1&CuotaTotal=12.35&'+
'ImporteTotal=123.45&'+
'Huella=3C464DAF61ACB827C65FDA19F352A4E3BDC2C640E9E9FC4CC058073F38F12F60&'+
'FechaHoraHusoGenRegistro=2024-01-01T19:20:35+01:00';


 Result := THashSHA2.GetHashString(CadenaVerifactu,THashSHA2.TSHA2Version.SHA256).ToUpper;

Resultado es = F7B94CFD8924EDFF273501B01EE5153E4CE8F259766F88CF6ACB8935802A2B97

[ermendalenda]

Buenas tardes, me podrias indicar donde van los siguientes CIERRES de NODOS segun sea una anulacion o alta.
</RegistroAnulacion>
</RegistroAlta>


Va antes de <TipoHuella>01</TipoHuella>

o despues de <Huella>DEFHG...234234G</Huella>


gracias

[Delphier]

Empezado por ermendalenda

Buenas tardes, me podrias indicar donde van los siguientes CIERRES de NODOS segun sea una anulacion o alta.
</RegistroAnulacion>
</RegistroAlta>


Va antes de <TipoHuella>01</TipoHuella>

o despues de <Huella>DEFHG...234234G</Huella>


gracias

........................
<SistemaInformatico>
<IDOtro>
<CodigoPais>ES</CodigoPais>
<IDType>02</IDType>
</IDOtro>
<TipoUsoPosibleSoloVerifactu>S</TipoUsoPosibleSoloVerifactu>
<TipoUsoPosibleMultiOT>N</TipoUsoPosibleMultiOT>
<NumeroOTAlta>1</NumeroOTAlta>
</SistemaInformatico>
<FechaHoraHusoGenRegistro>2024-06-03T18:54:56.341+02:00</FechaHoraHusoGenRegistro>
<TipoHuella>01</TipoHuella>
<Huella>09E8CAFA5F83723D6D714340360D33F897329C092FD648BEA71FAD6A7D82AADE</Huella>
</RegistroAlta>

[ermendalenda]

Empezado por Delphier

........................
<SistemaInformatico>
<IDOtro>
<CodigoPais>ES</CodigoPais>
<IDType>02</IDType>
</IDOtro>
<TipoUsoPosibleSoloVerifactu>S</TipoUsoPosibleSoloVerifactu>
<TipoUsoPosibleMultiOT>N</TipoUsoPosibleMultiOT>
<NumeroOTAlta>1</NumeroOTAlta>
</SistemaInformatico>
<FechaHoraHusoGenRegistro>2024-06-03T18:54:56.341+02:00</FechaHoraHusoGenRegistro>
<TipoHuella>01</TipoHuella>
<Huella>09E8CAFA5F83723D6D714340360D33F897329C092FD648BEA71FAD6A7D82AADE</Huella>
</RegistroAlta>

Gracias por la respuesta.
Al ver tu mensaje me he dado cuenta de un error mío.
Como no tengo el formateo para el iso 8601 lo hacia a mano y le metía a pelo +01, pero he visto que le ponías +02 y he estado mirando que en horario de verano es +02
Es correcto?

[ermendalenda]

Ya está me he fabricado la funcion para que devuelva +01 ó +02
erraria para horas entre las 2 y las 3 de la mañana del ultimo domingo de octubre despues del cambio horario, pero a esa hora no emito nada.
Además me teng9 que dejar un aviso en el último cambio de horario de 2026 por que la normativa de quitar los cambios horarios está pendiente desi ca a seguir o no. No se si eso os afecta a los demás o lo contemplaría windows
Es una trabajera estar con un lenguaje arcaico.