Index: APPS/Halux/PPS/Document/ProductieDetailDocument/impl/TBX/BladInhoudBuilder.cls.xml
===================================================================
diff -u -r29059 -r61580
--- APPS/Halux/PPS/Document/ProductieDetailDocument/impl/TBX/BladInhoudBuilder.cls.xml	(.../BladInhoudBuilder.cls.xml)	(revision 29059)
+++ APPS/Halux/PPS/Document/ProductieDetailDocument/impl/TBX/BladInhoudBuilder.cls.xml	(.../BladInhoudBuilder.cls.xml)	(revision 61580)
@@ -89,6 +89,11 @@
 	#dim Omschrijving As %String = ..XMLStringVerwerker.ParserFriendlyNaarTagBasedTekst(Item.LANGTEKST.GetAt(1))
 	#dim Korttekst As %String = ..XMLStringVerwerker.ParserFriendlyNaarTagBasedTekst($S($L(Item.KORTTEKSTfmt):Item.KORTTEKSTfmt, 1:Item.KORTTEKST))
 	#dim ProductDetailDataLijn As APPS.Halux.PPS.Document.ProductieDetailDocument.common.Inhoud.ProductDetailDataLijn = ..MaakDataLijn(Omschrijving, ..GeefItemDIM(Item), ..GeefItemQTY(Item), Korttekst)
+	
+	If (..IsOnderdeelGreep(ProductDetailDataLijn)) {
+		Set ProductDetailDataLijn = ..VerwerkOnderdeelGreep(ProductDetailDataLijn)
+	}
+	
 	Do ..Inhoud.VoegToeDataLijn(ProductDetailDataLijn)
 ]]></Implementation>
 </Method>
@@ -179,6 +184,32 @@
 <Implementation><![CDATA[	quit ""
 ]]></Implementation>
 </Method>
+
+<Method name="IsOnderdeelGreep">
+<FormalSpec>ProductDetailDataLijn:APPS.Halux.PPS.Document.ProductieDetailDocument.common.Inhoud.ProductDetailDataLijn</FormalSpec>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	Quit ProductDetailDataLijn.GeefOmschrijving().GeefTekst() = "Greep"
+]]></Implementation>
+</Method>
+
+<Method name="VerwerkOnderdeelGreep">
+<FormalSpec>ProductDetailDataLijn:APPS.Halux.PPS.Document.ProductieDetailDocument.common.Inhoud.ProductDetailDataLijn</FormalSpec>
+<ReturnType>APPS.Halux.PPS.Document.ProductieDetailDocument.common.Inhoud.ProductDetailDataLijn</ReturnType>
+<Implementation><![CDATA[
+	If (##class(TECH.StringUtils).Contains(ProductDetailDataLijn.GeefKorttekst().GeefTekst(), "ZIF.80M7   GRI/MIT V1")) {
+		Set Tekst = ##class(APPS.common.Document.impl.TagBasedTekst).%New("Greep met meenemer")
+		Do ProductDetailDataLijn.ZetOmschrijving(Tekst)
+	}	
+	
+	#dim Korttekst As %String = ProductDetailDataLijn.GeefKorttekst().GeefTekst()
+	Set Korttekst = $E(Korttekst,1,7)_"<vhINVERS>"_$E(Korttekst,8,8)_"</vhINVERS>"_$E(Korttekst,9,*)
+	
+	Set Tekst = ##class(APPS.common.Document.impl.TagBasedTekst).%New(Korttekst)
+	Do ProductDetailDataLijn.ZetKorttekst(Tekst)
+	
+	Quit ProductDetailDataLijn
+]]></Implementation>
+</Method>
 </Class>