Index: vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarExport/WinkelkarAanpasserFactory/GeefAanpasserTest.cls.xml
===================================================================
diff -u -r59056 -r59341
--- vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarExport/WinkelkarAanpasserFactory/GeefAanpasserTest.cls.xml	(.../GeefAanpasserTest.cls.xml)	(revision 59056)
+++ vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarExport/WinkelkarAanpasserFactory/GeefAanpasserTest.cls.xml	(.../GeefAanpasserTest.cls.xml)	(revision 59341)
@@ -52,6 +52,10 @@
 <Default>32903</Default>
 </Parameter>
 
+<Parameter name="HahleOyKlantNummer">
+<Default>19454</Default>
+</Parameter>
+
 <Parameter name="DummyKlantNummer">
 <Default>123</Default>
 </Parameter>
@@ -241,6 +245,15 @@
 	Do $$$AssertEquals(Aanpasser.%ClassName(1),##class(WSimpl.Vhisie4.Winkelkar.WinkelkarExport.WinkelkarAanpasser.Layer).%ClassName(1) )
 ]]></Implementation>
 </Method>
+
+<Method name="Test HahleOy personality VH">
+<Implementation><![CDATA[
+	Set WinkelkarAanpasserFactory = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarExport.WinkelkarAanpasserFactory).%New()
+	
+	#Dim Aanpasser as WSimpl.Vhisie4.Winkelkar.WinkelkarExport.WinkelkarAanpasser = WinkelkarAanpasserFactory.GeefWinkelkarAanpasser(..Personality.VanHoecke,..#HahleOyKlantNummer)
+	Do $$$AssertEquals(Aanpasser.%ClassName(1),##class(WSimpl.Vhisie4.Winkelkar.WinkelkarExport.WinkelkarAanpasser.HahleOy).%ClassName(1) )
+]]></Implementation>
+</Method>
 </Class>
 
 
Index: WSimpl/Vhisie4/Winkelkar/WinkelkarExport/WinkelkarAanpasserFactory.cls.xml
===================================================================
diff -u -r59055 -r59341
--- WSimpl/Vhisie4/Winkelkar/WinkelkarExport/WinkelkarAanpasserFactory.cls.xml	(.../WinkelkarAanpasserFactory.cls.xml)	(revision 59055)
+++ WSimpl/Vhisie4/Winkelkar/WinkelkarExport/WinkelkarAanpasserFactory.cls.xml	(.../WinkelkarAanpasserFactory.cls.xml)	(revision 59341)
@@ -45,6 +45,7 @@
 		Quit:(KlantID=Klant.JBarth) ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarExport.WinkelkarAanpasser.JBarth).%New()
 		Quit:(KlantID=Klant.Kleiner) ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarExport.WinkelkarAanpasser.Kleiner).%New()
 		Quit:(KlantID=Klant.Layer) ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarExport.WinkelkarAanpasser.Layer).%New()
+		Quit:(KlantID=Klant.HahleOy) ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarExport.WinkelkarAanpasser.HahleOy).%New()
 		If (..ProjectSettings.IsDaroExcludeFromDeliveryEnabled()){
 			Quit:(KlantID = Klant.DaroFactors) ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarExport.WinkelkarAanpasser.Daro).%New()
 		}