Index: vhTest/Utils/WS/Vhisie4/WinkelkarExport/dto/Winkelkar.cls.xml
===================================================================
diff -u -r50105 -r50231
--- vhTest/Utils/WS/Vhisie4/WinkelkarExport/dto/Winkelkar.cls.xml	(.../Winkelkar.cls.xml)	(revision 50105)
+++ vhTest/Utils/WS/Vhisie4/WinkelkarExport/dto/Winkelkar.cls.xml	(.../Winkelkar.cls.xml)	(revision 50231)
@@ -58,7 +58,7 @@
 	Set ProductLijn = ##class(WS.Vhisie4.WinkelkarExport.dto.ProductLijn).%New()
 	Set ProductLijn.Id = "64387353600001"
 	Set ProductLijn.Aantal = 10
-	Set ProductLijn.ProductId = "productnumber"
+	Set ProductLijn.ProductId = "identnumber"
 	Set ProductLijn.EenheidPrijs = 5.60
 	Set ProductLijn.TotaalPrijs = 56.00
 	Do Vhisie4Winkelkar.Lijnen.Insert(ProductLijn)
Index: vhUnitTest/APPS/Blum/impl/OnlineProductConfigurator/OPCWinkelkarNaarVhisie4WinkelkarConverteerder/Test.cls.xml
===================================================================
diff -u -r49683 -r50231
--- vhUnitTest/APPS/Blum/impl/OnlineProductConfigurator/OPCWinkelkarNaarVhisie4WinkelkarConverteerder/Test.cls.xml	(.../Test.cls.xml)	(revision 49683)
+++ vhUnitTest/APPS/Blum/impl/OnlineProductConfigurator/OPCWinkelkarNaarVhisie4WinkelkarConverteerder/Test.cls.xml	(.../Test.cls.xml)	(revision 50231)
@@ -58,6 +58,11 @@
 <Private>1</Private>
 </Property>
 
+<Property name="ProductIdConverterMock">
+<Type>vhTest.Mock.WSimpl.Vhisie4.ProductIdConverter</Type>
+<Private>1</Private>
+</Property>
+
 <Method name="OnBeforeOneTest">
 <FormalSpec>aTestName:%String</FormalSpec>
 <Implementation><![CDATA[
@@ -78,7 +83,9 @@
 	Set ..VerkoopPrijsAPIMock = ##class(vhTest.Mock.APPS.VKP.VerkoopPrijsAPI).%New()
 	Set ..ProductBepaler = ##class(vhTest.Mock.APPS.Blum.impl.OnlineProductConfigurator.ProductBepaler).%New()
 
-	Set ..Converteerder = ##class(APPS.Blum.impl.OnlineProductConfigurator.OPCWinkelkarNaarVhisie4WinkelkarConverteerder).%New(..SenderMock, ..DateTimeAPIMock, ..VerkoopPrijsAPIMock, ..ProductBepaler)
+	Set ..ProductIdConverterMock = ##class(vhTest.Mock.WSimpl.Vhisie4.ProductIdConverter).%New()
+
+	Set ..Converteerder = ##class(APPS.Blum.impl.OnlineProductConfigurator.OPCWinkelkarNaarVhisie4WinkelkarConverteerder).%New(..SenderMock, ..DateTimeAPIMock, ..VerkoopPrijsAPIMock, ..ProductBepaler, ..ProductIdConverterMock)
 ]]></Implementation>
 </Method>
 
@@ -94,6 +101,7 @@
 	Do ..ProductBepaler.VerwachtMethodCall("GeefProductNummer","identnumber","K||1234").DanReturn("productnumber")
 	Do ..KlantPrijsBepalerMock.VerwachtMethodCall("GeefPrijsInformatie", "productnumber", 10, ..CurrentDate).DanReturn(..PrijsInfo)
 	Do ..VerkoopPrijsAPIMock.VerwachtMethodCall("GeefKlantPrijsBepaler", ..VanHoeckeKlant.GeefID()).DanReturn(..KlantPrijsBepalerMock)
+	Do ..ProductIdConverterMock.VerwachtMethodCall("ConvertToIdentNummer","productnumber").DanReturn("identnumber")
 	
 	#dim IntractoID As %String = ..Converteerder.Converteer(..GeefcumulatedWinkelkar(), ..VanHoeckeKlant)
 	
@@ -104,6 +112,7 @@
 	Do ..DateTimeAPIMock.Verifieer()
 	Do ..VerkoopPrijsAPIMock.Verifieer()
 	Do ..KlantPrijsBepalerMock.Verifieer()
+	Do ..ProductIdConverterMock.Verifieer()
 ]]></Implementation>
 </Method>
 
@@ -119,7 +128,8 @@
 	Do ..ProductBepaler.VerwachtMethodCall("GeefProductNummer","identnumber","K||1234").DanReturn("productnumber")
 	Do ..KlantPrijsBepalerMock.VerwachtMethodCall("GeefPrijsInformatie", "productnumber", 10, ..CurrentDate).DanReturn(..PrijsInfo)
 	Do ..VerkoopPrijsAPIMock.VerwachtMethodCall("GeefKlantPrijsBepaler", ..VanHoeckeKlant.GeefID()).DanReturn(..KlantPrijsBepalerMock)
-
+	Do ..ProductIdConverterMock.VerwachtMethodCall("ConvertToIdentNummer","productnumber").DanReturn("identnumber")
+	
 	#dim IntractoID As %String = ..Converteerder.Converteer(Winkelkar, ..VanHoeckeKlant)
 	
 	Do $$$AssertEquals(IntractoID, ..Response.Winkelkar.IntractoId)
