====== std.edi.invoice ======
Fakturierung per EDIFACT: Rechnungen, Gutschriften, Streitfälle und Kontoauszüge. ''EdiInvoicWrite'' berechnet Netto-, Steuer- und Bruttosummen aus den Positionen selbst — Summenwerte im Header werden ignoriert und überschrieben.
* **INVOIC** (BGM 380=Rechnung, 381=Gutschrift, 383=Belastung, 386=Vorauszahlungsanforderung)
* **INVCON** (BGM 44) — Dauerrechnung / Rahmenvertrag
* **COMDIS** (BGM 34) — Handelsstreit mit Freitext-Begründung
* **COACSU** (BGM 36) — Kontoauszug (Netto- und Bruttosaldo)
Steuertypen:
^ Konstante ^ Code ^ Satz ^
| ''EDI_INVOIC_TAX_S'' | S | 19 % Standard |
| ''EDI_INVOIC_TAX_AA'' | AA | 7 % Ermäßigt |
| ''EDI_INVOIC_TAX_Z'' | Z | 0 % Nullsatz |
| ''EDI_INVOIC_TAX_E'' | E | 0 % Steuerfrei |
import std.edi.invoice;
// Rechnung mit 2 Positionen
var hdr: int64 := alloc(EDI_INVOIC_HDR_SIZE);
var lines: int64 := alloc(2 * EDI_INVOIC_LINE_SIZE);
poke64(hdr + EDI_INVOIC_HDR_NUM, "RE-2026-1042" as int64);
poke64(hdr + EDI_INVOIC_HDR_NUMLEN, 12);
poke64(hdr + EDI_INVOIC_HDR_DATE, "20261201" as int64);
poke64(hdr + EDI_INVOIC_HDR_BGMQUAL, 380); // Rechnung
// Position 1: 10 × 19,99 € (19 % USt)
poke64(lines + EDI_INVOIC_LINE_GTIN, "04012345678901" as int64);
poke64(lines + EDI_INVOIC_LINE_GTINLEN, 14);
poke64(lines + EDI_INVOIC_LINE_QTY, 10);
poke64(lines + EDI_INVOIC_LINE_PRICE, 1999); // 19,99 €
poke64(lines + EDI_INVOIC_LINE_NETAMT, 19990); // 10 × 19,99 €
poke64(lines + EDI_INVOIC_LINE_TAXTYPE, EDI_INVOIC_TAX_S);
var out: int64 := alloc(16384);
var n: int64 := EdiInvoicWrite(hdr, lines, 2, out, 16384);
// EdiInvoicWrite berechnet Netto/Steuer/Brutto aus den Zeilen neu
free(lines, 2 * EDI_INVOIC_LINE_SIZE);
free(hdr, EDI_INVOIC_HDR_SIZE);
free(out, 16384);
----
===== Imports =====
* ''std.edi.core''
* ''std.alloc''
----
===== Structs =====
==== EdiInvoicHdr (EDI_INVOIC_HDR_SIZE = 112 Bytes) ====
^ Offset-Konstante ^ Inhalt ^
| ''EDI_INVOIC_HDR_NUM / EDI_INVOIC_HDR_NUMLEN'' | Rechnungsnummer |
| ''EDI_INVOIC_HDR_DATE / EDI_INVOIC_HDR_DATELEN'' | Rechnungsdatum |
| ''EDI_INVOIC_HDR_BGMQUAL'' | BGM-Qualifier: 380=Rechnung, 381=Gutschrift, 383=Belastung, 386=Vorauszahlung |
| ''EDI_INVOIC_HDR_SUPPLIER / EDI_INVOIC_HDR_SUPLEN'' | NAD+SU Lieferant (Zeiger/Länge) |
| ''EDI_INVOIC_HDR_BUYER / EDI_INVOIC_HDR_BUYLEN'' | NAD+BY Käufer |
| ''EDI_INVOIC_HDR_CURRENCY / EDI_INVOIC_HDR_CURLEN'' | Währungscode (z. B. "EUR") |
| ''EDI_INVOIC_HDR_NETTOTAL'' | Nettobetrag × 100 (MOA+77) — wird von Write neu berechnet |
| ''EDI_INVOIC_HDR_TAXTOTAL'' | Steuerbetrag × 100 (MOA+176) — wird von Write neu berechnet |
| ''EDI_INVOIC_HDR_GROSSTOTAL'' | Bruttobetrag × 100 (MOA+9) — wird von Write neu berechnet |
==== EdiInvoicLine (EDI_INVOIC_LINE_SIZE = 56 Bytes) ====
^ Offset-Konstante ^ Inhalt ^
| ''EDI_INVOIC_LINE_GTIN / EDI_INVOIC_LINE_GTINLEN'' | GTIN-Zeiger und -Länge |
| ''EDI_INVOIC_LINE_QTY'' | Menge |
| ''EDI_INVOIC_LINE_PRICE'' | Einzelpreis × 100 |
| ''EDI_INVOIC_LINE_NETAMT'' | Zeilenbetrag × 100 (Qty × Price) |
| ''EDI_INVOIC_LINE_TAXTYPE'' | Steuertyp: ''EDI_INVOIC_TAX_*'' |
| ''EDI_INVOIC_LINE_LINENO'' | Zeilennummer |
==== EdiInvconHdr (EDI_INVCON_HDR_SIZE = 72 Bytes) ====
^ Offset-Konstante ^ Inhalt ^
| ''EDI_INVCON_HDR_CONTRACTNUM / EDI_INVCON_HDR_NUMLEN'' | Vertragsnummer |
| ''EDI_INVCON_HDR_DATE / EDI_INVCON_HDR_DATELEN'' | Vertrags-/Abrechnungsdatum |
| ''EDI_INVCON_HDR_INVOICEREF / EDI_INVCON_HDR_REFLEN'' | Referenz auf Ausgangsrechnung |
| ''EDI_INVCON_HDR_AMOUNT / EDI_INVCON_HDR_CURRENCY'' | Betrag × 100 + Währungszeiger |
==== EdiComdisHdr (EDI_COMDIS_HDR_SIZE = 72 Bytes) ====
^ Offset-Konstante ^ Inhalt ^
| ''EDI_COMDIS_HDR_DISPUTEREF'' | Streitfall-Referenz |
| ''EDI_COMDIS_HDR_INVOICEREF'' | Bezogene Rechnungsnummer |
| ''EDI_COMDIS_HDR_AMOUNT'' | Strittiger Betrag × 100 |
| ''EDI_COMDIS_HDR_REASON / EDI_COMDIS_HDR_REASONLEN'' | Freitext-Begründung |
==== EdiCoacsuHdr (EDI_COACSU_HDR_SIZE = 64 Bytes) ====
^ Offset-Konstante ^ Inhalt ^
| ''EDI_COACSU_HDR_ACCOUNTREF'' | Konto-Referenz |
| ''EDI_COACSU_HDR_NETBALANCE'' | Nettosaldo × 100 |
| ''EDI_COACSU_HDR_GROSSBALANCE'' | Bruttosaldo × 100 |
| ''EDI_COACSU_HDR_CURRENCY'' | Währungszeiger |
----
===== Funktionen =====
==== INVOIC ====
^ Signatur ^ Beschreibung ^
| ''EdiInvoicWrite(hdr: int64, lines: int64, lineCount: int64, out: int64, outMax: int64): int64'' | Schreibt INVOIC. Netto/Steuer/Brutto werden aus den Positionen neu berechnet. |
| ''EdiInvoicRead(buf: int64, bufLen: int64, hdr: int64, lines: int64, maxLines: int64): int64'' | Parst INVOIC; gibt Zeilenanzahl zurück. |
| ''EdiInvoicValidate(hdr: int64, lines: int64, lineCount: int64): int64'' | Prüft Berechnungsintegrität. Gibt 0=ok, 1=Nettofehler, 3=Bruttofehler. Toleranz 1 Cent. |
==== INVCON ====
^ Signatur ^ Beschreibung ^
| ''EdiInvconWrite(hdr: int64, out: int64, outMax: int64): int64'' | Schreibt INVCON (Dauerrechnung) |
| ''EdiInvconRead(buf: int64, bufLen: int64, hdr: int64): int64'' | Parst INVCON; gibt 1=ok, 0=Fehler |
==== COMDIS ====
^ Signatur ^ Beschreibung ^
| ''EdiComdisWrite(hdr: int64, out: int64, outMax: int64): int64'' | Schreibt COMDIS (Handelsstreit) |
| ''EdiComdisRead(buf: int64, bufLen: int64, hdr: int64): int64'' | Parst COMDIS |
==== COACSU ====
^ Signatur ^ Beschreibung ^
| ''EdiCoacsuWrite(hdr: int64, out: int64, outMax: int64): int64'' | Schreibt COACSU (Kontoauszug) |
| ''EdiCoacsuRead(buf: int64, bufLen: int64, hdr: int64): int64'' | Parst COACSU |
----
===== Codebeispiel — Eingehende Rechnung validieren =====
import std.edi.invoice;
var hdr: int64 := alloc(EDI_INVOIC_HDR_SIZE);
var lines: int64 := alloc(200 * EDI_INVOIC_LINE_SIZE);
var count: int64 := EdiInvoicRead(inBuf, inBufLen, hdr, lines, 200);
var rc: int64 := EdiInvoicValidate(hdr, lines, count);
if (rc == 0) {
PrintLn("Rechnung korrekt. Brutto: " +
IntToStr(peek64(hdr + EDI_INVOIC_HDR_GROSSTOTAL) / 100) + " EUR");
} else {
PrintLn("Berechnungsfehler: " + IntToStr(rc));
}
free(lines, 200 * EDI_INVOIC_LINE_SIZE);
free(hdr, EDI_INVOIC_HDR_SIZE);
----
===== Hinweise =====
* **EdiInvoicWrite berechnet Summen selbst**: Header-Felder NETTOTAL/TAXTOTAL/GROSSTOTAL werden vor dem Schreiben aus den Zeilen neu berechnet. Vorab gesetzte Werte werden ignoriert.
* **Steuertyp-Codes**: Der Typ ist eine interne Konstante (''EDI_INVOIC_TAX_S'' = 1). Intern wird daraus ''S'' (Standard), ''AA'' (Ermäßigt) etc. im EDIFACT-Format.
* **BGM 380 vs 381**: Für Gutschriften BGM-Qualifier auf 381 setzen; alle anderen Felder identisch.
----
===== Quelldatei =====
^ Unit ^ Datei ^
| ''std.edi.invoice'' | ''std/edi/invoice.lyx'' |
Letzte Aktualisierung: 2026-06-16