Index: vhUnitTest/BL/PPS/TBX/DocsV1/ProboxBarcodeEtiketGenerator/GenereerProboxBarcodeEtiketIterator/Test.cls.xml
===================================================================
diff -u -r68307 -r68366
--- vhUnitTest/BL/PPS/TBX/DocsV1/ProboxBarcodeEtiketGenerator/GenereerProboxBarcodeEtiketIterator/Test.cls.xml	(.../Test.cls.xml)	(revision 68307)
+++ vhUnitTest/BL/PPS/TBX/DocsV1/ProboxBarcodeEtiketGenerator/GenereerProboxBarcodeEtiketIterator/Test.cls.xml	(.../Test.cls.xml)	(revision 68366)
@@ -63,6 +63,15 @@
 	Set ..ProductImplMock2 = ##class(vhTest.Mock.DOM.PM.Product).%New()
 	Do ..ProductImplMock2.IndienMethodCall("GeefID",).DanReturn(..#ProductId2)
 	
+	Set ..Device = $$$DummyString
+]]></Implementation>
+</Method>
+
+<Method name="OnBeforeOneTest">
+<FormalSpec>aTestName:%String</FormalSpec>
+<Implementation><![CDATA[
+	Do ##super()
+	
 	Set ..ProductAPIStub = ##class(vhTest.Mock.DOM.PM.ProductAPI).%New()
 	Do ..ProductAPIStub.IndienMethodCall("GeefProduct", ..#ProductNummer1).DanReturn(..ProductImplMock1)
 	Do ..ProductAPIStub.IndienMethodCall("GeefProduct", ..#ProductNummer2).DanReturn(..ProductImplMock2)
@@ -71,42 +80,82 @@
 	Do ..ToeleveringServiceStub.IndienMethodCall("GeefLijnReferentie", $$$ElkeWaarde, ..#ProductId1).DanReturn(..#LijnReferentie1)
 	Do ..ToeleveringServiceStub.IndienMethodCall("GeefLijnReferentie", $$$ElkeWaarde, ..#ProductId2).DanReturn(..#LijnReferentie2)
 	
-	Set ..Device = $$$DummyString
+	Do ##class(vhTest.Fake.TECH.DateTime.DateTimeAPI).Activeer()
 ]]></Implementation>
 </Method>
 
-<Method name="OnBeforeOneTest">
-<FormalSpec>aTestName:%String</FormalSpec>
+<Method name="Test: Geen DnaCodeIterator meegegeven geeft lege iterator terug">
 <Implementation><![CDATA[
-	Do ##super()
+	Set ProboxBarcodeEtiketGenerator = ##class(BL.PPS.TBX.DocsV1.ProboxBarcodeEtiketGenerator).%New(..ProductAPIStub, ..ToeleveringServiceStub)
+	#dim EtiketIterator As TECH.ListIterator = ProboxBarcodeEtiketGenerator.GenereerProboxBarcodeEtiketIterator(..EmptyIterator(), ..Device)
 	
-	Do ##class(vhTest.Fake.TECH.DateTime.DateTimeAPI).Activeer()
+	Do $$$AssertFalse(EtiketIterator.HasNext())
 ]]></Implementation>
 </Method>
 
-<Method name="Test: Geen DnaCodeIterator meegegeven">
+<Method name="Test: DnaCodeIterator met een DnaCode meegegeven zonder LijnReferentie geeft geen etiket">
 <Implementation><![CDATA[
-	Set ProboxBarcodeEtiketGenerator = ##class(BL.PPS.TBX.DocsV1.ProboxBarcodeEtiketGenerator).%New(..ProductAPIStub, ..ToeleveringServiceStub)
+	#dim Aantal As %Integer = 1
 	
-	#dim Substring = ##class(TECH.ListUtils).CreateListOfDataTypes("Geen Dna codes meegegeven.")
-	Do ..ZetVerwachteExceptie(##class(Tools.Test.VerwachteExceptie).%New("TECH.Exceptions.InvalidInputException",Substring))
+	#dim Productnummer As %Integer = 3000000
+	#dim ProductId As %Integer = 333333
 	
-	Do ProboxBarcodeEtiketGenerator.GenereerProboxBarcodeEtiketIterator(..EmptyIterator())
+	#dim ProductMock As DOM.PM.Product = ##class(vhTest.Mock.DOM.PM.Product).%New()
+	Do ProductMock.IndienMethodCall("GeefID",).DanReturn(ProductId)
+	
+	Do ..ProductAPIStub.IndienMethodCall("GeefProduct", Productnummer).DanReturn(ProductMock)
+	Do ..ToeleveringServiceStub.IndienMethodCall("GeefLijnReferentie", $$$ElkeWaarde, ProductId).DanReturn("")
+	
+	Set DnaCodeLijst = ##class(%ListOfObjects).%New()
+	Set DnaCodeZonderLijnRef = ##class(DOM.Halux.AAP.DnaCode).%New()
+	Set DnaCodeZonderLijnRef.LadeCode = "A.ABCD.6"
+	Set DnaCodeZonderLijnRef.ProductNummer = Productnummer
+	Do DnaCodeLijst.Insert(DnaCodeZonderLijnRef)
+	#dim DnaCodeIterator As TECH.ListIterator = ##class(TECH.ListIterator).%New(DnaCodeLijst)
+	
+	Set ProboxBarcodeEtiketGenerator = ##class(BL.PPS.TBX.DocsV1.ProboxBarcodeEtiketGenerator).%New(..ProductAPIStub, ..ToeleveringServiceStub)
+	#dim EtiketIterator As TECH.ListIterator = ProboxBarcodeEtiketGenerator.GenereerProboxBarcodeEtiketIterator(DnaCodeIterator, ..Device)
+	 
+	Do $$$AssertFalse(EtiketIterator.HasNext())
 ]]></Implementation>
 </Method>
 
 <Method name="Test: DnaCodeIterator met 1 DnaCode meegegeven geeft 1 etiket">
 <Implementation><![CDATA[
 	#dim Aantal As %Integer = 1
-	#dim DnaCodeIterator = ..GenereerIteratorMetAantalDnaCodes(Aantal)
+	#dim DnaCodeIterator As TECH.ListIterator = ..GenereerIteratorMetAantalDnaCodes(Aantal)
 	
 	Set ProboxBarcodeEtiketGenerator = ##class(BL.PPS.TBX.DocsV1.ProboxBarcodeEtiketGenerator).%New(..ProductAPIStub, ..ToeleveringServiceStub)
 	#dim EtiketIterator As TECH.ListIterator = ProboxBarcodeEtiketGenerator.GenereerProboxBarcodeEtiketIterator(DnaCodeIterator, ..Device)
-	
+	 
 	Do ..AssertEtiketIteratorMetEenDnaCode(EtiketIterator)
 ]]></Implementation>
 </Method>
 
+<Method name="Test: DnaCodeIterator met 2 DnaCodes met gelijk ProductNummer of LijnReferentie meegegeven geeft 1 etiket met aantal 2">
+<Implementation><![CDATA[
+	#dim Aantal As %Integer = 2
+	#dim DnaCodeIterator As TECH.ListIterator = ..GenereerIteratorMetAantalIdentiekeDnaCodes(Aantal)
+	
+	Set ProboxBarcodeEtiketGenerator = ##class(BL.PPS.TBX.DocsV1.ProboxBarcodeEtiketGenerator).%New(..ProductAPIStub, ..ToeleveringServiceStub)
+	#dim EtiketIterator As TECH.ListIterator = ProboxBarcodeEtiketGenerator.GenereerProboxBarcodeEtiketIterator(DnaCodeIterator, ..Device)
+	
+	Do ..AssertEtiketIteratorMetTweeDezelfdeDnaCodes(EtiketIterator)
+]]></Implementation>
+</Method>
+
+<Method name="Test: DnaCodeIterator met 2 DnaCodes met uniek ProductNummer en LijnReferentie meegegeven geeft 2 etiketten">
+<Implementation><![CDATA[
+	#dim Aantal As %Integer = 2
+	#dim DnaCodeIterator As TECH.ListIterator = ..GenereerIteratorMetAantalDnaCodes(Aantal)
+	
+	Set ProboxBarcodeEtiketGenerator = ##class(BL.PPS.TBX.DocsV1.ProboxBarcodeEtiketGenerator).%New(..ProductAPIStub, ..ToeleveringServiceStub)
+	#dim EtiketIterator As TECH.ListIterator = ProboxBarcodeEtiketGenerator.GenereerProboxBarcodeEtiketIterator(DnaCodeIterator, ..Device)
+	
+	Do ..AssertEtiketIteratorMetTweeUniekeDnaCodes(EtiketIterator)
+]]></Implementation>
+</Method>
+
 <Method name="AssertEtiketIteratorMetEenDnaCode">
 <FormalSpec>EtiketIterator:TECH.ListIterator</FormalSpec>
 <Private>1</Private>
@@ -116,6 +165,25 @@
 ]]></Implementation>
 </Method>
 
+<Method name="AssertEtiketIteratorMetTweeDezelfdeDnaCodes">
+<FormalSpec>EtiketIterator:TECH.ListIterator</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	Do ..AssertEtiket(EtiketIterator.Next(), 2, ..#LijnReferentie1, $$$True)
+	Do $$$AssertFalse(EtiketIterator.HasNext())
+]]></Implementation>
+</Method>
+
+<Method name="AssertEtiketIteratorMetTweeUniekeDnaCodes">
+<FormalSpec>EtiketIterator:TECH.ListIterator</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	Do ..AssertEtiket(EtiketIterator.Next(), 1, ..#LijnReferentie1, $$$True)
+	Do ..AssertEtiket(EtiketIterator.Next(), 1, ..#LijnReferentie2, $$$False)
+	Do $$$AssertFalse(EtiketIterator.HasNext())
+]]></Implementation>
+</Method>
+
 <Method name="AssertEtiket">
 <FormalSpec>Etiket:BL.Etiket.ProboxBarcode,AantalLades:%Integer,LijnReferentie:%String,IsBarcodeLinks:%Boolean</FormalSpec>
 <Private>1</Private>
@@ -128,6 +196,24 @@
 ]]></Implementation>
 </Method>
 
