PDF zusätzlich zum Beleg drucken

Hallo,



wie drucke im im Anhang des Angebotes, nach dem letzten Bereich und Blattwechsel,

PDF's für den Beleg, z.B.technische Beschreibung in Verbindung mit einem UDF als Dateinamen.



Gruss

Markus Dengler

Philipp Knecht

Hallo Herr Dengler



Direkt ein externes PDF ins existierende Layout reinzudrucken geht meines Wissens nicht.

Sie können aber nach dem Druck des eigentlichen Beleges einen PDF Druck anstossen.



Ein Beispiel für Artikelstammblätter finden sie unter:

http://www.coresuite.ch/index.php?id=50&view=single_thread&cat_uid=7&conf_uid=10&thread_uid=604

(Bitte einfach für solche Fälle zukünftig das GetData Script nicht das generate Script verwenden.)



Falls sie die Geschicht am Schluss des Druckes anstossen wollen:



Im Imports des Dokumentes:

LayoutHelper

System.Windows.Forms

System.Diagnostics

Im CommonScript:

Private Sub LD_AfterPrintOrPreview()

' Mache PDF direkt nach dem Druck

If GetData("LD.Par.Preview")="N" Then

  'Print Document



Dim MyProcess As New Process

MyProcess.StartInfo.CreateNoWindow = False

MyProcess.StartInfo.Verb = "print"

MyProcess.StartInfo.FileName = "C:TempServiceabruf.pdf"

MyProcess.Start()

MyProcess.WaitForExit(10000)

MyProcess.CloseMainWindow()

MyProcess.Close()



End If

End Sub

Und im GenerateScript:

' Handler für die Nach Print Aktion registireren

If Engine.IsDoublePass And Not handlerAdded Then



  AddHandler LayoutHelper.LD.AfterPrintOrPreview,AddressOf LD_AfterPrintOrPreview



End If

hth