Demo con código Verifactu.dll para (delphi 7)

[Neftali [Germán.Estévez]]

Empezado por seccion_31

lo que falta por probar y creo que NO funciona, son las anulaciones de facturas que no tiene verifactu.

Os adjunto cómo sería el registro enviado. Y que posteriormente me lo han aceptado.

Empezado por newtron

Buenas compañero. Es posible que una factura rechazada no puedas anularla porque no exista en sus registros.

Pueden ser facturas antiguas, que modificas o borras (anteriorres a la activación). También una factura que se ha rechazado por algún motivo y que luego borras.

Empezado por seccion_31

habria que tratar de subir una baja de factura, que no se encuentre en verifactu, y ver que pasa. en teoria puedes anular facturas que verifactu no ha almacenado. A mi no me funciono y lo deje aparcado.

Empezado por seccion_31

no es una factura rechazada, es una factura anterior a la implantacion de verifactu, digamos de unos dias antes de su entrada en vigor. que yo recuerde en la documentacion dice que se puede.

Creo que pueden ser ambos casos; Se marca el registro de anulación como SinRegistroPrevio.

<sum:RegFactuSistemaFacturacion xmlns:xd="http://www.w3.org/2000/09/xmldsig#" 
xmlns:sum1="https://www2.agenciatributaria.gob.es/static_files/common/internet/dep/aplicaciones/es/aeat/tike/cont/ws/SuministroInformacion.xsd" 
xmlns:sum="https://www2.agenciatributaria.gob.es/static_files/common/internet/dep/aplicaciones/es/aeat/tike/cont/ws/SuministroLR.xsd">
  <sum:RegistroFactura>
    <sum1:RegistroAnulacion>
      <sum1:IDVersion>1.0</sum1:IDVersion>
      <sum1:IDFactura>
        <sum1:IDEmisorFacturaAnulada>ZZZZZZZZZ</sum1:IDEmisorFacturaAnulada>
        <sum1:NumSerieFacturaAnulada>RECT-3</sum1:NumSerieFacturaAnulada>
        <sum1:FechaExpedicionFacturaAnulada>23-10-2024</sum1:FechaExpedicionFacturaAnulada>
      </sum1:IDFactura>
      <sum1:SinRegistroPrevio>S</sum1:SinRegistroPrevio>
      <sum1:Encadenamiento>
        <sum1:RegistroAnterior>
          <sum1:IDEmisorFactura>ZZZZZZZ</sum1:IDEmisorFactura>
          <sum1:NumSerieFactura>-1</sum1:NumSerieFactura>
          <sum1:FechaExpedicionFactura>24-10-2024</sum1:FechaExpedicionFactura>
          <sum1:Huella>25E03B23C71B88D8337D5EB4DD7E1F3C031962C6550452D59D1841D7A9FE4444</sum1:Huella>
        </sum1:RegistroAnterior>
      </sum1:Encadenamiento>
      <sum1:SistemaInformatico>
        <sum1:NombreRazon>Empresa Conservas S.L.</sum1:NombreRazon>
        <sum1:NIF>ZZZZZZZZ</sum1:NIF>
        <sum1:NombreSistemaInformatico>MiERP</sum1:NombreSistemaInformatico>
        <sum1:IdSistemaInformatico>04</sum1:IdSistemaInformatico>
        <sum1:Version>1.0.0.0</sum1:Version>
        <sum1:NumeroInstalacion>12345678</sum1:NumeroInstalacion>
        <sum1:TipoUsoPosibleSoloVerifactu>N</sum1:TipoUsoPosibleSoloVerifactu>
        <sum1:TipoUsoPosibleMultiOT>S</sum1:TipoUsoPosibleMultiOT>
        <sum1:IndicadorMultiplesOT>N</sum1:IndicadorMultiplesOT>
      </sum1:SistemaInformatico>
      <sum1:FechaHoraHusoGenRegistro>2025-02-19T10:36:16Z</sum1:FechaHoraHusoGenRegistro>
      <sum1:TipoHuella>01</sum1:TipoHuella>
      <sum1:Huella>E0D84796EE72EB59B8ABC9A81C9715F1967839A1B3D2ACA043006ECCC9144444</sum1:Huella>
    </sum1:RegistroAnulacion>
  </sum:RegistroFactura>
</sum:RegFactuSistemaFacturacion>

