Index: DCPRINT2.mac.rou
===================================================================
diff -u -r56366 -r56821
--- DCPRINT2.mac.rou (.../DCPRINT2.mac.rou) (revision 56366)
+++ DCPRINT2.mac.rou (.../DCPRINT2.mac.rou) (revision 56821)
@@ -33,7 +33,7 @@
. Set Printer = ##class(BL.Sys.FOP.CommonTasks).ApplyPrinterRedirects(Printer)
.
. // Papier aanpassen voor o.a. "Rechtstreekse levering"
- . If (##class(BL.Legacy.DCPRINT2).IsAfdrukOpBlancoPapier(BONNr)) Do ##class(BL.Legacy.DCPRINT2).PasAanDocTypeNaarBlancoPapier(.DocType, Printer, BONNr)
+ . If (##class(BL.Legacy.DCPRINT2).IsAfdrukOpBlancoPapier(BONNr, Printer)) Do ##class(BL.Legacy.DCPRINT2).PasAanDocTypeNaarBlancoPapier(.DocType, Printer, BONNr)
.
. // Taak aan FOP-scheduler toevoegen
. Set sc=##class(BL.Flow.Levering.Doc).RenderAndPrintDocViaType(BONNr,DocType,Printer,1) ; printer: leeg=default
Index: BL/Legacy/DCPRINT2.cls.xml
===================================================================
diff -u -r56370 -r56821
--- BL/Legacy/DCPRINT2.cls.xml (.../DCPRINT2.cls.xml) (revision 56370)
+++ BL/Legacy/DCPRINT2.cls.xml (.../DCPRINT2.cls.xml) (revision 56821)
@@ -89,13 +89,21 @@
]]>
+
+1
+PrinterNaam:%String
+%Boolean
+
+
+
BonWit (op logo-papier) aanpassen naar BonBlanco (o.a. voor Handels met rechtstreekse levering)
1
o.a. voor Handels met rechtstreekse levering
1
-BonId:%Integer
+BonId:%Integer,PrinterNaam:%String
%Boolean