Index: WSimpl/Vhisie4/OPC/OPCService/OPCKenmerkenConverter.cls.xml
===================================================================
diff -u -r68278 -r68293
--- WSimpl/Vhisie4/OPC/OPCService/OPCKenmerkenConverter.cls.xml	(.../OPCKenmerkenConverter.cls.xml)	(revision 68278)
+++ WSimpl/Vhisie4/OPC/OPCService/OPCKenmerkenConverter.cls.xml	(.../OPCKenmerkenConverter.cls.xml)	(revision 68293)
@@ -3,19 +3,36 @@
 <Class name="WSimpl.Vhisie4.OPC.OPCService.OPCKenmerkenConverter">
 <Super>TECH.Mockable</Super>
 
+<Property name="BlumNaarAXKenmerkenConverter">
+<Type>WSimpl.Vhisie4.OPC.OPCService.OPCKenmerkenConverter.BlumNaarAXKenmerkenConverter</Type>
+<Private>1</Private>
+</Property>
+
 <Property name="MeldingenAanGebruiker">
 <Type>TECH.String</Type>
 <Collection>list</Collection>
 </Property>
 
+<Method name="%OnNew">
+<FormalSpec>BlumNaarAXKenmerkenConverter:WSimpl.Vhisie4.OPC.OPCService.OPCKenmerkenConverter.BlumNaarAXKenmerkenConverter=""</FormalSpec>
+<Private>1</Private>
+<ProcedureBlock>1</ProcedureBlock>
+<ReturnType>%Status</ReturnType>
+<ServerOnly>1</ServerOnly>
+<Implementation><![CDATA[
+	Set ..BlumNaarAXKenmerkenConverter = $$$Inject(BlumNaarAXKenmerkenConverter, ##class(WSimpl.Vhisie4.OPC.OPCService.OPCKenmerkenConverter.BlumNaarAXKenmerkenConverter).%New())
+	
+	Quit $$$OK
+]]></Implementation>
+</Method>
+
 <Method name="ConverteerBlumKenmerkenNaarAXKenmerken">
 <FormalSpec>OPCKenmerkenRequest:WS.Vhisie4.OPC.GeefNaarAxGeconverteerdeKenmerkenRequest</FormalSpec>
 <ReturnType>WS.Vhisie4.OPC.GeefNaarAxGeconverteerdeKenmerkenResponse</ReturnType>
 <Implementation><![CDATA[
 	Set ..MeldingenAanGebruiker = ##class(%ListOfDataTypes).%New()
 	
 	#dim AXConfiguratieArray As %ArrayOfDataTypes = ##class(%ArrayOfDataTypes).%New()
-	#dim AXBomKenmerkenList As %ListOfObjects = ##class(%ListOfObjects).%New()
 	#dim KenmerkenIterator As TECH.Iterator = ##class(TECH.ListIterator).%New(OPCKenmerkenRequest.BlumKenmerken)
 	#dim IdentnummerIterator As TECH.Iterator = ##class(TECH.ListIterator).%New(OPCKenmerkenRequest.BlumIdentnummers)
 	#dim IsTestRequest As %Boolean = ..BevatKenmerkenIteratorKenmerk(KenmerkenIterator, "test")
@@ -24,7 +41,7 @@
 	If IsTestRequest {
 		Set AXConfiguratieArray = ..GeefTestAXConfiguratieArray()
 	} ElseIf (Variant = ##class(DOM.PM.enu.Variant).Revego()) {
-		
+		Do ..VertaalIdentnummers(OPCKenmerkenRequest.BlumIdentnummers, AXConfiguratieArray)
 	} Else {
 		#dim OPCKenmerkenRequestHeader As WS.Vhisie4.RequestHeader = OPCKenmerkenRequest.Header
 
@@ -97,6 +114,17 @@
 ]]></Implementation>
 </Method>
 
+<Method name="VertaalIdentnummers">
+<FormalSpec>IdentnummerLijst:%ListOfObjects,AXConfiguratieArray:%ArrayOfDataTypes</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	#dim VertaaldeIdentnummers As WS.Vhisie4.OPC.dto.Kenmerk = ..BlumNaarAXKenmerkenConverter.ConverteerBlumIdentnummersNaarAxKenmerk(IdentnummerLijst)
+	If ($$$HasLength(VertaaldeIdentnummers.Value) && $$$HasLength(VertaaldeIdentnummers.Name)) {
+		Do AXConfiguratieArray.SetAt(VertaaldeIdentnummers.Value, VertaaldeIdentnummers.Name)
+	}
+]]></Implementation>
+</Method>
+
 <Method name="GeefTestAXConfiguratieArray">
 <Private>1</Private>
 <ReturnType>%ArrayOfDataTypes</ReturnType>
