Index: DOM/VKP/impl/EindPersonalityBepaler.cls.xml
===================================================================
diff -u -r71650 -r71661
--- DOM/VKP/impl/EindPersonalityBepaler.cls.xml	(.../EindPersonalityBepaler.cls.xml)	(revision 71650)
+++ DOM/VKP/impl/EindPersonalityBepaler.cls.xml	(.../EindPersonalityBepaler.cls.xml)	(revision 71661)
@@ -48,29 +48,6 @@
 ]]></Implementation>
 </Method>
 
-<Method name="GeefPersonalityIdOpNiveau">
-<FormalSpec>OorsprongKettingString:%String,Niveau:%Integer,FallBackPersonalityId:%String=""</FormalSpec>
-<ReturnType>%String</ReturnType>
-<Implementation><![CDATA[
-	#dim PersonalityId As %String
-	
-	If (OorsprongKettingString = "") {
-		Set PersonalityId = FallBackPersonalityId
-	} Else {
-		Try {
-			#dim OorsprongKetting As %List = ..GeefOorsprongKettingLijst(OorsprongKettingString)
-			Set PersonalityId = $Piece($List(OorsprongKetting, $ListLength(OorsprongKetting) - Niveau),",", 1)
-		} Catch {
-			#dim Exception As TECH.Exceptions.Exception = ##class(TECH.ExceptionHandler).Catch()
-			Do ##class(vhLib.Logger).%New().Warning("EindPersonalityBepaler","Er was een probleem met het verwerken van oorsprongketting '"_OorsprongKettingString_"'")
-			Do ##class(TECH.ExceptionHandler).Rethrow(Exception)
-		}
-	}
-	
-	Quit PersonalityId
-]]></Implementation>
-</Method>
-
 <Method name="GeefFallBackPersonality">
 <FormalSpec>FallBackKlantId:%String</FormalSpec>
 <Private>1</Private>