Index: APPS/Halux/Docs/impl/LadeKlantEtiketBuilder.cls.xml =================================================================== diff -u -r56759 -r56761 --- APPS/Halux/Docs/impl/LadeKlantEtiketBuilder.cls.xml (.../LadeKlantEtiketBuilder.cls.xml) (revision 56759) +++ APPS/Halux/Docs/impl/LadeKlantEtiketBuilder.cls.xml (.../LadeKlantEtiketBuilder.cls.xml) (revision 56761) @@ -138,19 +138,7 @@ Set Etiket.KlantBarcode = ..GeefKlantBarcode(Partij,ProductOrderLijn) If $$$HasLength(Etiket.KlantBarcode) { - If Partij.GeefID()=##class(DOM.VKP.enu.Klant).Labonorm() { - If ##class(DOM.common.impl.ProjectSettingsAPI).%New().IsActiefLabonormVhoss() { - If Etiket.VerzendWijze = ##class(DOM.PM.enu.LBXVerpakkingType).VHoss() { - Set Etiket.Layout = "MaatwerkProductInVHoss2D 5x10" - } Else { - Set Etiket.Layout = "MaatwerkProduct 5x10" - } - } Else { - Set Etiket.Layout = "MaatwerkProduct 5x10" - } - } Else { - Set Etiket.Layout = "MaatwerkProductBAR 8x11" - } + Set Etiket.Layout = $$$If((Partij.GeefID()=##class(DOM.VKP.enu.Klant).Labonorm()),"MaatwerkProduct 5x10","MaatwerkProductBAR 8x11") } If $$$HasLength(ProductOrderLijn.GeefToeleveringID()) { Index: vhUnitTest/APPS/Halux/common/impl/VoegToeBezwaren/ToeleveringInBatch/Test.cls.xml =================================================================== diff -u -r56759 -r56761 --- vhUnitTest/APPS/Halux/common/impl/VoegToeBezwaren/ToeleveringInBatch/Test.cls.xml (.../Test.cls.xml) (revision 56759) +++ vhUnitTest/APPS/Halux/common/impl/VoegToeBezwaren/ToeleveringInBatch/Test.cls.xml (.../Test.cls.xml) (revision 56761) @@ -49,12 +49,6 @@ set BatchService = ##class(APPS.Halux.common.impl.BatchService).%New() #dim Batch As APPS.Halux.common.Batch = BatchService.MaakNieuweLegeBatch(##class(TECH.Context).Instance().GeefDateTimeAPI().CurrentDate(),##class(APPS.Halux.common.enu.Categorie).Tandembox()) #dim Toelevering As DOM.AKP.Toelevering = ##class(DOM.DomeinContext).Instance().GeefToeleveringAPI().GeefToelevering(..#ToeleveringID) - - Set Toeleveringen = ##class(%ListOfObjects).%New() - Do Toelevering.ZetKlantID("K||6279") - Do Toeleveringen.Insert(Toelevering) - Do Batch.VoegToeToeleveringenAanBatch(Toeleveringen) - #dim Bezwaren As %ListOfDataTypes = ##class(APPS.Halux.common.impl.VoegToeBezwaren.ToeleveringInBatch).%New(Batch,Toelevering).GeefBezwaren() if $$$AssertEquals(Bezwaren.Count(),1) { do $$$AssertContains(Bezwaren.GetAt(1),"Deze toelevering zit reeds in batch") @@ -65,12 +59,10 @@