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()