+<Method name="GenereerIteratorMetAantalIdentiekeDnaCodes">
+<FormalSpec>Aantal:%Integer</FormalSpec>
+<Private>1</Private>
+<ReturnType>TECH.ListIterator</ReturnType>
+<Implementation><![CDATA[
+	#dim DnaCode As DOM.Halux.AAP.DnaCode = ##class(DOM.Halux.AAP.DnaCode).%New()
+	Set DnaCode.LadeCode = "A.ABCD.6"
+	Set DnaCode.ProductNummer = ..#ProductNummer1
+	
+	Set DnaCodeLijst = ##class(%ListOfObjects).%New()
+	For i = 1:1:Aantal {
+		Do DnaCodeLijst.Insert(DnaCode)
+	}
+	
+	Quit ##class(TECH.ListIterator).%New(DnaCodeLijst)
+]]></Implementation>
+</Method>
+
 <Method name="GenereerIteratorMetAantalDnaCodes">
 <FormalSpec>Aantal:%Integer</FormalSpec>
 <Private>1</Private>
Index: BL/PPS/TBX/DocsV1/ProboxBarcodeEtiketGenerator.cls.xml
===================================================================
diff -u -r68307 -r68366
--- BL/PPS/TBX/DocsV1/ProboxBarcodeEtiketGenerator.cls.xml	(.../ProboxBarcodeEtiketGenerator.cls.xml)	(revision 68307)
+++ BL/PPS/TBX/DocsV1/ProboxBarcodeEtiketGenerator.cls.xml	(.../ProboxBarcodeEtiketGenerator.cls.xml)	(revision 68366)
@@ -31,30 +31,35 @@
 <FormalSpec>DnaCodeIterator:TECH.Iterator,LabelDevice:%String</FormalSpec>
 <ReturnType>TECH.ListIterator</ReturnType>
 <Implementation><![CDATA[
-	If ($$$Not(DnaCodeIterator.HasNext())) 
+	#dim GesorteerdeDnaCodeIterator As TECH.ListIterator = ..GeefGesorteerdeDnaCodeIteratorMetLijnReferenties(DnaCodeIterator)
+	Set ProboxBarcodeLabelLijst = ##class(%ListOfDataTypes).%New()
+	
+	If ($$$Not(GesorteerdeDnaCodeIterator.HasNext())) 
 	{
-		Set Exception = ##class(TECH.Exceptions.InvalidInputException).%New("Geen Dna codes meegegeven.")
-		Do ##class(TECH.ExceptionHandler).Throw(Exception)
+		Quit ##class(TECH.ListIterator).%New(ProboxBarcodeLabelLijst)
 	}
-	
-	
- 	#dim GesorteerdeDnaCodeIterator As TECH.ListIterator = ..GeefGesorteerdeDnaCodeIterator(DnaCodeIterator)
- 	#dim DnaCode As DOM.Halux.AAP.DnaCode
- 	#dim AantalLadesOpEtiket As %Integer = 0
- 	#dim IsBarcodeLinks As %Boolean = $$$False
- 	#dim HuidigeLijnRefEnLadeCodePrefix As %String = ""
  	
- 	Set ProboxBarcodeLabelLijst = ##class(%ListOfDataTypes).%New()
+ 	#dim DnaCode As DOM.Halux.AAP.DnaCode = GesorteerdeDnaCodeIterator.Next()
+ 	#dim VolgendeDnaCode As DOM.Halux.AAP.DnaCode
+ 	#dim AantalLadesOpEtiket As %Integer = 1
+ 	#dim IsBarcodeLinks As %Boolean = $$$True
+ 	#dim HuidigeLijnRefEnLadeCodePrefix As %String = $ListBuild(DnaCode.LijnReferentie, ..GeefLadeCodePrefix(DnaCode))
+ 	#dim VolgendeLijnRefEnLadeCodePrefix As %String
+ 	
 	While GesorteerdeDnaCodeIterator.HasNext() {
-		Set AantalLadesOpEtiket = AantalLadesOpEtiket + 1
-		Set IsBarcodeLinks = $$$Not(IsBarcodeLinks)
-		Set DnaCode = GesorteerdeDnaCodeIterator.Next()
-		If $$$Not($ListBuild(DnaCode.LijnReferentie, ..GeefLadeCodePrefix(DnaCode)) = HuidigeLijnRefEnLadeCodePrefix) {
+		Set VolgendeDnaCode = GesorteerdeDnaCodeIterator.Next()
+		Set VolgendeLijnRefEnLadeCodePrefix = $ListBuild(VolgendeDnaCode.LijnReferentie, ..GeefLadeCodePrefix(VolgendeDnaCode))
+		
+		If $$$Not(HuidigeLijnRefEnLadeCodePrefix = VolgendeLijnRefEnLadeCodePrefix) {
 			Do ProboxBarcodeLabelLijst.Insert(..GenereerProboxBarcodeEtiket(DnaCode, AantalLadesOpEtiket, IsBarcodeLinks, LabelDevice))
 			Set AantalLadesOpEtiket = 0
-			Set HuidigeLijnRefEnLadeCodePrefix = $ListBuild(DnaCode.LijnReferentie, ..GeefLadeCodePrefix(DnaCode))
+			Set IsBarcodeLinks = $$$Not(IsBarcodeLinks)
 		}
+		
+		Set AantalLadesOpEtiket = AantalLadesOpEtiket + 1
+		Set DnaCode = VolgendeDnaCode
 	}
+	Do ProboxBarcodeLabelLijst.Insert(..GenereerProboxBarcodeEtiket(DnaCode, AantalLadesOpEtiket, IsBarcodeLinks, LabelDevice))
  	
 	Quit ##class(TECH.ListIterator).%New(ProboxBarcodeLabelLijst)
 ]]></Implementation>
@@ -77,7 +82,7 @@
 ]]></Implementation>
 </Method>
 
