Index: WSimpl/Vhisie4/OPC/OPCService/OPCKenmerkenConverter/BlumKenmerkNaarWinkelkarLijnInfoConverter.cls.xml
===================================================================
diff -u -r69639 -r69641
--- WSimpl/Vhisie4/OPC/OPCService/OPCKenmerkenConverter/BlumKenmerkNaarWinkelkarLijnInfoConverter.cls.xml	(.../BlumKenmerkNaarWinkelkarLijnInfoConverter.cls.xml)	(revision 69639)
+++ WSimpl/Vhisie4/OPC/OPCService/OPCKenmerkenConverter/BlumKenmerkNaarWinkelkarLijnInfoConverter.cls.xml	(.../BlumKenmerkNaarWinkelkarLijnInfoConverter.cls.xml)	(revision 69641)
@@ -3,6 +3,11 @@
 <Class name="WSimpl.Vhisie4.OPC.OPCService.OPCKenmerkenConverter.BlumKenmerkNaarWinkelkarLijnInfoConverter">
 <Super>TECH.Mockable</Super>
 
+<Property name="Vertaler">
+<Type>DOM.common.Transl.Vertaler</Type>
+<Private>1</Private>
+</Property>
+
 <Parameter name="WinkelkarInfoPrefix">
 <Type>%String</Type>
 <Default>Data.Lijn.Winkelkarinfo</Default>
@@ -13,6 +18,20 @@
 <Default>Onvertaalbaar kenmerk</Default>
 </Parameter>
 
