Index: BL/Flow/Levering/Label.cls.xml =================================================================== diff -u -r70240 -r70292 --- BL/Flow/Levering/Label.cls.xml (.../Label.cls.xml) (revision 70240) +++ BL/Flow/Levering/Label.cls.xml (.../Label.cls.xml) (revision 70292) @@ -189,14 +189,6 @@ Set ..pxLabelKlant.Aantal=Aantal Set ..pxLabelKlant.Layout = ..blLabelPrinter.LayoutTemplate(Printer,"KLANT_ADRES") - If (..pxLabelKlant.Layout = "KlantAdres 8x11") { - Set ..pxLabelKlant.Layout = "KlantAdresTemp 8x11" - - #dim Submagazijn As %String = ..GeefSubmagazijnVoorTransferOrder() - Set ..pxLabelKlant.Verzendwijze = ##class(BL.Flow.Levering.VerzendwijzeVoorSubmagazijnBepaler).%New().GeefVerzendwijzeVoorSubmagazijn(Submagazijn) - Set ..pxLabelKlant.VerzendwijzeExtraInfo = ##class(BL.Flow.Levering.ExtraInfoVoorSubmagazijnBepaler).%New().GeefExtraInfoVoorSubmagazijn(Submagazijn) - } - If Printer["\\" Set ..pxLabelKlant.Device=Printer ;als het UNC-pad van de printer wordt doorgegeven vul je het rechstreeks in Else Set ..pxLabelKlant.Device=##class(BL.Sys.LabelPrinter).FullDevicePad(Printer) @@ -389,26 +381,6 @@ Quit $$OMSCHR^PRKLEUR(PRNr,Taal) ]]> - - -1 -%String - -