Umstellung Druckroutine für Massendruck von Delphi auf .Net

Deutschsprachiges Forum
, ,
1

Servus miteinander,

mit meinem aktuellen Delphi Code erstelle ich eine LL-Previewdatei mit allen Rechnungen, merke mit je Rechnung die Position im LL File und exportiere am Ende aus diesem LL-File alles was ich benötige: Alle Rechnungen werden mit einem eigenen Namen als PDF exportiert und ggfls. einem Archivsystem zugeordnet. Rechnungen mit Email Kennzeichen werden per Email versendet, Rechnungen mit Zugferd-Kennzeichen bekommen das Zugferd XML importiert, Rechnung mit Druckkennzeichen werden zum Drucker versandt etc. Das alles funktioniert, da ich weiß, an welcher Position was steht und ich mit llStgsysConvert jede einzelne Aufgabe ansteuern kann. Das komplette LL-File landet ebenfalls im Archiv.

Unter .Net haben wir einen andere Herangehensweise und anstelle von DefineVars und DefineFields verwenden wir ein Dataset und rufen Print() auf um das LL File zu erstellen. Aber hier bekomme ich keine Information zurück, wo sich was befindet, um im Anschluß daran den Export anzustoßen. Oder doch?

Ich behelfe mir aktuell damit, jede einzelne Rechnung als Dataset bereitzustellen, einmal zu exportieren (Print() ruft scheinbar auch immer den Previewdialog auf) und für die Folgeaufgaben wieder in mit Append in ein “Gesamt” Preview-File zusammenzuführen. Das kostet ersten viel Zeit und zweitens bleibt bei LL30 immer ein Rest alloziierter Speicher übrig, der nicht mehr freigegeben wird. Meine Routine ist dies nicht, die Speicher stehen lässt. Das habe ich mit dem Leistungsprofiler abgecheckt.

Nun mein Problem bzw. meine Frage:

Ich würde gern wieder auf PrintStart → [Drucke jede einzelne Rechnung, merke Position] - PrintEnd zurückgreifen, aber das LlCore der API kennt das Dataset offensichtlich nicht, denn ein Aufruf dieser Funktion ruft eine Exception aus.

            int nRet = (int)ioLLCorePrintStart.Invoke(ioCore,
                new object[]
                {
                    GetEnumValue(ioLlProjectValues, "List"),
                    psVorlagePfad,
                    nPrintMode
                });

Habe ich hier grundsätzlich einen Denkfehler und der Ansatz ist komplett falsch? Ich will vermeiden, das ich für die einzelnen Aufgaben jedes mal das LL File neu erstellen muss, was mit dem Delphi Code gut funktioniert hat. Wie weiße ich also der LlCore-Ebene das Dataset zu?

Und wie lößt Ihr so eine Aufgabe?

Danke

Andreas

3

Hallo Andreas,

in .NET lässt sich das ebenfalls bequem umsetzen. Die Voraussetzungen dazu sind, dass

  • die aktuelle Version LL31 eingesetzt wird,

  • die Rechnungen (also die eine LL-Datei, die alle Rechnungen beinhaltet) mittels AutoMasterMode.AsVariables erstellt werden. Weitere Infos dazu findest du hier und hier

und

  • beim Verarbeiten der Vorschau-Datei diese mittels oneJobTranslation:false geöffnet wird.

Eine auf diese Weise erstellte Vorschau-Datei enthält für jeden Master-Datensatz (also für jede Rechnung/Kunden/Empfänger) einen JobIndex. Auf diesen JobIndex lässt sich über die PreviewFile-Klasse gezielt zugreifen und die Vorschau-Datei entsprechend verarbeiten.

Der folgende Beispielcode erstellt aus einer Vorschau-Datei jeweils eine separate PDF-Datei für jeden einzelnen Job innerhalb der Vorschau-Datei:

//Vorschau-Datei öffnen, WICHTIG: oneJobTranslation = false!
using (PreviewFile pf = new PreviewFile(@"C:\temp\inv_merg.ll", false, @"C:\temp\", LlLanguage.Default, oneJobTranslation: false))
{
    int jobCount = pf.JobCount;   //Anzahl der Jobs in der Vorschau-Datei ermitteln

    for (int jobIndex = 0; jobIndex < jobCount; jobIndex++)
    {
        // Dateiname je JobIndex
        string outputPdf = $@"C:\temp\invoice_{jobIndex + 1}.pdf";

        // WICHTIG: JobIndexRange auf genau diesen Job setzen
        // Syntax: "PDF;Export.JobIndexRange=<von>-<bis>"
        // Hier: nur ein Job => jobIndex-jobIndex
        pf.ConvertTo(outputPdf, $"PDF;Export.JobIndexRange={jobIndex}-{jobIndex}");
    }

}

Bei dem automatischen Öffnen der Vorschau handelt es sich um die sogenannte “IncrementalPreview”. Die Vorschau wird mit Fertigstellung der ersten Seite bereits geöffnet und dann während des noch aktiven Druckvorgangs um die Folgeseiten ergänzt. Das lässt sich mittels Property deaktivieren:

LL.IncrementalPreview = false;

Grüße
Chris

1 Like
4

Danke Chris,

ich denke das hilft mir im wesentlichen weiter!

Andreas

5

Das scheint aber nicht zu funktionieren. Mein Code sieht hier so aus (wir haben einen Wrapper für die verschiedenen LL Varianten aufgebaut) :

            // Vorschau-Dialog unterdrücken
            ioIncrementalPreview.SetValue(ioListLabel, false, null);
            ioAutoShowResult?.SetValue(ioListLabel, false, null);

Der Preview kommt trotzdem immer als Dialog hoch.

Andreas

6

Ich habe den Printmodus auf “Export” setzen müssen, dann hat es gepasst.