+<Method name="%OnNew">
+<FormalSpec>Vertaler:DOM.common.Transl.Vertaler=""</FormalSpec>
+<Private>1</Private>
+<ProcedureBlock>1</ProcedureBlock>
+<ReturnType>%Status</ReturnType>
+<ServerOnly>1</ServerOnly>
+<Implementation><![CDATA[
+	#dim VertaalGroepen As %ListOfDataTypes = ##class(TECH.ListUtils).CreateListOfDataTypes(##class(DOM.common.Transl.enu.VertaalGroep).TechnischeTermen())
+	Set ..Vertaler = $$$Inject(Vertaler, ##class(DOM.common.Transl.impl.Vertaler).%New(VertaalGroepen))
+	
+	Quit $$$OK
+]]></Implementation>
+</Method>
+
 <Method name="ConverteerBlumKenmerkNaarWinkelkarLijnInfo">
 <FormalSpec>BlumKenmerk:WS.Vhisie4.OPC.dto.Kenmerk,Taal:DOM.enu.Taal,Index:%Integer</FormalSpec>
 <ReturnType>WS.Vhisie4.OPC.dto.Kenmerk</ReturnType>
@@ -105,10 +124,11 @@
 <Implementation><![CDATA[
 	Set Groepering = ##class(WS.Vhisie4.OPC.dto.Kenmerk).%New()
 	
-	#dim BlumGroepering As %String = ..GeefBlumKenmerk(KenmerkenIterator, "Name").Value
 	Set Groepering.Name = ..GeefGroeperingName(Index)
+	
+	#dim BlumGroepering As %String = ..GeefBlumKenmerk(KenmerkenIterator, "Name").Value
 	#dim ProductieWijze As %String = ##class(TECH.StringUtils).ToLower(..GeefBlumKenmerk(KenmerkenIterator, "service levels").Value)
-	Set Groepering.Value = ..GeefGroeperingValue(BlumGroepering, ProductieWijze)
+	Set Groepering.Value = ..GeefGroeperingValue(BlumGroepering, ProductieWijze, Taal)
 	
 	Quit Groepering
 ]]></Implementation>
@@ -123,14 +143,21 @@
 </Method>
 
 <Method name="GeefGroeperingValue">
-<FormalSpec>BlumGroepering:%String,ProductieWijze:%String</FormalSpec>
+<FormalSpec>BlumGroepering:%String,ProductieWijze:%String,Taal:DOM.enu.Taal</FormalSpec>
 <Private>1</Private>
 <ReturnType>%String</ReturnType>
 <Implementation><![CDATA[
 	#dim GroeperingValue As %String
 	#dim VariantEnToepassing, CorpusConstructie, Fronthoogte As %String
-	#dim ProductieWijzePrefix As %String = $Select(ProductieWijze = "assembled": "VOORGEMONTEERD", ProductieWijze = "components seized": "LOSSE COMPONENTEN OP MAAT", 1:"LOSSE COMPONENTEN")
+		
+	#dim ProductieWijzePrefix As %String = $Select(ProductieWijze = "assembled": ##class(DOM.PM.enu.RVGProductieWijze).LogicalToDisplay(##class(DOM.PM.enu.RVGProductieWijze).Voorgemonteerd()), 
+		ProductieWijze = "components seized": ##class(DOM.PM.enu.RVGProductieWijze).LogicalToDisplay(##class(DOM.PM.enu.RVGProductieWijze).LosseComponentenOpMaat()), 
+		1: ##class(DOM.PM.enu.RVGProductieWijze).LogicalToDisplay(##class(DOM.PM.enu.RVGProductieWijze).LosseComponenten()))
+			
+	#dim VertaaldeProductieWijze As %String = ..Vertaler.GeefVertaling(ProductieWijzePrefix, Taal)
+	Set VertaaldeProductieWijze = ##class(TECH.StringUtils).ToUpper(VertaaldeProductieWijze)
 	
+	
 	#dim GroeperingLijst As %ListOfDataTypes = ##class(TECH.ListUtils).PiecesToList(BlumGroepering, " | ")
 	If (GroeperingLijst.Count() >= 3) {
 		Set VariantEnToepassing = ##class(TECH.StringUtils).ToLower(GroeperingLijst.GetAt(1))
@@ -139,7 +166,7 @@
 		Set Fronthoogte = ##class(TECH.StringUtils).ToLower(GroeperingLijst.GetAt(3))
 		Set Fronthoogte = ##class(TECH.StringUtils).Replace(Fronthoogte, " = ", " ")
 		
-		Set GroeperingValue = ProductieWijzePrefix _ " - " _ VariantEnToepassing _ ", " _ CorpusConstructie _ ", " _ Fronthoogte
+		Set GroeperingValue = VertaaldeProductieWijze _ " - " _ VariantEnToepassing _ ", " _ CorpusConstructie _ ", " _ Fronthoogte
 	} Else {
 		Do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.InvalidInputException).%New("Property 'Name' werd niet of onvolledig ingevuld."))
 	}
Index: vhTest/Mock/WSimpl/Vhisie4/OPC/OPCService/OPCKenmerkenConverter/BlumKenmerkNaarWinkelkarLijnInfoConverter.cls.xml
===================================================================
diff -u -r69638 -r69641
--- vhTest/Mock/WSimpl/Vhisie4/OPC/OPCService/OPCKenmerkenConverter/BlumKenmerkNaarWinkelkarLijnInfoConverter.cls.xml	(.../BlumKenmerkNaarWinkelkarLijnInfoConverter.cls.xml)	(revision 69638)
+++ vhTest/Mock/WSimpl/Vhisie4/OPC/OPCService/OPCKenmerkenConverter/BlumKenmerkNaarWinkelkarLijnInfoConverter.cls.xml	(.../BlumKenmerkNaarWinkelkarLijnInfoConverter.cls.xml)	(revision 69641)
@@ -8,6 +8,13 @@
 <Super>WSimpl.Vhisie4.OPC.OPCService.OPCKenmerkenConverter.BlumKenmerkNaarWinkelkarLijnInfoConverter,Tools.Mock.MockClassBase</Super>
 <Inheritance>right</Inheritance>
 
+<Method name="%OnNew">
+<FormalSpec>Vertaler:DOM.common.Transl.Vertaler=""</FormalSpec>
+<ReturnType>%Status</ReturnType>
+<Implementation><![CDATA[	Quit $$$OK
+]]></Implementation>
+</Method>
+
 <Method name="ConverteerBlumKenmerkNaarWinkelkarLijnInfo">
 <FormalSpec>BlumKenmerk:WS.Vhisie4.OPC.dto.Kenmerk,Taal:DOM.enu.Taal,Index:%Integer</FormalSpec>
 <ReturnType>WS.Vhisie4.OPC.dto.Kenmerk</ReturnType>
Index: vhUnitTest/WSimpl/Vhisie4/OPC/OPCService/OPCKenmerkenConverter/BlumKenmerkNaarWinkelkarLijnInfoConverter/GeefGroepering/Test.cls.xml
===================================================================
diff -u -r69229 -r69641
--- vhUnitTest/WSimpl/Vhisie4/OPC/OPCService/OPCKenmerkenConverter/BlumKenmerkNaarWinkelkarLijnInfoConverter/GeefGroepering/Test.cls.xml	(.../Test.cls.xml)	(revision 69229)
+++ vhUnitTest/WSimpl/Vhisie4/OPC/OPCService/OPCKenmerkenConverter/BlumKenmerkNaarWinkelkarLijnInfoConverter/GeefGroepering/Test.cls.xml	(.../Test.cls.xml)	(revision 69641)
@@ -35,10 +35,16 @@
 	Do OPCKenmerkenRequest.BlumKenmerken.Insert(..GeefDummyKenmerk("Name", "REVEGO duo + duo | Zonder sokkel | Fronthoogte = 2104mm"))
 	#dim KenmerkenIterator As TECH.Iterator = ##class(TECH.ListIterator).%New(OPCKenmerkenRequest.BlumKenmerken)
 	
-	#dim Resultaat As WS.Vhisie4.OCC.dto.Kenmerk = ..Converter.GeefGroepering(KenmerkenIterator, ..#Index)
+	#dim VertalerMock As vhTest.Mock.DOM.common.Transl.Vertaler = ##class(vhTest.Mock.DOM.common.Transl.Vertaler).%New()
+	Do VertalerMock.VerwachtMethodCall("GeefVertaling", "LosseComponenten", "N", 0).DanReturn("Losse Componenten")
 	
+	Set Converter = ##class(WSimpl.Vhisie4.OPC.OPCService.OPCKenmerkenConverter.BlumKenmerkNaarWinkelkarLijnInfoConverter).%New(VertalerMock)
+	#dim Resultaat As WS.Vhisie4.OCC.dto.Kenmerk = Converter.GeefGroepering(KenmerkenIterator, ..#Index, "N")
+	
 	Do $$$AssertEquals(Resultaat.Name, VerwachteName)
 	Do $$$AssertEquals(Resultaat.Value, VerwachteValue)
+	
+	Do VertalerMock.Verifieer()
 ]]></Implementation>
 </Method>
 
