Index: vhUnitTest/DOM/common/impl/PersonalityService/IsRechtstreekseLeveringDoorVanHoeckeAanKlantVanHandel/Test.cls.xml
===================================================================
diff -u -r53790 -r55903
--- vhUnitTest/DOM/common/impl/PersonalityService/IsRechtstreekseLeveringDoorVanHoeckeAanKlantVanHandel/Test.cls.xml	(.../Test.cls.xml)	(revision 53790)
+++ vhUnitTest/DOM/common/impl/PersonalityService/IsRechtstreekseLeveringDoorVanHoeckeAanKlantVanHandel/Test.cls.xml	(.../Test.cls.xml)	(revision 55903)
@@ -37,6 +37,13 @@
 	Do $$$AssertTrue(Service.IsRechtstreekseLeveringDoorVanHoeckeAanKlantVanHandel(##class(DOM.common.enu.Personality).Zweygart()))
 ]]></Implementation>
 </Method>
+
+<Method name="Test: Dupont levert rechtstreeks">
+<Implementation><![CDATA[
+	Set Service = ##class(DOM.common.impl.PersonalityService).%New()
+	Do $$$AssertTrue(Service.IsRechtstreekseLeveringDoorVanHoeckeAanKlantVanHandel(##class(DOM.common.enu.Personality).Dupont()))
+]]></Implementation>
+</Method>
 </Class>
 
 
Index: DOM/common/impl/PersonalityService.cls.xml
===================================================================
diff -u -r53790 -r55903
--- DOM/common/impl/PersonalityService.cls.xml	(.../PersonalityService.cls.xml)	(revision 53790)
+++ DOM/common/impl/PersonalityService.cls.xml	(.../PersonalityService.cls.xml)	(revision 55903)
@@ -101,6 +101,7 @@
 	Quit:(PersonalityID = ##class(DOM.common.enu.Personality).Seefelder()) $$$True
 	Quit:(PersonalityID = ##class(DOM.common.enu.Personality).HaefeleNL()) $$$True
 	Quit:(PersonalityID = ##class(DOM.common.enu.Personality).Zweygart()) $$$True
+	Quit:(PersonalityID = ##class(DOM.common.enu.Personality).Dupont()) $$$True
 	Quit $$$False
 ]]></Implementation>
 </Method>