Ausgangslage: Wir möchten hochstrukturierte XML-Dateien erzeugen, beispielsweise E-Rechnungen nach den Standards ZUGFeRD und XRechnung.

Ablauf

1. Einlesen des betreffenden XML-Templates mit Platzhaltern

2. Wandlung des XML-Templates in eine hierarchische Datenstruktur der Programmiersprache (XML-Baum)

3. Ersetzen der Platzhalter im XML-Baum durch konrete Werte

4. Entfernen aller unersetzten Platzhalter

5. Entfernen aller leeren Knoten des Baums (rekursiv)

6. Wandeln des resultierenden Baums in XML-Code

XML::Compile

Als wichtigstes Hilfsmittel zur Durchführung der Aufgabe verwenden wir das Perl-Package XML::Compile. Es leistet (unter Rückgriff auf die betreffende XML Schemadefinition) Folgendes:

• Es generiert ein XML-Template zur Schemadefinition

• Es übersetzt XML-Code (z.B. das Template) in eine Datenstruktur (XML-Baum), die mit Mitteln der Programmiersprache (Perl) bearbeitet werden kann

• Es rückübersetzt den finalen XML-Baum in XML-Code

Mit der Methode $sch->template() der Klasse XML::Compile::Schema kann ein XML-Template zu einer gegebenen Schemadefinition generiert werden (Anwendungsfall s. XML: Erzeugung von komplexem XML).

Beispiel:

$ perl -MQuiq::Zugferd -E 'say Quiq::Zugferd->createTemplate("ZF24_DE/Schema/3_Factur-X_1.08_EN16931")'

Die aktuelle Implementierung von XML::Compile hat jedoch leider das Defizit, dass mehrfach auftretende XML-Konstrukte <ELEMENT>...</ELEMENT> ab dem zweiten Auftreten abgekürzt werden zu <ELEMENT/>. Dies macht die Nutzung des Templates leider weitgehend unbrauchbar.

Mit einem kleinen Patch lässt sich dies jedoch beheben. Das unerwünschte Verhalten unterbleibt, wenn in Compile/Translate/Template.pm die Zeile

$reuse_type{$type}++;   $reuse_tag{$tag}++;

auskommentiert wird.

Links

• XML::Compile