[seccion_31]

gracias Neftali

viendo el codigo me doy cuenta de que "creo" que lo tenia mal planteado el sinRegistroPrevio

hay un "if" por medio que creo no estaba bien situado lo he movido. No lo he probado todavia.

Quedara para la 1.2

Saludos !

[CarlosMz]

Buenas, no sé si era esto lo que me pediste:

Respuesta envío factura normal con 21%

<?xml version="1.0"?>
<SOAP-ENV:Envelope xmlns:SOAP-ENV="http://schemas.xmlsoap.org/soap/envelope/" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance">
  <SOAP-ENV:Body>
    <RegFactuSistemaFacturacion xmlns="https://www2.agenciatributaria.gob.es/static_files/common/internet/dep/aplicaciones/es/aeat/tike/cont/ws/SuministroLR.xsd">
      <Cabecera>
        <ObligadoEmision xmlns="https://www2.agenciatributaria.gob.es/static_files/common/internet/dep/aplicaciones/es/aeat/tike/cont/ws/SuministroInformacion.xsd">
          <NombreRazon>INFORMATICA, S.L.</NombreRazon>
          <NIF>B1222222</NIF>
        </ObligadoEmision>
        <RemisionVoluntaria xmlns="https://www2.agenciatributaria.gob.es/static_files/common/internet/dep/aplicaciones/es/aeat/tike/cont/ws/SuministroInformacion.xsd">
          <Incidencia>S</Incidencia>
        </RemisionVoluntaria>
      </Cabecera>
      <RegistroFactura>
        <RegistroAlta xmlns="https://www2.agenciatributaria.gob.es/static_files/common/internet/dep/aplicaciones/es/aeat/tike/cont/ws/SuministroInformacion.xsd">
          <IDVersion>1.0</IDVersion>
          <IDFactura>
            <IDEmisorFactura>B1222222</IDEmisorFactura>
            <NumSerieFactura>25F00001</NumSerieFactura>
            <FechaExpedicionFactura>01-01-2025</FechaExpedicionFactura>
          </IDFactura>
          <NombreRazonEmisor>INFORMATICA, S.L.</NombreRazonEmisor>
          <TipoFactura>F1</TipoFactura>
          <DescripcionOperacion>VENTAS MERCADERIAS</DescripcionOperacion>
          <Destinatarios>
            <IDDestinatario>
              <NombreRazon>CLIM S.L.</NombreRazon>
              <NIF>B22222</NIF>
            </IDDestinatario>
          </Destinatarios>
          <Desglose>
            <DetalleDesglose>
              <ClaveRegimen>01</ClaveRegimen>
              <CalificacionOperacion>S1</CalificacionOperacion>
              <TipoImpositivo>21.00</TipoImpositivo>
              <BaseImponibleOimporteNoSujeto>46.00</BaseImponibleOimporteNoSujeto>
              <CuotaRepercutida>9.66</CuotaRepercutida>
            </DetalleDesglose>
          </Desglose>
          <CuotaTotal>9.66</CuotaTotal>
          <ImporteTotal>55.66</ImporteTotal>
          <Encadenamiento>
            <PrimerRegistro>S</PrimerRegistro>
          </Encadenamiento>
          <SistemaInformatico>
            <NombreRazon>INFORMATICA SL</NombreRazon>
            <NIF>B1222222</NIF>
            <NombreSistemaInformatico>S</NombreSistemaInformatico>
            <IdSistemaInformatico>1</IdSistemaInformatico>
            <Version>2025.1</Version>
            <NumeroInstalacion>undetermined</NumeroInstalacion>
            <TipoUsoPosibleSoloVerifactu>S</TipoUsoPosibleSoloVerifactu>
            <TipoUsoPosibleMultiOT>N</TipoUsoPosibleMultiOT>
            <IndicadorMultiplesOT>S</IndicadorMultiplesOT>
          </SistemaInformatico>
          <FechaHoraHusoGenRegistro>2025-02-20T12:43:58+01:00</FechaHoraHusoGenRegistro>
          <TipoHuella>01</TipoHuella>
          <Huella>EDC14FF1DD7F3136FCBA1FB821D516DA7C0A38BCD7965146A04A73CC1388EC32</Huella>
        </RegistroAlta>
      </RegistroFactura>
    </RegFactuSistemaFacturacion>
  </SOAP-ENV:Body>
