Index: BL/PPS/TBX/DocsV1/HtmlInhoudProboxOverdoosEtiketBepaler.cls.xml
===================================================================
diff -u -r58258 -r58263
--- BL/PPS/TBX/DocsV1/HtmlInhoudProboxOverdoosEtiketBepaler.cls.xml	(.../HtmlInhoudProboxOverdoosEtiketBepaler.cls.xml)	(revision 58258)
+++ BL/PPS/TBX/DocsV1/HtmlInhoudProboxOverdoosEtiketBepaler.cls.xml	(.../HtmlInhoudProboxOverdoosEtiketBepaler.cls.xml)	(revision 58263)
@@ -66,22 +66,21 @@
 	
 	For  Set LijnNrLoop=$O(^UPRCP("B",bfrRGID,bfrVolgNr,LijnNrLoop)) Quit:(LijnNrLoop="")  Do
 	. Set Rec=^UPRCP("B",bfrRGID,bfrVolgNr,LijnNrLoop)
-	. Set Resultaat = Resultaat_..Geef1Lijn(Rec)
+	. Set Resultaat = Resultaat_..Geef1Lijn($P(Rec,"\",1), $P(Rec,"\",8), $P(Rec,"\",5))
 
 	Quit Resultaat
 ]]></Implementation>
 </Method>
 
 <Method name="Geef1Lijn">
-<FormalSpec>Bufferlijn:%String</FormalSpec>
+<FormalSpec>ProductNummer:%String,ToeleveringId:%String,Aantal:%Integer</FormalSpec>
 <Private>1</Private>
 <ReturnType>%String</ReturnType>
 <Implementation><![CDATA[
-	#dim ProductNummer As %String = $P(Bufferlijn,"\",1)
 	#dim ProductAPI As DOM.PM.ProductAPI = ##class(DOM.DomeinContext).Instance().GeefProductAPI()
 	#dim Product As DOM.PM.Product = ProductAPI.GeefProduct(ProductNummer)
 	#dim IngegevenKenmerken As APPS.PM.Maatwerk.dto.IngegevenKenmerken =  ##class(APPS.VKP.Maatwerk.impl.ConfiguratorService).%New().GeefOnverwerkteKenmerkenVanProduct(ProductNummer)
-	#dim LijnReferentie As %String = ##class(BL.PPS.TBX.DocsV1.HtmlInhoudProboxOverdoosEtiketBepaler.LijnReferentieBepaler).%New().ZoekLijnReferentie($P(Bufferlijn,"\",8),Product.GeefID())
+	#dim LijnReferentie As %String = ##class(BL.PPS.TBX.DocsV1.HtmlInhoudProboxOverdoosEtiketBepaler.LijnReferentieBepaler).%New().ZoekLijnReferentie(ToeleveringId,Product.GeefID())
 	
 	#dim Resultaat As %String = "<tr>"
 	
@@ -95,7 +94,7 @@
 	Set Resultaat = Resultaat_"<td align=""center"">"_IngegevenKenmerken.CorpusBreedte_"</td>"
 	Set Resultaat = Resultaat_"<td align=""center"">"_IngegevenKenmerken.CorpusWandDikte_"</td>"
 	Set Resultaat = Resultaat_"<td align=""center"">"_IngegevenKenmerken.LadeKleur_"</td>"
-	Set Resultaat = Resultaat_"<td align=""center"">"_$P(Bufferlijn,"\",5)_"</td>"
+	Set Resultaat = Resultaat_"<td align=""center"">"_Aantal_"</td>"
 	Set Resultaat = Resultaat_"</tr>"
 	
 	If $$$HasLength(LijnReferentie) {