Index: vhUnitTest/DOM/common/impl/PersonalityService/MagOrgaluxVerkopen/Test.cls.xml
===================================================================
diff -u -r64404 -r64502
--- vhUnitTest/DOM/common/impl/PersonalityService/MagOrgaluxVerkopen/Test.cls.xml	(.../Test.cls.xml)	(revision 64404)
+++ vhUnitTest/DOM/common/impl/PersonalityService/MagOrgaluxVerkopen/Test.cls.xml	(.../Test.cls.xml)	(revision 64502)
@@ -11,7 +11,7 @@
 	#dim PersonalityIterator as TECH.Iterator = ##class(DOM.common.enu.Personality).ValueListIterator()
 	While PersonalityIterator.HasNext(){
 		#dim PersonalityID as %String = PersonalityIterator.Next()
-		if ##class(TECH.StringUtils).Equals(PersonalityID,Personality.SFS,Personality.OPO,Personality.HaefeleDE,Personality.HaefeleSE,Personality.HaefeleFI,,Personality.HaefeleAT,Personality.HaefeleIT,Personality.HaefeleNL,Personality.Kisch) {
+		if ##class(TECH.StringUtils).Equals(PersonalityID,Personality.SFS,Personality.OPO,Personality.HaefeleDE,Personality.HaefeleSE,Personality.HaefeleFI,,Personality.HaefeleAT,Personality.HaefeleIT,Personality.HaefeleNL,Personality.Kisch,Personality.HaefeleBE) {
 			Do $$$AssertTrue(Service.MagOrgaluxVerkopen(PersonalityID))
 		} else {
 			Do $$$AssertFalse(Service.MagOrgaluxVerkopen(PersonalityID))
Index: DOM/common/impl/PersonalityService.cls.xml
===================================================================
diff -u -r64404 -r64502
--- DOM/common/impl/PersonalityService.cls.xml	(.../PersonalityService.cls.xml)	(revision 64404)
+++ DOM/common/impl/PersonalityService.cls.xml	(.../PersonalityService.cls.xml)	(revision 64502)
@@ -149,6 +149,7 @@
 	Quit:(PersonalityID = Personality.HaefeleSE) $$$True
 	Quit:(PersonalityID = Personality.HaefeleFI) $$$True
 	Quit:(PersonalityID = Personality.HaefeleNL) $$$True
+	Quit:(PersonalityID = Personality.HaefeleBE) $$$True
 	Quit:(PersonalityID = Personality.HaefeleIT) $$$True
 	Quit:(PersonalityID = Personality.HaefeleAT) $$$True