Index: APPS/Halux/PPS/Document/ProductieDetailDocument/impl/common/BladInhoudBuilderTemplate/DataLijnVisitor.cls.xml
===================================================================
diff -u -r70253 -r70288
--- APPS/Halux/PPS/Document/ProductieDetailDocument/impl/common/BladInhoudBuilderTemplate/DataLijnVisitor.cls.xml	(.../DataLijnVisitor.cls.xml)	(revision 70253)
+++ APPS/Halux/PPS/Document/ProductieDetailDocument/impl/common/BladInhoudBuilderTemplate/DataLijnVisitor.cls.xml	(.../DataLijnVisitor.cls.xml)	(revision 70288)
@@ -145,12 +145,10 @@
 <FormalSpec>Item:DOM.PM.Maatwerk.Calc.HF.ConcreetHalffabItem</FormalSpec>
 <Private>1</Private>
 <Implementation><![CDATA[
-	Set ..Afmetingen=""
+	Set ..Afmetingen = ""
 
-	;If Item.OpnemenInEindproduct { ... }
+	Set ..Omschrijving = Item.GeefOmschrijvingVoorDocs()
 
-	Set ..Omschrijving=Item.GeefOmschrijvingVoorDocs()
-
 	Do ..ZetAantallenInfo(Item.Aantal)    ; ##class(DOM.PM.Maatwerk.Calc.HF.HalffabItemUtils).GeefAantalProductenOpgenomenInEindproduct(Item)
 
 	If $IsObject(Item.GeefHalffab())&&($L(Item.GeefHalffab().GeefProductID())) {
@@ -160,10 +158,9 @@
 	Set ..ProductId = Item.GeefHalffab().GeefProductID()
 	
 	If (##class(TECH.StringUtils).StartsWith(Item.GeefVolledigeRolNaam(), "MVX.Boxcap")) {
-		Set ..Omschrijving = ##class(TECH.StringUtils).Replace(..Omschrijving, "li+re", "Links")
-		Do ..VoegToeDetailLijn()
+		#dim OorspronkelijkeOmschrijving As TECH.String = ..Omschrijving
 		
-		Set ..Omschrijving = ##class(TECH.StringUtils).Replace(..Omschrijving, "Links", "Rechts")
+		Do ..SplitsLinksRechtsInAparteDetailLijnen(OorspronkelijkeOmschrijving)
 	}
 ]]></Implementation>
 </Method>
@@ -204,6 +201,18 @@
 ]]></Implementation>
 </Method>
 
+<Method name="SplitsLinksRechtsInAparteDetailLijnen">
+<FormalSpec>OorspronkelijkeOmschrijving:TECH.String</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	Set ..Omschrijving = ##class(TECH.StringUtils).Replace(OorspronkelijkeOmschrijving, "li+re", "Links")
+	Do ..VoegToeDetailLijn()
+	
+	Set ..Omschrijving = ##class(TECH.StringUtils).Replace(OorspronkelijkeOmschrijving, "li+re", "Rechts")
+	; Hier hoeft geen 'VoegToeDetailLijn' te komen sinds dit verderop in method 'VerwerkStandaardHalffabItem' wordt gedaan
+]]></Implementation>
+</Method>
+
 <Method name="VoegToeDetailLijn">
 <Private>1</Private>
 <Implementation><![CDATA[	Do ..DetailLijnen.Insert( ..InhoudBuilder.MaakDataLijn(..Omschrijving,..Afmetingen,..GeefAantallenInfo(),..Korttekst, ..ProductId) )