Index: APPS/Blum/impl/OnlineProductConfigurator/OPCWinkelkarNaarVhisie4WinkelkarConverteerder.cls.xml
===================================================================
diff -u -r41963 -r49683
--- APPS/Blum/impl/OnlineProductConfigurator/OPCWinkelkarNaarVhisie4WinkelkarConverteerder.cls.xml	(.../OPCWinkelkarNaarVhisie4WinkelkarConverteerder.cls.xml)	(revision 41963)
+++ APPS/Blum/impl/OnlineProductConfigurator/OPCWinkelkarNaarVhisie4WinkelkarConverteerder.cls.xml	(.../OPCWinkelkarNaarVhisie4WinkelkarConverteerder.cls.xml)	(revision 49683)
@@ -14,7 +14,7 @@
 </Property>
 
 <Property name="Vhisie4Winkelkar">
-<Type>WS.Vhisie4.Winkelkar.dto.Winkelkar</Type>
+<Type>WS.Vhisie4.WinkelkarExport.dto.Winkelkar</Type>
 <Private>1</Private>
 </Property>
 
@@ -116,11 +116,11 @@
 <Method name="MaakVhisie4Winkelkar">
 <Private>1</Private>
 <Implementation><![CDATA[
-	Set ..Vhisie4Winkelkar = ##class(WS.Vhisie4.Winkelkar.dto.Winkelkar).%New()
+	Set ..Vhisie4Winkelkar = ##class(WS.Vhisie4.WinkelkarExport.dto.Winkelkar).%New()
 	Set ..Vhisie4Winkelkar.Id = $REPLACE(..DateTimeAPI.CurrentHorolog(),",","")
 	Set ..Vhisie4Winkelkar.KlantId = ..Klant.GeefCode()
 	Set ..Vhisie4Winkelkar.Referentie = "Blum OPC " _..Winkelkar.userName _" " _..FormatAPI.FormatDate(..DateTimeAPI.CurrentDate(),"DD/MM/JJ")
-	Set ..Vhisie4Winkelkar.CommissieReferentie = ""
+	Set ..Vhisie4Winkelkar.PersonalityId = ""
 ]]></Implementation>
 </Method>
 
@@ -216,7 +216,7 @@
 <Implementation><![CDATA[
 	Set ..LijnID = ..LijnID + 1
 	Try {
-		Set Vhisie4ProductLijn = ##class(WS.Vhisie4.Winkelkar.dto.ProductLijn).%New()
+		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())
Index: vhTest/Utils/WS/Vhisie4/WinkelkarExport/dto/Winkelkar.cls.xml
===================================================================
diff -u -r42468 -r49683
--- vhTest/Utils/WS/Vhisie4/WinkelkarExport/dto/Winkelkar.cls.xml	(.../Winkelkar.cls.xml)	(revision 42468)
+++ vhTest/Utils/WS/Vhisie4/WinkelkarExport/dto/Winkelkar.cls.xml	(.../Winkelkar.cls.xml)	(revision 49683)
@@ -45,6 +45,27 @@
 	quit Stream
 ]]></Implementation>
 </Method>
+
+<Method name="BLUMOPCWinkelkar">
+<ClassMethod>1</ClassMethod>
+<ReturnType>WS.Vhisie4.WinkelkarExport.dto.Winkelkar</ReturnType>
+<Implementation><![CDATA[
+	Set Vhisie4Winkelkar = ##class(WS.Vhisie4.WinkelkarExport.dto.Winkelkar).%New()
+	Set Vhisie4Winkelkar.Id = "6438735360"
+	Set Vhisie4Winkelkar.KlantId = "1234"
+	Set Vhisie4Winkelkar.Referentie = "Blum OPC dummy@dum.my 14/04/17"
+	
+	Set ProductLijn = ##class(WS.Vhisie4.WinkelkarExport.dto.ProductLijn).%New()
+	Set ProductLijn.Id = "64387353600001"
+	Set ProductLijn.Aantal = 10
+	Set ProductLijn.ProductId = "productnumber"
+	Set ProductLijn.EenheidPrijs = 5.60
+	Set ProductLijn.TotaalPrijs = 56.00
+	Do Vhisie4Winkelkar.Lijnen.Insert(ProductLijn)
+	
+	Quit Vhisie4Winkelkar
+]]></Implementation>
+</Method>
 </Class>
 
 
Index: vhUnitTest/APPS/Blum/impl/OnlineProductConfigurator/OPCWinkelkarNaarVhisie4WinkelkarConverteerder/Test.cls.xml
===================================================================
diff -u -r44536 -r49683
--- vhUnitTest/APPS/Blum/impl/OnlineProductConfigurator/OPCWinkelkarNaarVhisie4WinkelkarConverteerder/Test.cls.xml	(.../Test.cls.xml)	(revision 44536)
+++ vhUnitTest/APPS/Blum/impl/OnlineProductConfigurator/OPCWinkelkarNaarVhisie4WinkelkarConverteerder/Test.cls.xml	(.../Test.cls.xml)	(revision 49683)
@@ -69,7 +69,7 @@
 	Set ..PrijsInfo.PrijsInEuro = 5.60
 	
 	Set ..VanHoeckeKlant = ##class(vhTest.Utils.DOM.VKP.VanHoeckeKlant).StandaardKlant()
-	Set ..Vhisie4Winkelkar = ##class(vhTest.Utils.WS.Vhisie4.Winkelkar.dto.Winkelkar).BLUMOPCWinkelkar()
+	Set ..Vhisie4Winkelkar = ##class(vhTest.Utils.WS.Vhisie4.WinkelkarExport.dto.Winkelkar).BLUMOPCWinkelkar()
 	Set ..Response = ##class(WS.Vhisie4.WinkelkarExport.SendResponse).%New()
 	
 	Set ..SenderMock = ##class(vhTest.Mock.WSimpl.Vhisie4.Winkelkar.WinkelkarExport.Sender).%New()
@@ -99,11 +99,11 @@
 	
 	Do $$$AssertEquals(IntractoID, ..Response.Winkelkar.IntractoId)
 	
+	Do ..ProductBepaler.Verifieer()
 	Do ..SenderMock.Verifieer()
 	Do ..DateTimeAPIMock.Verifieer()
 	Do ..VerkoopPrijsAPIMock.Verifieer()
 	Do ..KlantPrijsBepalerMock.Verifieer()
-	Do ..ProductBepaler.Verifieer()
 ]]></Implementation>
 </Method>