Index: BL/PPS/TBX/DocsV1.cls.xml
===================================================================
diff -u -r57020 -r57032
--- BL/PPS/TBX/DocsV1.cls.xml	(.../DocsV1.cls.xml)	(revision 57020)
+++ BL/PPS/TBX/DocsV1.cls.xml	(.../DocsV1.cls.xml)	(revision 57032)
@@ -1429,7 +1429,7 @@
 	#dim i As %Integer
     #dim Aantal As %Integer = ..BepaalAantalOverdoosEtiketten(Toelevering) + 2 // Er werden te weinig probox overdoos etiketten aangemaakt => 2 erbij
 
- 	For i=1:1:Aantal {
+	For i=1:1:Aantal {
 	 	set Label = ##class(BL.Etiket.ProboxOverdoos).%New()
 	 	Set Label.Device=..#ProboxOverdoosEtiketPrinter
  	
@@ -1473,6 +1473,35 @@
 ]]></Implementation>
 </Method>
 
+<Method name="ProboxOverdoosInhoudEtiket">
+<FormalSpec>bfrRGID:%String,bfrVolgNr:%String</FormalSpec>
+<Implementation><![CDATA[
+ 	Do ..blLabelPrinter.Clear()
+	
+	#dim PalletId As %String = $Piece(^UPRCP("B",bfrRGID,bfrVolgNr,1),"\",3)
+	#dim ToeleveringId As %String = $Piece(^UPRCP("B",bfrRGID,bfrVolgNr,1),"\",8)
+	#dim ToeleveringAPI As DOM.AKP.ToeleveringAPI = ##class(DOM.DomeinContext).Instance().GeefToeleveringAPI()
+	#dim Toelevering As DOM.AKP.Toelevering = ToeleveringAPI.GeefToelevering(ToeleveringId)
+	#dim Partij As DOM.PARTIJ.Partij = ##class(DOM.DomeinContext).Instance().GeefPartijAPI().GeefPartij(Toelevering.GeefKlantID())
+	
+ 	Set ProboxOverdoosInhoudLabel = ##class(BL.Etiket.ProboxOverdoosInhoud).%New()
+ 	Set ProboxOverdoosInhoudLabel.Device=..#ProboxOverdoosEtiketPrinter
+ 	
+ 	Set ProboxOverdoosInhoudLabel.Aantal = 1
+ 	Set ProboxOverdoosInhoudLabel.KlantNaam = Partij.GeefNaam()
+ 	Set ProboxOverdoosInhoudLabel.InhoudAlsHTML = ##class(BL.PPS.TBX.DocsV1.HtmlInhoudProboxOverdoosEtiketBepaler).%New().BepaalHtmlInhoudProboxOverdoosEtiket(bfrRGID,bfrVolgNr)
+ 	Set ProboxOverdoosInhoudLabel.PalletBarcode = PalletId
+ 	Set ProboxOverdoosInhoudLabel.PalletBarcodeTxt = ..FormatteerPalletID(PalletId)
+
+	#dim KlantNummer As %String = ##class(DOM.DomeinContext).Instance().GeefLegacyPartijAPI().GeefKlantNummerVoorPartijID(Toelevering.GeefKlantID())
+ 	Set ProboxOverdoosInhoudLabel.Logo = ..GeefEtiketLogo(KlantNummer)
+ 	
+ 	Do ..blLabelPrinter.Add(ProboxOverdoosInhoudLabel)
+ 	
+	Do ..blLabelPrinter.Print2Bartender()
+]]></Implementation>
+</Method>
+
 <Method name="BepaalAantalOverdoosEtiketten">
 <Description>
 Bepaalt het volume-aandeel van de probox-tandemboxen
Index: vhTest/Fake/BL/PPS/TBX/DocsV1.cls.xml
===================================================================
diff -u -r38545 -r57032
--- vhTest/Fake/BL/PPS/TBX/DocsV1.cls.xml	(.../DocsV1.cls.xml)	(revision 38545)
+++ vhTest/Fake/BL/PPS/TBX/DocsV1.cls.xml	(.../DocsV1.cls.xml)	(revision 57032)
@@ -19,6 +19,12 @@
 ]]></Implementation>
 </Method>
 
+<Method name="ProboxOverdoosInhoudEtiket">
+<FormalSpec>bfrRGID:%String,bfrVolgNr:%String</FormalSpec>
+<Implementation><![CDATA[
+]]></Implementation>
+</Method>
+
 <Method name="BepaalProcomAantal">
 <FormalSpec>Toelevering:DOM.AKP.Toelevering</FormalSpec>
 <ReturnType>%Integer</ReturnType>
Index: vhTest/Mock/BL/PPS/TBX/DocsV1.cls.xml
===================================================================
diff -u -r55303 -r57032
--- vhTest/Mock/BL/PPS/TBX/DocsV1.cls.xml	(.../DocsV1.cls.xml)	(revision 55303)
+++ vhTest/Mock/BL/PPS/TBX/DocsV1.cls.xml	(.../DocsV1.cls.xml)	(revision 57032)
@@ -255,6 +255,12 @@
 ]]></Implementation>
 </Method>
 
