Index: DOM/PM/impl/LBXLangtekstCreator.cls.xml
===================================================================
diff -u -r67959 -r67960
--- DOM/PM/impl/LBXLangtekstCreator.cls.xml	(.../LBXLangtekstCreator.cls.xml)	(revision 67959)
+++ DOM/PM/impl/LBXLangtekstCreator.cls.xml	(.../LBXLangtekstCreator.cls.xml)	(revision 67960)
@@ -190,7 +190,7 @@
 ]]></Implementation>
 </Method>
 
-<Method name="GeefKleurTiponBlumotion">
+<Method name="GeefKleurTiponBlumotionViaRol">
 <FormalSpec>BevatRolTOBEenheid:%Boolean,BevatRolTOBSetEenhedenEnMeenemers:%Boolean</FormalSpec>
 <Private>1</Private>
 <ReturnType>TECH.String</ReturnType>
@@ -206,7 +206,7 @@
 ]]></Implementation>
 </Method>
 
-<Method name="GeefKleurTiponBlumotionDotnetBased">
+<Method name="GeefKleurTiponBlumotionViaProductId">
 <FormalSpec>ProductId:%String</FormalSpec>
 <Private>1</Private>
 <ReturnType>TECH.String</ReturnType>
@@ -368,7 +368,7 @@
 			 Set Product = ##class(DOM.DomeinContext).Instance().GeefProductRolAPI().GeefAdministratiefProduct(ConcreetHalffabItem.GeefHalffab().GeefProductID())
 			
 			Set TOBTekst = TOBTekst _ " " _ $Extract(Product.GeefKorttekst(), 1, 7)
-			Set TOBTekst = TOBTekst _ " " _ ..GeefKleurTiponBlumotion(BevatRolTiponBlumotionEenheid, BevatRolTiponBlumotionSetEenhedenEnMeenemers)
+			Set TOBTekst = TOBTekst _ " " _ ..GeefKleurTiponBlumotionViaRol(BevatRolTiponBlumotionEenheid, BevatRolTiponBlumotionSetEenhedenEnMeenemers)
 		} Else {
 			Set GeleiderTekst = GeleiderTekst _ ..#KenmerkSeparator _ ##class(DOM.PM.enu.LBXGeleiderTechnologie).LogicalToDisplay(..IngegevenKenmerken.GeleiderTechnologie)
 		}
@@ -384,13 +384,13 @@
 				Set Product = ##class(DOM.DomeinContext).Instance().GeefProductRolAPI().GeefAdministratiefProduct(ConcreetHalffabItem.GeefHalffab().GeefProductID())
 				
 				Set TOBTekst = TOBTekst _ " " _ $Extract(Product.GeefKorttekst(), 1, 7)
-				Set TOBTekst = TOBTekst _ " " _ ..GeefKleurTiponBlumotion($$$False, IsTOBSetEenhedenEnMeenemersAanwezig)
+				Set TOBTekst = TOBTekst _ " " _ ..GeefKleurTiponBlumotionViaRol($$$False, IsTOBSetEenhedenEnMeenemersAanwezig)
 			} ElseIf IsTOBSetEenhedenEnMeenemersNietMeegeleverd {
 				#dim HalffabItem As APPS.PM.Maatwerk.dto.DotNet.VerwijderdHalffabItemParsedFromJson = ..GeefVerwijderdHalffab(..Enum.Rol.TiponBlumotionSetEenhedenEnMeenemers)
 				Set Product = ##class(DOM.DomeinContext).Instance().GeefProductRolAPI().GeefAdministratiefProduct(HalffabItem.ProductId)
 				
 				Set TOBTekst = TOBTekst _ " " _ $Extract(Product.GeefKorttekst(), 1, 7)
-				Set TOBTekst = TOBTekst _ " " _ ..GeefKleurTiponBlumotionDotnetBased(HalffabItem.ProductId)
+				Set TOBTekst = TOBTekst _ " " _ ..GeefKleurTiponBlumotionViaProductId(HalffabItem.ProductId)
 			}
 		} Else {
 			Set GeleiderTekst = GeleiderTekst _ ..#KenmerkSeparator _ ##class(DOM.PM.enu.LBXGeleiderTechnologie).LogicalToDisplay(..IngegevenKenmerken.GeleiderTechnologie)