Bild Anhänge (Zeichnungen) ergänzen
report bietet die Möglichkeit, Bilder als Anhang am Ende eines Dokuments zu drucken. Jedes Bild wird auf eine eigene Seite gedruckt und so skaliert, dass der verfügbare Platz so gut wie möglich genutzt wird. Diese Bilder stammen in der Regel aus den Standard Dokumenten-Anhängen.
Wenn Sie die Standard Anhänge nicht verwenden können, aber trotzdem Bilder drucken müssen, können Sie den Standardcode außer Kraft setzen und durch Ihren eigenen Code ersetzen.
[EventSubscriber(ObjectType::Codeunit, Codeunit::"RPT_Report Functions", 'OnBeforeGetAttachments', '', true, true)]
local procedure OnBeforeGetAttachments(ReportID: Integer; RecRef: RecordRef; ReportObjectSetup: Record "RPT_Object Setup"; ReportParameters: Record "Name/Value Buffer"; var TmpDocumentAttachments: Record "RPT_Document Text")
begin
// ##
//do some coding
// ##
TmpDocumentAttachments."Report ID" := 1;
TmpDocumentAttachments."Document Text".CreateOutStream(DocStream); //Add File
TmpDocumentAttachments.Description := 'example1.png';
TmpDocumentAttachments.Insert();
TmpDocumentAttachments."Report ID" := 2;
TmpDocumentAttachments."Document Text".CreateOutStream(DocStream);
TmpDocumentAttachments.Description := 'example2.png';
TmpDocumentAttachments.Insert();
end;
Parameter:
- ReportID: Die Nummer des aktuell verarbeiteten Reports
- RecRef: In dieser Variable ist der aktuell verarbeitet Datensatz gespeichert.
- ReportObjectSetup: Einrichtungen für den den aktuellen Report
- ReportParameters: optionale Report Optionen, die ein Anwender gesetzt haben könnte.
- TmpDocumentAttachments: Temporärer Datensatz um alle Bilder zu speichern.