Factura rectificativa y anulación. Interop COM

[ejavm]

Buenas tardes,

cuando realizo una factura rectificativa por sustitución, solo veo estas opciones que describo en el código de abajo, sin embargo, obtengo un error al registrar el alta de la factura que dice que tengo que especificar el Importe de rectificación. Y no sé otro sitio donde colocarlo

        With sustitucion
                .TaxBase = baseImponible
                .TaxAmount = iva
                .TaxAmountSurcharge = ...
            End With
            
            ' Añadimos la información de la factura rectificada a la factura
            factura.SetSubstitution sustitucion

Gracias

[mdiago]

Probando este código no tengo problema:

    Dim invoice As New Verifactu.VfInvoice ' Factura
    Dim taxItem As New Verifactu.VfTaxItem ' Línea de impuestos
    
    ' Datos factura
    With invoice
        .InvoiceType = "R1"
        .InvoiceID = "INTEROP-RECT-SUS-001"
        .InvoiceDate = DateTime.Now
        .SellerID = "B12959755"
        .SellerName = "IRENE SOLUTIONS SL"
        .BuyerID = "B44531218"
        .BuyerName = "WEFINZ SOLUTIONS SL"
        .Text = "PRUEBA DE RECTIFICATIVA POR SUSTITUCION"
    End With
    
    ' Datos línea de impuestos
    With taxItem
        .TaxBase = 1000
        .TaxRate = 21
        .TaxAmount = 210
    End With
    
    ' Añadimos la línea de impuestos a la factura
    invoice.InsertTaxItem taxItem
    
    Dim substitution As New Verifactu.VfTaxItem ' Información sustituida
    
    With substitution
        .TaxBase = 100
        .TaxAmount = 21
    End With
    
    invoice.SetSubstitution substitution
  
    ' Resultado de la operación de alta a la AEAT
    Dim altaResult As Verifactu.VfInvoiceResult
    
    ' Envía el registro de alta de la factura
    Set altaResult = invoice.Send
    
    ' Muestra el resultado del envío
    Debug.Print altaResult.ResultCode
    Debug.Print altaResult.ResultMessage
    Debug.Print altaResult.CSV

¿ Estás seguro que tu variable baseImponible es un valor distinto de 0 ? ¿ Puedes incluir el código completo del envío ?

[ejavm]

Hola, gracias!! por la respuesta.

Creo que el tipo de factura hay que establecerlo a "R2" y el tipo de rectificativa a "S", y ésta propiedad última, en el código es la que determina que haya que indicar en algún sitio el Importe de Rectificación, según el mensaje de error que muestra.
También, al igual que la rectificativa por diferencia, creo que habrá que indicar la factura original, utilizando el método VfInvoice.InsertRectificationItem.

Porción de código:

Dim factura As New Verifactu.VfInvoice
Dim impuesto As New Verifactu.VfTaxItem
Dim resultado As Verifactu.VfInvoiceResult ' Objeto para recibir la respuesta
Dim recItem As New Verifactu.VfRectificationItem
Dim sustitucion As New Verifactu.VfTaxItem ' Información sustituida

With factura
.InvoiceType = "R2"
.RectificationType = "S"
.InvoiceID = idFiscal
.InvoiceDate = fechaFactura
.SellerID = SistemaInformaticoNIF
.SellerName = SistemaInformaticoNombreRazon
.BuyerID = nifCliente
.BuyerName = nombreCliente
.Text = "Rectificativa de " & rsOld!contador & "/" & rsOld!anio
End With

            ' === IVA y BASE IMPONIBLE ===
            With impuesto
                .TaxBase = baseImponible
                .TaxRate = tipoIva
                .TaxAmount = .iva
            End With
        
            ' CREAR LA FACTURA
            factura.InsertTaxItem impuesto
            
            ' Información factura rectificada
            With recItem
                .InvoiceDate = rsOld!fechaFactura
                .InvoiceID = rsOld!idFiscal
            End With
        
            ' Añadimos la información de la factura rectificada a la factura
            factura.InsertRectificationItem recItem
            
            ' Información factura sustituida
            With sustitucion
                .TaxBase = rsOld!baseImponible
                .TaxAmount = rsOld!iva
                .TaxAmountSurcharge = Me.iva - rsOld!iva
            End With
            
            ' Añadimos la información de la factura rectificada a la factura
            factura.SetSubstitution sustitucion

Por último, me gustaría preguntar si el siguiente código es correcto para una factura de anulación (Tipo: "F3", creo que hay que poner los datos de BASE E IVA a 0), donde en Invoice.ID pongo la factura original, y por lo tanto el códigoQR de la factura original es sobreescrito. Y la verificación de la factura de anulación devuelve que la factura no se encuentra.
Pero no sé si es correcto:

               With factura
                    .InvoiceType = "F3"
                    .InvoiceID = rsOld!idFiscal
                    .InvoiceDate = rsOld!fechaFactura
                    .SellerID = config.SistemaInformaticoNIF
                    .SellerName = config.SistemaInformaticoNombreRazon
                    ' .BuyerID = Nz(DLookup("nif", "Clientes", "idCliente = " & Me.idCliente), "")
                    ' .BuyerName = Nz(Me.nombreCliente)
                    .Text = "Anulación íntegra de " & rsOld!contador & "/" & rsOld!anio
                End With
                
                ' === IVA y BASE IMPONIBLE ===
                With impuesto
                    .TaxBase = 0
                    .TaxRate = 0
                    .TaxAmount = 0
                End With
        
                ' CREAR LA FACTURA
                factura.InsertTaxItem impuesto

                Set resultado = factura.Delete

Muchas gracias.
Saludos!!!

[mdiago]

• R2 ¿para recuperar el IVA de un impagado tras declaración de concurso?

• La información de las rectificadas es opcional

• Las anulaciones no son tipo F3

[ejavm]

Comprendo.
Entonces entiendo que la factura rectificativa por sustitución, con solo sustitución de la base imponible, es tipo R1, eliminando el tipo de rectificativa S.
Y la factura de anulación es tipo F1.

Muchas gracias!!

[ejavm]

Cuando se genera la factura de anulación (con todos los datos = 0), el código QR apunta a una factura con InvoiceID igual que el original, y la aeat devuelve, en la verificación, que la factura no es encontrada.

Eso es correcto?
Gracias!!

[xicuteret]

Si, correcto el Qr es el mismo y al verificarlo en la web da "no encontrada".
En cambio si entras en la Aeat con el certificado localizarás la factura en estado "anulado".

[ejavm]

Muchas gracias!!!

[jmargalefp]

Buenos días,
La forma correcta de anular una factura sería poniendo los importes a 0? O se dejan los importes originales?
He visto en las FAQ de la AEAT, y parece indicar que los importes deberían ser con signo contrario?
https://sede.agenciatributaria.gob.es/Sede/iva/sistemas-informaticos-facturacion-verifactu/preguntas-frecuentes/registros-facturacion-anulacion.html?faqId=264c024ac9572910VgnVCM100000dc381e0aRCRD

Como lo haceis vosotros?
Muchas gracias.

Jordi.

[xicuteret]

Personalmente emito una rectificativa por diferencias, obviamente con signo negativo, y después emito la factura correcta. Así mantengo la trazabilidad de lo que ha sucedido. También existe la anulación directa( en COM no lo sé), pero pierdes la pista de lo sucedido. Es mi opinion

[xicuteret]

#178