ZUGFerD V1 hat Fehler

[KHoltorf]

Ich habe wegen einer Nachfrage mit der ZUGFerD Version 1.0 getestet.
Leister werden mir einige Fehler angezeigt.

1. Die Values für GrossPriceProductTradePrice und NetPriceProductTradePrice werden immer 4 Stellig verlangt.
2. Bei Profil=Extended ist die Reihenfolge von ActualDeliverySupplyChainEvent und DeliveryNoteReferencedDocument falsch.
   Erst ActualDeliverySupplyChainEvent dann DeliveryNoteReferencedDocument
3. Bei Profil=Extended wird bei DeliveryNoteReferencedDocument ein eigenartiger Wert für IssueDateTime ausgegeben.

Habe mir geholfen mit:

function TZUGFeRDInvoiceDescriptorWriter._formatDate(date: TDateTime;
formatAs102: Boolean = true; toUBLDate : Boolean = false): string;
begin
if formatAs102 then
Result := FormatDateTime('yyyymmdd', date)
else
begin
if toUBLDate then
Result := FormatDateTime('yyyy-mm-dd', date)
else begin
Result := FormatDateTime('yyyy-mm-dd hh:nn:ss', TDateTime(date));
Result := StringReplace(Result,' ','T',[rfReplaceAll,rfIgnoreCase]);
end;
SetDebugTextEx('Result ' + Result);
end;
end;

[landrix]

ZUGFeRD 1 sollte wirklich nicht mehr verwendet. Das ist auch keine gültige E-Rechnung.

[KHoltorf]

Ein Kunde hat ein Buchhaltungsprogramm das nur Zugferd V1 versteht. Habe ihn geraten eine neues Programm zu besorgen.

[KHoltorf]

Habe ausprobiert was falschläuft mit ;
Result := FormatDateTime('yyyy-mm-ddThh:nn:ss', date);
Das T wird falch gedeutet. Um das zu vermeiden reicht:
Result := FormatDateTime('yyyy-mm-dd"T"hh:nn:ss', date);
Außerdem, weil etwas alt ist und man es nicht mehr nutzen sollte muss es nicht auch noch falsch sein.
Anbei die korrigierte Version:

intf.ZUGFeRDInvoiceDescriptor1Writer.zip

[landrix]

integriert, danke