Index: DOM/Halux/AAP/DnaCodeRepository.cls.xml =================================================================== diff -u -r72898 -r73584 --- DOM/Halux/AAP/DnaCodeRepository.cls.xml (.../DnaCodeRepository.cls.xml) (revision 72898) +++ DOM/Halux/AAP/DnaCodeRepository.cls.xml (.../DnaCodeRepository.cls.xml) (revision 73584) @@ -158,6 +158,13 @@ ]]> + +BatchId:%String,Sequentienummer:%String +TECH.Iterator + + + DnaCode:%String TECH.Iterator Index: vhTest/Fake/DOM/Halux/AAP/DnaCodeRepository.cls.xml =================================================================== diff -u -r72861 -r73584 --- vhTest/Fake/DOM/Halux/AAP/DnaCodeRepository.cls.xml (.../DnaCodeRepository.cls.xml) (revision 72861) +++ vhTest/Fake/DOM/Halux/AAP/DnaCodeRepository.cls.xml (.../DnaCodeRepository.cls.xml) (revision 73584) @@ -19,6 +19,13 @@ + +BatchId:%String,Sequentienummer:%String +TECH.Iterator + + + ToeleveringId:%String,SequentieNummer:%String,ProductNummer:%String TECH.Iterator Index: vhUnitTest/APPS/Halux/AAP/DnaCodeService/GeefVolgendeAfTeDrukkenDnaCode/Test.cls.xml =================================================================== diff -u -r63689 -r73584 --- vhUnitTest/APPS/Halux/AAP/DnaCodeService/GeefVolgendeAfTeDrukkenDnaCode/Test.cls.xml (.../Test.cls.xml) (revision 63689) +++ vhUnitTest/APPS/Halux/AAP/DnaCodeService/GeefVolgendeAfTeDrukkenDnaCode/Test.cls.xml (.../Test.cls.xml) (revision 73584) @@ -271,7 +271,7 @@ ]]> - + + + + + Index: vhTest/Mock/DOM/Halux/AAP/DnaCodeRepository.cls.xml =================================================================== diff -u -r72861 -r73584 --- vhTest/Mock/DOM/Halux/AAP/DnaCodeRepository.cls.xml (.../DnaCodeRepository.cls.xml) (revision 72861) +++ vhTest/Mock/DOM/Halux/AAP/DnaCodeRepository.cls.xml (.../DnaCodeRepository.cls.xml) (revision 73584) @@ -197,6 +197,13 @@ ]]> + +BatchId:%String,Sequentienummer:%String +TECH.Iterator + + + ToeleveringId:%String,ToeleveringLijnId:%String TECH.Iterator Index: APPS/Halux/AAP/DnaCodeService.cls.xml =================================================================== diff -u -r73121 -r73584 --- APPS/Halux/AAP/DnaCodeService.cls.xml (.../DnaCodeService.cls.xml) (revision 73121) +++ APPS/Halux/AAP/DnaCodeService.cls.xml (.../DnaCodeService.cls.xml) (revision 73584) @@ -200,6 +200,8 @@ #dim DnaCodeIterator As TECH.Iterator If Herafdruk { Set DnaCodeIterator = ..DnaCodeRepository.ZoekViaBatchIdEnSequentienummer(BatchId, SequentieNummer) + } ElseIf (IsKlantEtiketSpaceStep && (SequentieNummer > 0)) { + Set DnaCodeIterator = ..DnaCodeRepository.ZoekViaToeleveringEnSequentienummer(ToeleveringID, SequentieNummer) } Else { Set DnaCodeIterator = ..DnaCodeRepository.ZoekViaToeleveringIdEnStatusEnRecent(ToeleveringID,##class(DOM.Halux.AAP.enu.DnaCodeStatus).InBatch()) } @@ -208,7 +210,7 @@ While DnaCodeIterator.HasNext() { Set DnaCode = DnaCodeIterator.Next() If ..DnaCodeServiceHelper.MagDnaCodeBijgewerktWorden(DnaCode, ProductID, Herafdruk, SequentieNummer) { - If $$$HasLength(SequentieNummer) { + If ($$$HasLength(SequentieNummer) && $$$Not(..DnaCodeServiceHelper.IsSpaceStepGeneriekProduct(DnaCode,ProductID))) { Set DnaCode.SequentieNummer = SequentieNummer } Set DnaCode.AfdrukTijdstip = ..DateTimeAPI.CurrentHorolog()