Index: vhUnitTest/BL/PPS/TBX/DocsV1/HtmlInhoudProboxEtiketBepaler/BepaalHtmlInhoudProboxEtiket/Test.cls.xml
===================================================================
diff -u -r66493 -r73315
--- vhUnitTest/BL/PPS/TBX/DocsV1/HtmlInhoudProboxEtiketBepaler/BepaalHtmlInhoudProboxEtiket/Test.cls.xml	(.../Test.cls.xml)	(revision 66493)
+++ vhUnitTest/BL/PPS/TBX/DocsV1/HtmlInhoudProboxEtiketBepaler/BepaalHtmlInhoudProboxEtiket/Test.cls.xml	(.../Test.cls.xml)	(revision 73315)
@@ -15,6 +15,18 @@
 <Default>3333333</Default>
 </Parameter>
 
+<Parameter name="ProductId4">
+<Default>4444444</Default>
+</Parameter>
+
+<Parameter name="ProductId5">
+<Default>5555555</Default>
+</Parameter>
+
+<Parameter name="ProductId6">
+<Default>6666666</Default>
+</Parameter>
+
 <Parameter name="OrderlijnId1">
 <Default>110</Default>
 </Parameter>
@@ -27,6 +39,18 @@
 <Default>130</Default>
 </Parameter>
 
+<Parameter name="OrderlijnId4">
+<Default>140</Default>
+</Parameter>
+
+<Parameter name="OrderlijnId5">
+<Default>150</Default>
+</Parameter>
+
+<Parameter name="OrderlijnId6">
+<Default>160</Default>
+</Parameter>
+
 <Property name="ProductImplMock">
 <Type>DOM.PM.Product</Type>
 <Private>1</Private>
@@ -56,6 +80,9 @@
 	Do ..ProductApiStub.IndienMethodCall("GeefProduct",..#ProductId1).DanReturn(..ProductImplMock)
 	Do ..ProductApiStub.IndienMethodCall("GeefProduct",..#ProductId2).DanReturn(..ProductImplMock)
 	Do ..ProductApiStub.IndienMethodCall("GeefProduct",..#ProductId3).DanReturn(..ProductImplMock)
+	Do ..ProductApiStub.IndienMethodCall("GeefProduct",..#ProductId4).DanReturn(..ProductImplMock)
+	Do ..ProductApiStub.IndienMethodCall("GeefProduct",..#ProductId5).DanReturn(..ProductImplMock)
+	Do ..ProductApiStub.IndienMethodCall("GeefProduct",..#ProductId6).DanReturn(..ProductImplMock)
 	
 	Set ProductLijn = ##class(vhTest.Mock.DOM.VKP.ProductOrderlijn).%New()
 	Do ProductLijn.IndienMethodCall("GeefProjectReferentie").DanReturn("TestReferentie")
@@ -105,6 +132,38 @@
 ]]></Implementation>
 </Method>
 
+<Method name="Test: Standaardgedrag voor vervolg etiket">
+<Implementation><![CDATA[
+	#dim DnaCodeIterator As TECH.Iterator = ..GeefDnaCodeIterator($$$True, $$$True)
+	#dim IngegevenKenmerkenStub = ##class(vhTest.Utils.APPS.PM.Maatwerk.dto.LBXKenmerken).StandaardLade()
+	Set ConfiguratorServiceMock = ##class(vhTest.Mock.APPS.VKP.Maatwerk.ConfiguratorService).%New()
+	Do ConfiguratorServiceMock.VerwachtMethodCall("GeefOnverwerkteKenmerkenVanProduct",$$$ElkeWaarde).ExactAantalKeer(6).DanReturn(IngegevenKenmerkenStub)
+		
+	Set InhoudBepaler = ##class(BL.PPS.TBX.DocsV1.HtmlInhoudProboxEtiketBepaler).%New(..ProductApiStub, ConfiguratorServiceMock, ..OrderApiStub)
+	#dim Resultaat As %String = InhoudBepaler.BepaalHtmlInhoudProboxEtiket(DnaCodeIterator, $$$True)
+	
+	Do $$$AssertEquals(##class(TECH.StringUtils).Occurrences(Resultaat,"</tr>"),3) // 3 rijen in tabel (1 product + 1 referentie + header)
+	
+	Do ConfiguratorServiceMock.Verifieer()
+]]></Implementation>
+</Method>
+
+<Method name="Test: Standaardgedrag voor leeg vervolg etiket">
+<Implementation><![CDATA[
+	#dim DnaCodeIterator As TECH.Iterator = ..GeefDnaCodeIterator($$$True)
+	#dim IngegevenKenmerkenStub = ##class(vhTest.Utils.APPS.PM.Maatwerk.dto.LBXKenmerken).StandaardLade()
+	Set ConfiguratorServiceMock = ##class(vhTest.Mock.APPS.VKP.Maatwerk.ConfiguratorService).%New()
+	Do ConfiguratorServiceMock.VerwachtMethodCall("GeefOnverwerkteKenmerkenVanProduct",$$$ElkeWaarde).ExactAantalKeer(3).DanReturn(IngegevenKenmerkenStub)
+		
+	Set InhoudBepaler = ##class(BL.PPS.TBX.DocsV1.HtmlInhoudProboxEtiketBepaler).%New(..ProductApiStub, ConfiguratorServiceMock, ..OrderApiStub)
+	#dim Resultaat As %String = InhoudBepaler.BepaalHtmlInhoudProboxEtiket(DnaCodeIterator, $$$True)
+	
+	Do $$$AssertEquals(##class(TECH.StringUtils).Occurrences(Resultaat,"</tr>"),1) // 1 rij in tabel (enkel header)
+	
+	Do ConfiguratorServiceMock.Verifieer()
+]]></Implementation>
+</Method>
+
 <Method name="Test: Ladecode moet gebruikt worden">
 <Implementation><![CDATA[
 	#dim DnaCodeIterator As TECH.Iterator = ..GeefDnaCodeIterator($$$False)
@@ -126,7 +185,7 @@
 </Method>
 
 <Method name="GeefDnaCodeIterator">
-<FormalSpec>MetLijnOrderId:%Boolean</FormalSpec>
+<FormalSpec>MetLijnOrderId:%Boolean,ExtraLadesMetLijnOrderId:%Boolean=0</FormalSpec>
 <ReturnType>TECH.Iterator</ReturnType>
 <Implementation><![CDATA[
 	Set DnaCodeList = ##class(%ListOfObjects).%New()	
@@ -146,6 +205,12 @@
 		Do DnaCodeList.Insert(..GeefDnaCode("TBX12345", ..#ProductId3))
 		Do DnaCodeList.Insert(..GeefDnaCode("TBX12345", ..#ProductId3))
 	}
+	
+	If (ExtraLadesMetLijnOrderId) {
+		Do DnaCodeList.Insert(..GeefDnaCode("TBX12345", ..#ProductId4, ..#OrderlijnId4))
+		Do DnaCodeList.Insert(..GeefDnaCode("TBX12345", ..#ProductId5, ..#OrderlijnId5))
+		Do DnaCodeList.Insert(..GeefDnaCode("TBX12345", ..#ProductId6, ..#OrderlijnId6))
+	}
 		
 	Quit ##class(TECH.ListIterator).%New(DnaCodeList)
 ]]></Implementation>