+<Method name="ProboxOverdoosInhoudEtiket">
+<FormalSpec>bfrRGID:%String,bfrVolgNr:%String</FormalSpec>
+<Implementation><![CDATA[	do ..VerwerkMethodCall("ProboxOverdoosInhoudEtiket",bfrRGID,bfrVolgNr)
+]]></Implementation>
+</Method>
+
 <Method name="Transform2Bak">
 <FormalSpec>Label1:%String,Label2:%String</FormalSpec>
 <Implementation><![CDATA[	do ..VerwerkMethodCall("Transform2Bak",Label1,Label2)
Index: BL/PPS/TBX/DocsV1/HtmlInhoudProboxOverdoosEtiketBepaler.cls.xml
===================================================================
diff -u
--- BL/PPS/TBX/DocsV1/HtmlInhoudProboxOverdoosEtiketBepaler.cls.xml	(revision 0)
+++ BL/PPS/TBX/DocsV1/HtmlInhoudProboxOverdoosEtiketBepaler.cls.xml	(revision 57032)
@@ -0,0 +1,103 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="BL.PPS.TBX.DocsV1.HtmlInhoudProboxOverdoosEtiketBepaler">
+<Super>TECH.RegisteredObject</Super>
+
+<Method name="BepaalHtmlInhoudProboxOverdoosEtiket">
+<FormalSpec>bfrRGID:%String,bfrVolgNr:%String</FormalSpec>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[
+	#dim Resultaat As %String = "<html><head>"_..GeefStyles()_"</head><body>"
+	
+	Set Resultaat = Resultaat_..GeefTabelData(bfrRGID, bfrVolgNr)
+	
+	Set Resultaat = Resultaat_"</body></html>"
+	
+	Quit Resultaat
+]]></Implementation>
+</Method>
+
+<Method name="GeefStyles">
+<Private>1</Private>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	Quit "<style>table, th, td {  font-family: Arial; font-size: 9pt;} }</style>"
+]]></Implementation>
+</Method>
+
+<Method name="GeefTabelData">
+<FormalSpec>bfrRGID:%String,bfrVolgNr:%String</FormalSpec>
+<Private>1</Private>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[
+	#dim Resultaat As %String = "<table style=""width:100%"" border=""1"" cellpadding=""0"" cellspacing=""0"">"
+	Set Resultaat = Resultaat_..GeefTabelHeader()_..GeefTabelInhoud(bfrRGID, bfrVolgNr)
+	Set Resultaat = Resultaat_"</table>"
+	Quit Resultaat
+]]></Implementation>
+</Method>
+
+<Method name="GeefTabelHeader">
+<Private>1</Private>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[
+	#dim Resultaat As %String = "<tr>"
+	Set Resultaat = Resultaat_"<th>"_"Code"_"</th>"
+	Set Resultaat = Resultaat_"<th>"_"Hoogte"_"</th>"
+	Set Resultaat = Resultaat_"<th>"_"Diepte"_"</th>"
+	Set Resultaat = Resultaat_"<th>"_"Breedte"_"</th>"
+	Set Resultaat = Resultaat_"<th>"_"Wand"_"</th>"
+	Set Resultaat = Resultaat_"<th>"_"Kleur"_"</th>"
+	Set Resultaat = Resultaat_"<th>"_"Aantal"_"</th>"
+	Set Resultaat = Resultaat_"<th>"_"Referentie"_"</th>"
+	Set Resultaat = Resultaat_"</tr>"
+	
+	Quit Resultaat
+]]></Implementation>
+</Method>
+
+<Method name="GeefTabelInhoud">
+<FormalSpec>bfrRGID:%String,bfrVolgNr:%String</FormalSpec>
+<Private>1</Private>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[
+ 	#dim LijnNrLoop As %String = ""
+ 	#dim Rec As %String = ""
+ 	#dim ProductNummer As %String = ""
+ 	#dim Resultaat As %String = ""
+	
+	For  Set LijnNrLoop=$O(^UPRCP("B",bfrRGID,bfrVolgNr,LijnNrLoop)) Quit:(LijnNrLoop="")  Do
+	. Set Rec=^UPRCP("B",bfrRGID,bfrVolgNr,LijnNrLoop)
+	. Set Resultaat = Resultaat_..Geef1Lijn(Rec)
+
+	Quit Resultaat
+]]></Implementation>
+</Method>
+
+<Method name="Geef1Lijn">
+<FormalSpec>Bufferlijn:%String</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 Resultaat As %String = "<tr>"
+	Set Resultaat = Resultaat_"<td>"_Product.GeefDossierNr()_"</td>"
+	Set Resultaat = Resultaat_"<td align=""center"">"_IngegevenKenmerken.LadeHoogte_"</td>"
+	Set Resultaat = Resultaat_"<td align=""right"">"_IngegevenKenmerken.LadeDiepte_"</td>"
+	Set Resultaat = Resultaat_"<td align=""right"">"_IngegevenKenmerken.CorpusBreedte_"</td>"
+	Set Resultaat = Resultaat_"<td align=""right"">"_IngegevenKenmerken.CorpusWandDikte_"</td>"
+	Set Resultaat = Resultaat_"<td>"_IngegevenKenmerken.LadeKleur_"</td>"
+	Set Resultaat = Resultaat_"<td align=""right"">"_$P(Bufferlijn,"\",5)_"</td>"
+	Set Resultaat = Resultaat_"<td>"_""_"</td>"  //de lijnreferentie zou opgehaald kunnen worden indien in de buffer naast de toelevering, ook de toeleveringlijn zou staan
+	Set Resultaat = Resultaat_"</tr>"
+	
+	Quit Resultaat
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>