Index: vhTest/Mock/WSimpl/Vhisie4/OPC/OPCService/OPCKenmerkenConverter.cls.xml
===================================================================
diff -u -r68248 -r68293
--- vhTest/Mock/WSimpl/Vhisie4/OPC/OPCService/OPCKenmerkenConverter.cls.xml	(.../OPCKenmerkenConverter.cls.xml)	(revision 68248)
+++ vhTest/Mock/WSimpl/Vhisie4/OPC/OPCService/OPCKenmerkenConverter.cls.xml	(.../OPCKenmerkenConverter.cls.xml)	(revision 68293)
@@ -8,6 +8,13 @@
 <Super>WSimpl.Vhisie4.OPC.OPCService.OPCKenmerkenConverter,Tools.Mock.MockClassBase</Super>
 <Inheritance>right</Inheritance>
 
+<Method name="%OnNew">
+<FormalSpec>BlumNaarAXKenmerkenConverter:WSimpl.Vhisie4.OPC.OPCService.OPCKenmerkenConverter.BlumNaarAXKenmerkenConverter=""</FormalSpec>
+<ReturnType>%Status</ReturnType>
+<Implementation><![CDATA[	Quit $$$OK
+]]></Implementation>
+</Method>
+
 <Method name="ConverteerBlumKenmerkenNaarAXKenmerken">
 <FormalSpec>OPCKenmerkenRequest:WS.Vhisie4.OPC.GeefNaarAxGeconverteerdeKenmerkenRequest</FormalSpec>
 <ReturnType>WS.Vhisie4.OPC.GeefNaarAxGeconverteerdeKenmerkenResponse</ReturnType>
Index: vhTest/Fake/WSimpl/Vhisie4/OPC/OPCService/OPCKenmerkenConverter.cls.xml
===================================================================
diff -u -r68248 -r68293
--- vhTest/Fake/WSimpl/Vhisie4/OPC/OPCService/OPCKenmerkenConverter.cls.xml	(.../OPCKenmerkenConverter.cls.xml)	(revision 68248)
+++ vhTest/Fake/WSimpl/Vhisie4/OPC/OPCService/OPCKenmerkenConverter.cls.xml	(.../OPCKenmerkenConverter.cls.xml)	(revision 68293)
@@ -13,6 +13,20 @@
 <Implementation><![CDATA[	Quit ""
 ]]></Implementation>
 </Method>
+
+<Method name="VertaalIdentnummer">
+<FormalSpec>Identnummers:WS.Vhisie4.OPC.dto.Identnummer</FormalSpec>
+<ReturnType>WS.Vhisie4.OPC.dto.Identnummer</ReturnType>
+<Implementation><![CDATA[	Quit ""
+]]></Implementation>
+</Method>
+
+<Method name="VertaalKenmerk">
+<FormalSpec>BlumKenmerk:WS.Vhisie4.OPC.dto.Kenmerk</FormalSpec>
+<ReturnType>WS.Vhisie4.OPC.dto.Kenmerk</ReturnType>
+<Implementation><![CDATA[	Quit ""
+]]></Implementation>
+</Method>
 </Class>
 
 
Index: vhUnitTest/WSimpl/Vhisie4/OPC/OPCService/OPCKenmerkenConverter/Test.cls.xml
===================================================================
diff -u -r68278 -r68293
--- vhUnitTest/WSimpl/Vhisie4/OPC/OPCService/OPCKenmerkenConverter/Test.cls.xml	(.../Test.cls.xml)	(revision 68278)
+++ vhUnitTest/WSimpl/Vhisie4/OPC/OPCService/OPCKenmerkenConverter/Test.cls.xml	(.../Test.cls.xml)	(revision 68293)
@@ -8,19 +8,25 @@
 <Private>1</Private>
 </Property>
 
