Index: APPS/Halux/PPS/impl/AansturingActie/common/KlantEtiket.cls.xml
===================================================================
diff -u -r59977 -r59979
--- APPS/Halux/PPS/impl/AansturingActie/common/KlantEtiket.cls.xml (.../KlantEtiket.cls.xml) (revision 59977)
+++ APPS/Halux/PPS/impl/AansturingActie/common/KlantEtiket.cls.xml (.../KlantEtiket.cls.xml) (revision 59979)
@@ -14,34 +14,16 @@
Set PrinterFactory = ##class(APPS.Halux.PPS.impl.AansturingActie.common.KlantEtiket.PrinterFactory).%New()
#dim Printer As APPS.Halux.PPS.AansturingActie.common.KlantEtiket.Printer = ""
- Set Printer = PrinterFactory.GeefKlantEtiketPrinter(Batch.GeefCategorie())
+ Set Printer = PrinterFactory.GeefKlantEtiketPrinter(Batch)
- If (..IsDropBoxPrinter(Printer)) {
+ Set Parameters = ##class(APPS.Halux.PPS.impl.AansturingActie.common.KlantEtiket.Parameters).%New(ActieParameters)
+ Do Printer.PrintKlantEtiket(Batch, Parameters)
+ Set ..ResultaatOpmerking = Printer.GeefResultaatOmschrijving()
- Do Printer.PrintKlantEtiket(Batch)
- Set ..ResultaatOpmerking = Printer.GeefResultaatOmschrijving()
-
- } Else {
- Set EtiketPrinterFactory = ##class(APPS.Halux.PPS.impl.AansturingActie.common.KlantEtiket.EtiketPrinterFactory).%New()
- Set Parameters = ##class(APPS.Halux.PPS.impl.AansturingActie.common.KlantEtiket.Parameters).%New(ActieParameters)
- Set Printer = EtiketPrinterFactory.GeefKlantEtiketPrinter(Batch)
-
- Do Printer.PrintKlantEtiket(Batch, Parameters)
- Set ..ResultaatOpmerking = Printer.GeefResultaatOmschrijving()
- }
-
Quit ..GeefGeslaagdAansturingResultaat()
]]>
-
-DropBoxPrinter:APPS.Halux.PPS.impl.AansturingActie.common.KlantEtiket.Printer
-1
-%Boolean
-
-
-
BatchID:%String=""
%ListOfObjects