-<Method name="GeefGesorteerdeDnaCodeIterator">
+<Method name="GeefGesorteerdeDnaCodeIteratorMetLijnReferenties">
 <FormalSpec>DnaCodeIterator:TECH.ListIterator</FormalSpec>
 <ReturnType>TECH.ListIterator</ReturnType>
 <Implementation><![CDATA[
@@ -87,7 +92,10 @@
  	While DnaCodeIterator.HasNext() {
 	 	Set DnaCode = DnaCodeIterator.Next()
 	 	Set DnaCode.LijnReferentie = ..GeefLijnReferentie(DnaCode)
-	 	Do DnaCodeLijst.Insert(DnaCode)
+	 	
+	 	If $$$Not(DnaCode.LijnReferentie = "") {
+	 		Do DnaCodeLijst.Insert(DnaCode)
+	 	}
  	}
  	
  	Set SorteerComparator = ##class(BL.PPS.TBX.DocsV1.ProboxBarcodeEtiketGenerator.Comparator.DnaCodeComparator).%New()
Index: vhUnitTest/BL/PPS/TBX/DocsV1/ProboxBarcodeEtiketGenerator/GeefGesorteerdeDnaCodeIterator/Test.cls.xml
===================================================================
diff -u -r68298 -r68366
--- vhUnitTest/BL/PPS/TBX/DocsV1/ProboxBarcodeEtiketGenerator/GeefGesorteerdeDnaCodeIterator/Test.cls.xml	(.../Test.cls.xml)	(revision 68298)
+++ vhUnitTest/BL/PPS/TBX/DocsV1/ProboxBarcodeEtiketGenerator/GeefGesorteerdeDnaCodeIterator/Test.cls.xml	(.../Test.cls.xml)	(revision 68366)
@@ -11,6 +11,10 @@
 <Default>2000000</Default>
 </Parameter>
 
+<Parameter name="ProductNummer3">
+<Default>3000000</Default>
+</Parameter>
+
 <Parameter name="ProductId1">
 <Default>111111</Default>
 </Parameter>
@@ -19,6 +23,10 @@
 <Default>222222</Default>
 </Parameter>
 
+<Parameter name="ProductId3">
+<Default>333333</Default>
+</Parameter>
+
 <Parameter name="LijnReferentie1">
 <Default>100</Default>
 </Parameter>
@@ -37,6 +45,11 @@
 <Private>1</Private>
 </Property>
 
+<Property name="ProductImplMock3">
+<Type>DOM.PM.Product</Type>
+<Private>1</Private>
+</Property>
+
 <Property name="ProductAPIStub">
 <Type>DOM.PM.ProductAPI</Type>
 <Private>1</Private>
@@ -58,13 +71,18 @@
 	Set ..ProductImplMock2 = ##class(vhTest.Mock.DOM.PM.Product).%New()
 	Do ..ProductImplMock2.IndienMethodCall("GeefID",).DanReturn(..#ProductId2)
 	
+	Set ..ProductImplMock3 = ##class(vhTest.Mock.DOM.PM.Product).%New()
+	Do ..ProductImplMock3.IndienMethodCall("GeefID",).DanReturn(..#ProductId3)
+	
 	Set ..ProductAPIStub = ##class(vhTest.Mock.DOM.PM.ProductAPI).%New()
 	Do ..ProductAPIStub.IndienMethodCall("GeefProduct", ..#ProductNummer1).DanReturn(..ProductImplMock1)
 	Do ..ProductAPIStub.IndienMethodCall("GeefProduct", ..#ProductNummer2).DanReturn(..ProductImplMock2)
+	Do ..ProductAPIStub.IndienMethodCall("GeefProduct", ..#ProductNummer3).DanReturn(..ProductImplMock3)
 	
 	Set ..ToeleveringServiceStub = ##class(vhTest.Mock.DOM.AKP.impl.ToeleveringService).%New()
 	Do ..ToeleveringServiceStub.IndienMethodCall("GeefLijnReferentie", $$$ElkeWaarde, ..#ProductId1).DanReturn(..#LijnReferentie1)
 	Do ..ToeleveringServiceStub.IndienMethodCall("GeefLijnReferentie", $$$ElkeWaarde, ..#ProductId2).DanReturn(..#LijnReferentie2)
+	Do ..ToeleveringServiceStub.IndienMethodCall("GeefLijnReferentie", $$$ElkeWaarde, ..#ProductId3).DanReturn("")
 ]]></Implementation>
 </Method>
 
@@ -74,7 +92,7 @@
 	#dim DnaCodeIterator As TECH.Iterator = ..GenereerIteratorMetAantalDnaCodes(AantalDnaCodes)
 	
 	Set ProboxBarcodeEtiketGenerator = ##class(BL.PPS.TBX.DocsV1.ProboxBarcodeEtiketGenerator).%New(..ProductAPIStub, ..ToeleveringServiceStub)
-	#dim GesorteerdeDnaCodeIterator As TECH.ListIterator = ProboxBarcodeEtiketGenerator.GeefGesorteerdeDnaCodeIterator(DnaCodeIterator)
+	#dim GesorteerdeDnaCodeIterator As TECH.ListIterator = ProboxBarcodeEtiketGenerator.GeefGesorteerdeDnaCodeIteratorMetLijnReferenties(DnaCodeIterator)
 	
 	Do ..AssertGesorteerdeIteratorMetEenDnaCode(GesorteerdeDnaCodeIterator, AantalDnaCodes)
 ]]></Implementation>
@@ -86,7 +104,7 @@
 	#dim DnaCodeIterator As TECH.Iterator = ..GenereerIteratorMetAantalDnaCodes(AantalDnaCodes)
 	
 	Set ProboxBarcodeEtiketGenerator = ##class(BL.PPS.TBX.DocsV1.ProboxBarcodeEtiketGenerator).%New(..ProductAPIStub, ..ToeleveringServiceStub)
-	#dim GesorteerdeDnaCodeIterator As TECH.ListIterator = ProboxBarcodeEtiketGenerator.GeefGesorteerdeDnaCodeIterator(DnaCodeIterator)
+	#dim GesorteerdeDnaCodeIterator As TECH.ListIterator = ProboxBarcodeEtiketGenerator.GeefGesorteerdeDnaCodeIteratorMetLijnReferenties(DnaCodeIterator)
 	
 	Do ..AssertGesorteerdeIteratorMetDrieDnaCodes(GesorteerdeDnaCodeIterator, AantalDnaCodes)
 ]]></Implementation>
@@ -98,12 +116,23 @@
 	#dim DnaCodeIterator As TECH.Iterator = ..GenereerIteratorMetAantalDnaCodes(AantalDnaCodes)
 	
 	Set ProboxBarcodeEtiketGenerator = ##class(BL.PPS.TBX.DocsV1.ProboxBarcodeEtiketGenerator).%New(..ProductAPIStub, ..ToeleveringServiceStub)
-	#dim GesorteerdeDnaCodeIterator As TECH.ListIterator = ProboxBarcodeEtiketGenerator.GeefGesorteerdeDnaCodeIterator(DnaCodeIterator)
+	#dim GesorteerdeDnaCodeIterator As TECH.ListIterator = ProboxBarcodeEtiketGenerator.GeefGesorteerdeDnaCodeIteratorMetLijnReferenties(DnaCodeIterator)
 	
 	Do ..AssertGesorteerdeIteratorMetTienDnaCodes(GesorteerdeDnaCodeIterator, AantalDnaCodes)
 ]]></Implementation>
 </Method>
 
+<Method name="Test: Iterator slaagt DnaCodes zonder LijnReferentie over">
+<Implementation><![CDATA[
+	#dim AantalDnaCodes As %Integer = 3
+	Set DnaCodeLijst = ##class(%ListOfDataTypes).%New()
+	#dim DnaCodeIterator As TECH.Iterator = ..GenereerIteratorMetAantalDnaCodes(AantalDnaCodes)
+	
+	Set ProboxBarcodeEtiketGenerator = ##class(BL.PPS.TBX.DocsV1.ProboxBarcodeEtiketGenerator).%New(..ProductAPIStub, ..ToeleveringServiceStub)
+	#dim GesorteerdeDnaCodeIterator As TECH.ListIterator = ProboxBarcodeEtiketGenerator.GeefGesorteerdeDnaCodeIteratorMetLijnReferenties(DnaCodeIterator)
+]]></Implementation>
+</Method>
+
 <Method name="AssertGesorteerdeIteratorMetEenDnaCode">
 <FormalSpec>GesorteerdeDnaCodeIterator:TECH.ListIterator,AantalDnaCodes:%Integer</FormalSpec>
 <Private>1</Private>