@@ -51,7 +57,7 @@
 	#dim Substrings As %ListOfDataTypes = ##class(TECH.ListUtils).CreateListOfDataTypes("Property 'Name' werd niet of onvolledig ingevuld.")
 	Do ..ZetVerwachteExceptie(##class(Tools.Test.VerwachteExceptie).%New("TECH.Exceptions.InvalidInputException", Substrings))
 	
-	#dim Resultaat As WS.Vhisie4.OCC.dto.Kenmerk = ..Converter.GeefGroepering(KenmerkenIterator, ..#Index)
+	#dim Resultaat As WS.Vhisie4.OCC.dto.Kenmerk = ..Converter.GeefGroepering(KenmerkenIterator, ..#Index, "N")
 ]]></Implementation>
 </Method>
 
@@ -63,7 +69,7 @@
 	#dim Substrings As %ListOfDataTypes = ##class(TECH.ListUtils).CreateListOfDataTypes("Property 'Name' werd niet of onvolledig ingevuld.")
 	Do ..ZetVerwachteExceptie(##class(Tools.Test.VerwachteExceptie).%New("TECH.Exceptions.InvalidInputException", Substrings))
 	
-	#dim Resultaat As WS.Vhisie4.OCC.dto.Kenmerk = ..Converter.GeefGroepering(KenmerkenIterator, ..#Index)
+	#dim Resultaat As WS.Vhisie4.OCC.dto.Kenmerk = ..Converter.GeefGroepering(KenmerkenIterator, ..#Index, "N")
 ]]></Implementation>
 </Method>