+<Property name="BlumNaarAxKenmerkenConverterMock">
+<Type>vhTest.Mock.WSimpl.Vhisie4.OPC.OPCService.OPCKenmerkenConverter.BlumNaarAXKenmerkenConverter</Type>
+<Private>1</Private>
+</Property>
+
 <Method name="OnBeforeOneTest">
 <FormalSpec>aTestName:%String</FormalSpec>
 <Implementation><![CDATA[
 	Do ##super(aTestName)
 	
 	Set ..OPCKenmerkenConverter = ##class(WSimpl.Vhisie4.OPC.OPCService.OPCKenmerkenConverter).%New()
+	Set ..BlumNaarAxKenmerkenConverterMock = ##class(vhTest.Mock.WSimpl.Vhisie4.OPC.OPCService.OPCKenmerkenConverter.BlumNaarAXKenmerkenConverter).%New()
 ]]></Implementation>
 </Method>
 
 <Method name="Test: Request met test-kenmerk geeft response met dummy kenmerken">
 <Implementation><![CDATA[
 	#dim VoegToeTestRequestKenmerk As %Boolean = $$$True
-	#dim OPCKenmerkenRequest As WS.Vhisie4.OPC.GeefNaarAxGeconverteerdeKenmerkenRequest = ..GeefRequestMetKenmerken(0, VoegToeTestRequestKenmerk)
+	#dim OPCKenmerkenRequest As WS.Vhisie4.OPC.GeefNaarAxGeconverteerdeKenmerkenRequest = ..GeefRequest(VoegToeTestRequestKenmerk)
 	#dim Resultaat As WS.Vhisie4.OPC.GeefNaarAxGeconverteerdeKenmerkenResponse = ..OPCKenmerkenConverter.ConverteerBlumKenmerkenNaarAXKenmerken(OPCKenmerkenRequest)
 	
 	Do $$$AssertEquals(Resultaat.AxKenmerken.Count(), 30)
@@ -59,7 +65,7 @@
 
 <Method name="Test: MeldingenAanGebruiker is leeg vanwege het kenmerk &apos;Programme&apos; = &apos;REVEGO&apos;">
 <Implementation><![CDATA[
-	#dim OPCKenmerkenRequest As WS.Vhisie4.OPC.GeefNaarAxGeconverteerdeKenmerkenRequest = ..GeefRequestMetKenmerken(1,$$$False,"REVEGO")
+	#dim OPCKenmerkenRequest As WS.Vhisie4.OPC.GeefNaarAxGeconverteerdeKenmerkenRequest = ..GeefRequest($$$False,"REVEGO")
 	
 	Set ..OPCKenmerkenConverter = ##class(WSimpl.Vhisie4.OPC.OPCService.OPCKenmerkenConverter).%New()
 	#dim Resultaat As WS.Vhisie4.OPC.GeefNaarAxGeconverteerdeKenmerkenResponse = ..OPCKenmerkenConverter.ConverteerBlumKenmerkenNaarAXKenmerken(OPCKenmerkenRequest)
@@ -70,7 +76,7 @@
 
 <Method name="Test: MeldingenAanGebruiker indien kenmerk Programme = leeg">
 <Implementation><![CDATA[
-	#dim OPCKenmerkenRequest As WS.Vhisie4.OPC.GeefNaarAxGeconverteerdeKenmerkenRequest = ..GeefRequestMetKenmerken(1,$$$False,"")
+	#dim OPCKenmerkenRequest As WS.Vhisie4.OPC.GeefNaarAxGeconverteerdeKenmerkenRequest = ..GeefRequest($$$False,"")
 	
 	Set ..OPCKenmerkenConverter = ##class(WSimpl.Vhisie4.OPC.OPCService.OPCKenmerkenConverter).%New()
 	#dim Resultaat As WS.Vhisie4.OPC.GeefNaarAxGeconverteerdeKenmerkenResponse = ..OPCKenmerkenConverter.ConverteerBlumKenmerkenNaarAXKenmerken(OPCKenmerkenRequest)
@@ -80,10 +86,10 @@
 ]]></Implementation>
 </Method>
 
-<Method name="Test: MeldingenAanGebruiker indien kenmerk Programme = NIET leeg MAAR ook NIET &apos;TANDEMBOX antaro&apos; of &apos;LEGRABOX&apos;">
+<Method name="Test: MeldingenAanGebruiker indien kenmerk Programme = NIET leeg MAAR ook NIET &apos;REVEGO&apos;">
 <Implementation><![CDATA[
 	#dim DummyVariant As %String = "DummyVariant"
-	#dim OPCKenmerkenRequest As WS.Vhisie4.OPC.GeefNaarAxGeconverteerdeKenmerkenRequest = ..GeefRequestMetKenmerken(1,$$$False, DummyVariant)
+	#dim OPCKenmerkenRequest As WS.Vhisie4.OPC.GeefNaarAxGeconverteerdeKenmerkenRequest = ..GeefRequest($$$False, DummyVariant)
 	
 	Set ..OPCKenmerkenConverter = ##class(WSimpl.Vhisie4.OPC.OPCService.OPCKenmerkenConverter).%New()
 	#dim Resultaat As WS.Vhisie4.OPC.GeefNaarAxGeconverteerdeKenmerkenResponse = ..OPCKenmerkenConverter.ConverteerBlumKenmerkenNaarAXKenmerken(OPCKenmerkenRequest)
@@ -93,8 +99,54 @@
 ]]></Implementation>
 </Method>
 
-<Method name="GeefRequestMetKenmerken">
-<FormalSpec>AantalKenmerken:%Integer,IsTestRequest:%Boolean=0,ValueKenmerkProgramme:%String="REVEGO"</FormalSpec>
+<Method name="Test: BomKenmerken wordt opgevuld indien identnummers aanwezig">
+<Implementation><![CDATA[
+	#dim DummyId As %String = "DummyId"
+	#dim DummyAantal As %Integer = 1
+	#dim AxBomKenmerkenNaam As %String = "Data.BomKenmerken.Stuklijst"
+	#dim AxBomKenmerkenValue As %String = DummyId _ ";" _ DummyAantal
+	
+	#dim OPCKenmerkenRequest As WS.Vhisie4.OPC.GeefNaarAxGeconverteerdeKenmerkenRequest = ..GeefRequest()
+	Set Identnummer = ##class(WS.Vhisie4.OPC.dto.Identnummer).%New()
+	Set Identnummer.Id = DummyId
+	Set Identnummer.Aantal = DummyAantal
+	Do OPCKenmerkenRequest.BlumIdentnummers.Insert(Identnummer)
+	
+	Set DummyVertaald = ##class(WS.Vhisie4.OPC.dto.Kenmerk).%New()
+	Set DummyVertaald.Name = AxBomKenmerkenNaam
+	Set DummyVertaald.Value = AxBomKenmerkenValue
+	
+	Do ..BlumNaarAxKenmerkenConverterMock.VerwachtMethodCall("ConverteerBlumIdentnummersNaarAxKenmerk", OPCKenmerkenRequest.BlumIdentnummers).DanReturn(DummyVertaald)
+	Set ..OPCKenmerkenConverter = ##class(WSimpl.Vhisie4.OPC.OPCService.OPCKenmerkenConverter).%New(..BlumNaarAxKenmerkenConverterMock)
+	#dim Resultaat As WS.Vhisie4.OPC.GeefNaarAxGeconverteerdeKenmerkenResponse = ..OPCKenmerkenConverter.ConverteerBlumKenmerkenNaarAXKenmerken(OPCKenmerkenRequest)
+	
+	Do ..BlumNaarAxKenmerkenConverterMock.Verifieer()
+	Do $$$AssertEquals(Resultaat.AxKenmerken.Count(), 1)
+	Do $$$AssertEquals(Resultaat.AxKenmerken.GetAt(AxBomKenmerkenNaam),AxBomKenmerkenValue)
+]]></Implementation>
+</Method>
+
+<Method name="Test: BomKenmerken leeg indien identnummers niet aanwezig">
+<Implementation><![CDATA[
+	#dim DummyId As %String = "DummyId"
+	#dim DummyAantal As %Integer = 1
+	#dim AxBomKenmerkenNaam As %String = "Data.BomKenmerken.Stuklijst"
+	#dim AxBomKenmerkenValue As %String = DummyId _ ";" _ DummyAantal
+	
+	#dim OPCKenmerkenRequest As WS.Vhisie4.OPC.GeefNaarAxGeconverteerdeKenmerkenRequest = ..GeefRequest()
+		
+	Set DummyVertaald = ##class(WS.Vhisie4.OPC.dto.Kenmerk).%New()
+	Do ..BlumNaarAxKenmerkenConverterMock.VerwachtMethodCall("ConverteerBlumIdentnummersNaarAxKenmerk", OPCKenmerkenRequest.BlumIdentnummers).DanReturn(DummyVertaald)
+	Set ..OPCKenmerkenConverter = ##class(WSimpl.Vhisie4.OPC.OPCService.OPCKenmerkenConverter).%New(..BlumNaarAxKenmerkenConverterMock)
+	#dim Resultaat As WS.Vhisie4.OPC.GeefNaarAxGeconverteerdeKenmerkenResponse = ..OPCKenmerkenConverter.ConverteerBlumKenmerkenNaarAXKenmerken(OPCKenmerkenRequest)
+	
+	Do ..BlumNaarAxKenmerkenConverterMock.Verifieer()
+	Do $$$AssertEquals(Resultaat.AxKenmerken.Count(), 0)
+]]></Implementation>
+</Method>
+
+<Method name="GeefRequest">
+<FormalSpec>IsTestRequest:%Boolean=0,ValueKenmerkProgramme:%String="REVEGO"</FormalSpec>
 <Private>1</Private>
 <ReturnType>WS.Vhisie4.OPC.GeefNaarAxGeconverteerdeKenmerkenRequest</ReturnType>
 <Implementation><![CDATA[
@@ -105,9 +157,7 @@
 		Set Kenmerk = ##class(WS.Vhisie4.OPC.dto.Kenmerk).%New()
 		Set Kenmerk.Name = "test"
 		Do BlumKenmerken.Insert(Kenmerk)
-	}
-	
-	If (AantalKenmerken > 0) {
+	} Else {
 		Do ..VoegToeVariantKenmerkInBlumKenmerkenLijst(BlumKenmerken, ValueKenmerkProgramme)
 	}