</SOAP-ENV:Envelope>

Respuesta envío Canarias

<SOAP-ENV:Envelope xmlns:SOAP-ENV="http://schemas.xmlsoap.org/soap/envelope/" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance">
<SOAP-ENV:Body>
<RegFactuSistemaFacturacion xmlns="https://www2.agenciatributaria.gob.es/static_files/common/internet/dep/aplicaciones/es/aeat/tike/cont/ws/SuministroLR.xsd">
<Cabecera>
<ObligadoEmision xmlns="https://www2.agenciatributaria.gob.es/static_files/common/internet/dep/aplicaciones/es/aeat/tike/cont/ws/SuministroInformacion.xsd">
<NombreRazon>INFORMATICA, S.L.</NombreRazon>
<NIF>B1222222</NIF>
</ObligadoEmision>
<RemisionVoluntaria xmlns="https://www2.agenciatributaria.gob.es/static_files/common/internet/dep/aplicaciones/es/aeat/tike/cont/ws/SuministroInformacion.xsd">
<Incidencia>S</Incidencia>
</RemisionVoluntaria>
</Cabecera>
<RegistroFactura>
<RegistroAlta xmlns="https://www2.agenciatributaria.gob.es/static_files/common/internet/dep/aplicaciones/es/aeat/tike/cont/ws/SuministroInformacion.xsd">
<IDVersion>1.0</IDVersion>
<IDFactura>
<IDEmisorFactura>B1222222</IDEmisorFactura>
<NumSerieFactura>25F00002</NumSerieFactura>
<FechaExpedicionFactura>01-01-2025</FechaExpedicionFactura>
</IDFactura>
<NombreRazonEmisor>INFORMATICA, S.L.</NombreRazonEmisor>
<TipoFactura>F1</TipoFactura>
<DescripcionOperacion>VENTAS MERCADERIAS</DescripcionOperacion>
<Destinatarios>
<IDDestinatario>
<NombreRazon>GUSTAVO </NombreRazon>
<NIF>1111111Z</NIF>
</IDDestinatario>
</Destinatarios>
<Desglose>
<DetalleDesglose>
<ClaveRegimen>01</ClaveRegimen>
<OperacionExenta>E4</OperacionExenta>
<BaseImponibleOimporteNoSujeto>19.95</BaseImponibleOimporteNoSujeto>
</DetalleDesglose>
</Desglose>
<CuotaTotal>0.00</CuotaTotal>
<ImporteTotal>19.95</ImporteTotal>
<Encadenamiento>
<PrimerRegistro>S</PrimerRegistro>
</Encadenamiento>
<SistemaInformatico>
<NombreRazon>INFORMATICA SL</NombreRazon>
<NIF>B1222222</NIF>
<NombreSistemaInformatico>S</NombreSistemaInformatico>
<IdSistemaInformatico>1</IdSistemaInformatico>
<Version>2025.1</Version>
<NumeroInstalacion>undetermined</NumeroInstalacion>
<TipoUsoPosibleSoloVerifactu>S</TipoUsoPosibleSoloVerifactu>
<TipoUsoPosibleMultiOT>N</TipoUsoPosibleMultiOT>
<IndicadorMultiplesOT>S</IndicadorMultiplesOT>
</SistemaInformatico>
<FechaHoraHusoGenRegistro>2025-02-20T12:32:22+01:00</FechaHoraHusoGenRegistro>
<TipoHuella>01</TipoHuella>
<Huella>67C220CD32CF94DADAE0273B9A53E947E8E44086B335E669E72D66666ACABA</Huella>
</RegistroAlta>
</RegistroFactura>
</RegFactuSistemaFacturacion>
</SOAP-ENV:Body>
</SOAP-ENV:Envelope>

[CarlosMz]

Una pregunta... ¿Se puede resetear los envíos realizados al servidor de pruebas?, o tengo que ir enviando nuevas facturas ?

[Neftali [Germán.Estévez]]

Empezado por CarlosMz

Una pregunta... ¿Se puede resetear los envíos realizados al servidor de pruebas?, o tengo que ir enviando nuevas facturas ?

Nosotros vamos generando series nuevas.
Nos dijeros que no tenían previsto resetear.

[[newtron]]

Empezado por CarlosMz

