Event "nach PDF-Export (intern)"
Event "nach PDF-Export (intern)"
Der Event wird nach dem Export eines Dokuments aufgerufen, das im PDF-Format ausgegeben werden soll.
Hiermit kann man beispielsweise im PDF hinzugefügte ZUGFeRD-Daten validieren.
Beispiel
CODE
| nEvtNo:P1, oPDF:P2, oArchiveInfo:P3, cOriginalPDFName:P4 |
// oPDF - Objekt vom Typ TMemoryStream (kann mit SaveFile gespeichert werden)
// oArchiveInfo - Objekt vom Typ TBeArchiveInfo
// cOriginalPDFName - Falls vorhanden, die zu speichernde Dateiname (read-only)
// Rückgabe = keine
if oArchiveInfo.ArchiveDocType = dt_RECH or
oArchiveInfo.ArchiveDocType = dt_TLRE or
oArchiveInfo.ArchiveDocType = dt_ABRE or
oArchiveInfo.ArchiveDocType = dt_SARE or
oArchiveInfo.ArchiveDocType = dt_VMZW then
Meld('Nach Rechnungsdruck - neue Datei wird angelegt.' + CRLF +
'Beleg wird unter ' + cOriginalPDFName + ' gespeichert.' + CRLF +
'Zusätzlich wird die PDF nach C:\Temp exportiert, für z.B. eine Prüfung in diesem Event.'),
SaveFile(oPDF, 'C:\temp\beleg.pdf'),
endif,