Delphi und XRechnung

[dpKlaus]

Es wird immer verwirrender:

ich hab zwei Rabatte eingeschaltet

//Nachlass zur Position
MultiplierFactorNumeric := 10; //10 Prozent auf 50 EUR
Amount := 5.00;
// MultiplierFactorNumeric := 16; //16 Prozent auf 50 EUR
// Amount := 8.00;

'Nachlass 2 ohne Angabe von Basisbetrag und Nachlassprozente.
MultiplierFactorNumeric := 0;
Amount := 5.00;
TaxPercent := 19.0;

Und im Variablenblock für beide Rabatte folgendes eingetragen

if cbAllowanceCharges.Checked then
begin
inv.LineAmount := inv.LineAmount - 5.00;
inv.AllowanceTotalAmount := 5.00;
inv.ChargeTotalAmount := 0;
inv.TaxAmountSubtotals[1].TaxableAmount := inv.TaxAmountSubtotals[1].TaxableAmount - 5.00 - 5.00;
inv.TaxAmountSubtotals[1].TaxAmount := inv.TaxAmountSubtotals[1].TaxAmount - 0.95 - 0.95;
inv.TaxAmountTotal := inv.TaxAmountTotal - 0.95 - 0.95;
inv.TaxExclusiveAmount := inv.TaxExclusiveAmount - inv.AllowanceTotalAmount + inv.ChargeTotalAmount - 5.00;
inv.TaxInclusiveAmount := inv.TaxInclusiveAmount - 5.00 - 0.95 - 5.00 - 0.95;
inv.PayableAmount := inv.TaxInclusiveAmount;
end;

Keine Fehlermeldung, das Prüfprogramm akzeptiert die xml-Datei

Dann Werte bei Nachlass zur Position geändert:

//Nachlass zur Position
// MultiplierFactorNumeric := 10; //10 Prozent auf 50 EUR
// Amount := 5.00;
MultiplierFactorNumeric := 16; //16 Prozent auf 50 EUR
Amount := 8.00;

und bei

if cbAllowanceCharges.Checked then
begin
inv.LineAmount := inv.LineAmount - 5.00;
inv.AllowanceTotalAmount := 8.00;
inv.ChargeTotalAmount := 0;
inv.TaxAmountSubtotals[1].TaxableAmount := inv.TaxAmountSubtotals[1].TaxableAmount - 8.00 - 5.00;
inv.TaxAmountSubtotals[1].TaxAmount := inv.TaxAmountSubtotals[1].TaxAmount - 1.52 - 0.95;
inv.TaxAmountTotal := inv.TaxAmountTotal - 1.52 - 0.95;
inv.TaxExclusiveAmount := inv.TaxExclusiveAmount - inv.AllowanceTotalAmount + inv.ChargeTotalAmount - 5.00;
inv.TaxInclusiveAmount := inv.TaxInclusiveAmount - 8.00 - 1.52 - 5.00 - 0.95;
inv.PayableAmount := inv.TaxInclusiveAmount;
end;

Fehlermeldung, das Prüfprogramm akzeptiert die xml-Datei nicht

Nochma wie gesagt, wenn ich nur eine der beiden oben im ersten Test genutzen Rabatte freischalte erhalte ich jeweils eine Fehlermeldung. Beide zusammen wie obengezeigt geht (????)