Index: CHUI/Prod/ProductLabel.cls.xml =================================================================== diff -u -r62200 -r62206 --- CHUI/Prod/ProductLabel.cls.xml (.../ProductLabel.cls.xml) (revision 62200) +++ CHUI/Prod/ProductLabel.cls.xml (.../ProductLabel.cls.xml) (revision 62206) @@ -118,7 +118,6 @@ Do bl.Init(PRNr) Set bl.DefaultLayout="Product verpak maatwerk VH 5x10" - #dim Order As DOM.VKP.Order = ##class(DOM.DomeinContext).Instance().GeefOrderAPI().GeefOrder(ORDNr) #dim Personality As DOM.common.Personality = ##class(DOM.DomeinContext).Instance().GeefCommonAPI().GeefPersonality(Order.GeefPersonalityID()) #Dim KlantInstellingenService As APPS.common.KlantInstellingenService = ##class(APPS.ApplicatieContext).Instance().GeefECommerceAPI().GeefKlantInstellingenService(Personality) @@ -143,7 +142,7 @@ if $$$HasLength(DnaCode) { Set bl.pxLabel.DnaCode = DnaCode } Else { - Set bl.pxLabel.DnaCode = ##class(APPS.Halux.AAP.DnaCodeService).%New().GeefVolgendeAfTeDrukkenDnaCode(TOENr,PRNr,"") + Set bl.pxLabel.DnaCode = ##class(APPS.Halux.AAP.DnaCodeService).%New().GeefVolgendeAfTeDrukkenDnaCode(TOENr,PRNr) } Do LabelPrinter.Add(bl.pxLabel) } Index: WSimpl/Halux/AAP/AfdrukService.cls.xml =================================================================== diff -u -r62199 -r62206 --- WSimpl/Halux/AAP/AfdrukService.cls.xml (.../AfdrukService.cls.xml) (revision 62199) +++ WSimpl/Halux/AAP/AfdrukService.cls.xml (.../AfdrukService.cls.xml) (revision 62206) @@ -111,7 +111,7 @@ Do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.InvalidInputException).%New("Geen DnaCodes aangeleverd om af te drukken")) } #dim DnaCodeIterator As TECH.Iterator = ..EtiketAfdrukkenHelper.MaakDnaCodeIteratorVanDnaCodeStringLijst(ProductEtiketAfdrukkenRequest.DnaCodes) - + While DnaCodeIterator.HasNext() { #dim DnaCodeInfo As DOM.Halux.AAP.DnaCode = DnaCodeIterator.Next() Do ##class(CHUI.Prod.ProductLabel).PrintVHMaatwerkMetDnaCodes(DnaCodeInfo) Index: vhUnitTest/WSimpl/Halux/AAP/AfdrukService/ProductEtiketAfdrukken/Test.cls.xml =================================================================== diff -u --- vhUnitTest/WSimpl/Halux/AAP/AfdrukService/ProductEtiketAfdrukken/Test.cls.xml (revision 0) +++ vhUnitTest/WSimpl/Halux/AAP/AfdrukService/ProductEtiketAfdrukken/Test.cls.xml (revision 62206) @@ -0,0 +1,48 @@ + + + +vhUnitTest.TestCase + + + + + + + + + + + +