Index: APPS/Halux/PPS/TBXZaag/impl/EtiketHelper.cls.xml =================================================================== diff -u -r2805 -r2808 --- APPS/Halux/PPS/TBXZaag/impl/EtiketHelper.cls.xml (.../EtiketHelper.cls.xml) (revision 2805) +++ APPS/Halux/PPS/TBXZaag/impl/EtiketHelper.cls.xml (.../EtiketHelper.cls.xml) (revision 2808) @@ -13,17 +13,22 @@ Halux_Zaag_Backup - -HALUX PPS TBXZaag Manueel 5x10 + +TBX Productie 5x10 Hermes - -1 -Device - - + +TBX Productie 5x10 + + +TBX ZaagManueel 5x10 Hermes + + + +TBX ZaagManueel 5x10 + + 1 ZaagOpdracht:APPS.Halux.PPS.TBXZaag.Opdrachten,Output2Lijn:APPS.Halux.PPS.TBXZaag.enu.Output2Lijn,Device:APPS.Halux.PPS.TBXZaag.enu.PrintDevice @@ -32,6 +37,8 @@ Set blPrint=##class(BL.PPS.TBX.DocsV1).%New() Do blPrint.Init(ZaagOpdracht.Batch.%Id(), "", LabelPrinter) + Do blPrint.ZetLabelLayout(..GeefLabelLayoutProductie(Device)) + Do blPrint.ZetHogePrioriteit() Set ProductAPI = ##class(DOM.DomeinContext).Instance().GeefProductAPI() Set Product=ProductAPI.GeefProduct(ZaagOpdracht.Product.%Id()) Set SequenceNr=ZaagOpdracht.Queue.Sequence @@ -57,8 +64,8 @@ 1 Subtitel:%String,BodemKleur:%String,BodemHoogte:%Integer,BodemLengte:%Float,BodemBewerking:DOM.PM.enu.TBXBodemBewerking,RugKleur:%String,RugHoogte:%Integer,RugLengte:%Float,Output2Lijn:APPS.Halux.PPS.TBXZaag.enu.Output2Lijn,Device:APPS.Halux.PPS.TBXZaag.enu.PrintDevice +BL.Sys.LabelPrinter + - Do blLabelPrinter.PrintDirect2Bartender(dtoLabel) + +1 +Device:APPS.Halux.PPS.TBXZaag.enu.PrintDevice +1 +%String + + +1 +Device:APPS.Halux.PPS.TBXZaag.enu.PrintDevice +1 +%String + + + 1 Device:APPS.Halux.PPS.TBXZaag.enu.PrintDevice