Index: vhTest/Mock/BL/PPS/TBX/DocsV1/HtmlInhoudProboxEtiketBepaler.cls.xml
===================================================================
diff -u -r63092 -r65866
--- vhTest/Mock/BL/PPS/TBX/DocsV1/HtmlInhoudProboxEtiketBepaler.cls.xml	(.../HtmlInhoudProboxEtiketBepaler.cls.xml)	(revision 63092)
+++ vhTest/Mock/BL/PPS/TBX/DocsV1/HtmlInhoudProboxEtiketBepaler.cls.xml	(.../HtmlInhoudProboxEtiketBepaler.cls.xml)	(revision 65866)
@@ -9,7 +9,7 @@
 <Inheritance>right</Inheritance>
 
 <Method name="%OnNew">
-<FormalSpec>ProductApi:DOM.PM.ProductAPI,ConfiguratorService:APPS.VKP.Maatwerk.ConfiguratorService</FormalSpec>
+<FormalSpec>ProductApi:DOM.PM.ProductAPI,ConfiguratorService:APPS.VKP.Maatwerk.ConfiguratorService,OrderApi:DOM.VKP.OrderAPI=""</FormalSpec>
 <ReturnType>%Status</ReturnType>
 <Implementation><![CDATA[	Quit $$$OK
 ]]></Implementation>
Index: BL/PPS/TBX/DocsV1/HtmlInhoudProboxEtiketBepaler.cls.xml
===================================================================
diff -u -r63577 -r65866
--- BL/PPS/TBX/DocsV1/HtmlInhoudProboxEtiketBepaler.cls.xml	(.../HtmlInhoudProboxEtiketBepaler.cls.xml)	(revision 63577)
+++ BL/PPS/TBX/DocsV1/HtmlInhoudProboxEtiketBepaler.cls.xml	(.../HtmlInhoudProboxEtiketBepaler.cls.xml)	(revision 65866)
@@ -18,8 +18,13 @@
 <Private>1</Private>
 </Property>
 
+<Property name="OrderApi">
+<Type>DOM.VKP.OrderAPI</Type>
+<Private>1</Private>
+</Property>
+
 <Method name="%OnNew">
-<FormalSpec>ProductApi:DOM.PM.ProductAPI,ConfiguratorService:APPS.VKP.Maatwerk.ConfiguratorService</FormalSpec>
+<FormalSpec>ProductApi:DOM.PM.ProductAPI,ConfiguratorService:APPS.VKP.Maatwerk.ConfiguratorService,OrderApi:DOM.VKP.OrderAPI=""</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
@@ -28,6 +33,7 @@
 	Set ..ProductApi = $$$Inject(ProductApi,##class(DOM.PM.impl.ProductAPI).%New())
 	Set ..ConfiguratorService = $$$Inject(ConfiguratorService,##class(APPS.VKP.Maatwerk.impl.ConfiguratorService).%New())
 	Set ..LijnReferentieBepaler = ##class(BL.PPS.TBX.DocsV1.HtmlInhoudProboxEtiketBepaler.LijnReferentieBepaler).%New()
+	Set ..OrderApi = $$$Inject(OrderApi, ##class(DOM.DomeinContext).Instance().GeefOrderAPI())
 	Quit $$$OK
 ]]></Implementation>
 </Method>
@@ -97,37 +103,48 @@
 	
 	#dim DnaCode As DOM.Halux.AAP.DnaCode
 	#dim AantalReedsOpPallet As %Integer = 0
-	#dim ToeleveringId As %String = 0
+	#dim OrderId As %String = 0
 	While DnaCodeIterator.HasNext() {
 		Set DnaCode = DnaCodeIterator.Next()		
 		Set AantalReedsOpPallet = 0
 		If $IsObject(ProductAantalLijst.FindByKey(DnaCode.ProductNummer)) {
 			Set AantalReedsOpPallet = ProductAantalLijst.FindByKey(DnaCode.ProductNummer).Value
 			Do ProductAantalLijst.RemoveByKey(DnaCode.ProductNummer)
 		}
-		Do ProductAantalLijst.Insert(##class(TECH.KeyValuePair).%New(DnaCode.ProductNummer, AantalReedsOpPallet + 1))
-		Set ToeleveringId = DnaCode.Toelevering
+		
+		#dim ProductInfoLijst = ##class(TECH.KeyValue.UniqueList).%New()
+		Do ProductInfoLijst.Insert(##class(TECH.KeyValuePair).%New("AantalOpPallet", AantalReedsOpPallet + 1))
+		Do ProductInfoLijst.Insert(##class(TECH.KeyValuePair).%New("OrderlijnId", DnaCode.OrderlijnId))
+		
+		Do ProductAantalLijst.Insert(##class(TECH.KeyValuePair).%New(DnaCode.ProductNummer, ProductInfoLijst))
+		Set OrderId = DnaCode.OrderId
 	}
 	
 	Set ProductAantalLijstIterator = ##class(TECH.ListIterator).%New(ProductAantalLijst)
 	While ProductAantalLijstIterator.HasNext() {
 		#dim ProductAantalKeyPair As TECH.KeyValuePair = ProductAantalLijstIterator.Next()
-		Set Resultaat = Resultaat_..Geef1Lijn(ProductAantalKeyPair.Key, ToeleveringId, ProductAantalKeyPair.Value)
+		Set Resultaat = Resultaat_..Geef1Lijn(ProductAantalKeyPair.Key, OrderId, ProductAantalKeyPair.Value)
 	}
 
 	Quit Resultaat
 ]]></Implementation>
 </Method>
 
 <Method name="Geef1Lijn">
-<FormalSpec>ProductNummer:%String,ToeleveringId:%String,Aantal:%Integer</FormalSpec>
+<FormalSpec>ProductNummer:%String,OrderId:%String,ProductInfoLijst:TECH.KeyValue.UniqueList</FormalSpec>
 <Private>1</Private>
 <ReturnType>%String</ReturnType>
 <Implementation><![CDATA[
+	#dim Aantal As %String = ProductInfoLijst.FindByKey("AantalOpPallet").Value
+	#dim OrderlijnId As %String = ProductInfoLijst.FindByKey("OrderlijnId").Value
+
 	#dim Product As DOM.PM.Product = ..ProductApi.GeefProduct(ProductNummer)
 	#dim IngegevenKenmerken As APPS.PM.Maatwerk.dto.IngegevenKenmerken =  ..ConfiguratorService.GeefOnverwerkteKenmerkenVanProduct(ProductNummer)
-	#dim LijnReferentie As %String = ..LijnReferentieBepaler.ZoekLijnReferentie(ToeleveringId,Product.GeefID())
 	
+	#dim Order As DOM.VKP.Order = ..OrderApi.GeefOrder(OrderId)
+	#dim OrderLijn As DOM.VKP.ProductOrderlijn = Order.GeefOrderLijn(OrderlijnId)
+	#dim LijnReferentie As %String = OrderLijn.GeefProjectReferentie()
+	
 	#dim Resultaat As %String = "<tr>"
 	
 	#dim ToonLijnReferentieOpTweedeRegel As %Boolean = ($$$HasLength(LijnReferentie))