Una pregunta... ¿Se puede resetear los envíos realizados al servidor de pruebas?, o tengo que ir enviando nuevas facturas ?

Yo lo que hago es que si tengo un parámetro activo modifica el número de factura añadiendo una cadena "a voleo". Así aunque envíe siempre la factura 1 enviará la 1_99382834238 (por ejemplo)


Saludos.

[CarlosMz]

Muchas gracias, desde luego grandes aportes

[DarkDudae]

Empezado por newtron

Yo lo que hago es que si tengo un parámetro activo modifica el número de factura añadiendo una cadena "a voleo". Así aunque envíe siempre la factura 1 enviará la 1_99382834238 (por ejemplo)

A estas horas ya debo estar muy espeso porque no me he enterado de nada. Con eso qué se conseguiría?

[CarlosMz]

Empezado por DarkDudae

A estas horas ya debo estar muy espeso porque no me he enterado de nada. Con eso qué se conseguiría?

Para hacer como si fuera un reset y empezar por registro / factura primera

[[newtron]]

Empezado por DarkDudae

A estas horas ya debo estar muy espeso porque no me he enterado de nada. Con eso qué se conseguiría?

Con eso lo que hago es que aunque yo envíe siempre el mismo número de factura la función que hace el envío lo convierte al número de factura+un número aleatorio con lo cual el número de factura que se envía siempre es distinto.


Saludos.

[seccion_31]

Hola CarlosMz !

Empezado por CarlosMz

Buenas, no sé si era esto lo que me pediste:

Respuesta envío factura normal con 21%
Respuesta envío Canarias

<ClaveRegimen>01</ClaveRegimen>
<OperacionExenta>E4</OperacionExenta>
<BaseImponibleOimporteNoSujeto>19.95</BaseImponibleOimporteNoSujeto>
</DetalleDesglose>
</Desglose>
<CuotaTotal>0.00</CuotaTotal>
<ImporteTotal>19.95</ImporteTotal>

¿porque lo colocas como E4 ?

que yo sepa segun el SII, (no se si verifactu tambien) canarias debe ir con clave exportacion E2 y tipo de documento 02 iva nif nacional.

Eso es lo que el componente deberia generar, y no se si es correcto.

¿como lo has generado?

Saludos !

[CarlosMz]

Buenos días,

Creo que lo forcé porque me daba un error si los dejaba vacíos en checkFactura.
También he readaptando el código para quitar la DLL y ponerlo como un simple .pas al proyecto,

Pregunta, ¿Por qué usáis sesiones? no tengo muy claro el objetivo

[seccion_31]

Empezado por CarlosMz

Buenos días,

Creo que lo forcé porque me daba un error si los dejaba vacíos en checkFactura.
También he readaptando el código para quitar la DLL y ponerlo como un simple .pas al proyecto,

Pregunta, ¿Por qué usáis sesiones? no tengo muy claro el objetivo

Las sesiones se usaban cuando se recibian datos por aplicacion servidora, pues varias aplicaciones podrian enviar sus datos, que era compartido. 10 sesiones.

En la DLL yo diria que no tiene sentido. Pero podrias abrir varios envios a la vez.


Se supone que no deberia dar un error en checkfactura y creo que podrias seguir usando la DLL tal cual esta publicada, con el componente compilado para tu version de delphi.

Sigo diciendo que falta una comprobacion clara de los tipos de XML que se generan. Yo ahora mismo no tengo tiempo de comprobarlo.

Con la ultima version una factura a canarias, podria ser pasada como codpais=35 y enviar el resto de datos tal cual. sin mas.

[mqm]

Empezado por CarlosMz

Buenos días,

Creo que lo forcé porque me daba un error si los dejaba vacíos en checkFactura.
También he readaptando el código para quitar la DLL y ponerlo como un simple .pas al proyecto,

Pregunta, ¿Por qué usáis sesiones? no tengo muy claro el objetivo

Para qué versión de Delphi la has adaptado?. Podrías pasar el código. Estoy intentado adaptarlo todo en un programa independiente que se encarga de todo el proceso.

[seccion_31]

si a alguno le da error al añadir facturas, quejandose de "no se que exentas" en la validacion, es que teneis que inicializar el nexentas a cero en el record de factura antes de añadirla, lo mismo que se inicializa el de nivas

saludos !