@@ -129,6 +139,7 @@
 	Do ..VerkoopPrijsAPIMock.Verifieer()
 	Do ..KlantPrijsBepalerMock.Verifieer()
 	Do ..ProductBepaler.Verifieer()
+	Do ..ProductIdConverterMock.Verifieer()
 ]]></Implementation>
 </Method>
 
@@ -163,6 +174,7 @@
 	Do ..ProductBepaler.IndienMethodCall("GeefProductNummer", $$$ElkeWaarde, $$$ElkeWaarde).DanReturn("productnumber")
 	Do ..KlantPrijsBepalerMock.IndienMethodCall("GeefPrijsInformatie", $$$ElkeWaarde, $$$ElkeWaarde, $$$ElkeWaarde).DanReturn(..PrijsInfo)
 	Do ..VerkoopPrijsAPIMock.IndienMethodCall("GeefKlantPrijsBepaler", $$$ElkeWaarde).DanReturn(..KlantPrijsBepalerMock)
+	Do ..ProductIdConverterMock.IndienMethodCall("ConvertToIdentNummer","productnumber").DanReturn("identnumber")
 
 	#dim Substrings = ##class(TECH.ListUtils).CreateListOfDataTypes("Blum OPC - Er is een fout opgetreden bij het bewaren van de winkelkar voor gebruiker dummy@dum.my!")
 	do ..ZetVerwachteExceptie(##class(Tools.Test.VerwachteExceptie).%New("TECH.Exceptions.InvalidInputException",Substrings))
Index: APPS/Blum/impl/OnlineProductConfigurator/OPCWinkelkarNaarVhisie4WinkelkarConverteerder.cls.xml
===================================================================
diff -u -r50105 -r50231
--- APPS/Blum/impl/OnlineProductConfigurator/OPCWinkelkarNaarVhisie4WinkelkarConverteerder.cls.xml	(.../OPCWinkelkarNaarVhisie4WinkelkarConverteerder.cls.xml)	(revision 50105)
+++ APPS/Blum/impl/OnlineProductConfigurator/OPCWinkelkarNaarVhisie4WinkelkarConverteerder.cls.xml	(.../OPCWinkelkarNaarVhisie4WinkelkarConverteerder.cls.xml)	(revision 50231)
@@ -63,8 +63,13 @@
 <Private>1</Private>
 </Property>
 
+<Property name="ProductIdConverter">
+<Type>WSimpl.Vhisie4.ProductIdConverter</Type>
+<Private>1</Private>
+</Property>
+
 <Method name="%OnNew">
-<FormalSpec>WinkelkarSender:WSimpl.Vhisie4.Winkelkar.WinkelkarExport.Sender,DateTimeAPI:TECH.DateTime.DateTimeAPI,VerkoopPrijsAPI:APPS.VKP.VerkoopPrijsAPI,ProductBepaler:APPS.Blum.impl.OnlineProductConfigurator.ProductBepaler</FormalSpec>
+<FormalSpec>WinkelkarSender:WSimpl.Vhisie4.Winkelkar.WinkelkarExport.Sender,DateTimeAPI:TECH.DateTime.DateTimeAPI,VerkoopPrijsAPI:APPS.VKP.VerkoopPrijsAPI,ProductBepaler:APPS.Blum.impl.OnlineProductConfigurator.ProductBepaler,ProductIdConverter:WSimpl.Vhisie4.ProductIdConverter</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
@@ -74,6 +79,8 @@
 	Set ..DateTimeAPI = $$$Inject(DateTimeAPI, ##class(TECH.Context).Instance().GeefDateTimeAPI())
 	Set ..VerkoopPrijsAPI = $$$Inject(VerkoopPrijsAPI, ##class(APPS.VKP.impl.VerkoopPrijsAPI).%New())
 	Set ..ProductBepaler = $$$Inject(ProductBepaler, ##class(APPS.Blum.impl.OnlineProductConfigurator.ProductBepaler).%New())
+	Set ..ProductIdConverter = $$$Inject(ProductIdConverter, ##class(WSimpl.Vhisie4.ProductIdConverter).%New())
+
 	Set ..FormatAPI = ##class(TECH.Context).Instance().GeefFormatAPI()
 	
 	Quit $$$OK
@@ -219,8 +226,9 @@
 		Set Vhisie4ProductLijn = ##class(WS.Vhisie4.WinkelkarExport.dto.ProductLijn).%New()
 		Set Vhisie4ProductLijn.Id = ..Vhisie4Winkelkar.Id _##class(TECH.StringUtils).AddLeadingChar(..LijnID,"0",4)
 		Set Vhisie4ProductLijn.Aantal = Aantal
-		Set Vhisie4ProductLijn.ProductId = ..ProductBepaler.GeefProductNummer(IdentNr, ..Klant.GeefID())
-		Set Vhisie4ProductLijn.EenheidPrijs = ..KlantPrijsBepaler.GeefPrijsInformatie(Vhisie4ProductLijn.ProductId, Aantal).PrijsInEuro
+		#dim ProductId As %String = ..ProductBepaler.GeefProductNummer(IdentNr, ..Klant.GeefID())
+		Set Vhisie4ProductLijn.ProductId = ..ProductIdConverter.ConvertToIdentNummer(ProductId)
+		Set Vhisie4ProductLijn.EenheidPrijs = ..KlantPrijsBepaler.GeefPrijsInformatie(ProductId, Aantal).PrijsInEuro
 		Set Vhisie4ProductLijn.TotaalPrijs = (Vhisie4ProductLijn.EenheidPrijs * Aantal)
 		Do ..Vhisie4Winkelkar.Lijnen.Insert(Vhisie4ProductLijn)
 	} catch {