Index: DOM/PARTIJ/LegacyPartijAPI.cls.xml
===================================================================
diff -u -r29059 -r38756
--- DOM/PARTIJ/LegacyPartijAPI.cls.xml	(.../LegacyPartijAPI.cls.xml)	(revision 29059)
+++ DOM/PARTIJ/LegacyPartijAPI.cls.xml	(.../LegacyPartijAPI.cls.xml)	(revision 38756)
@@ -18,6 +18,12 @@
 <ReturnType>DOM.common.PartijID</ReturnType>
 </Method>
 
+<Method name="IsKlantPartijID">
+<Abstract>1</Abstract>
+<FormalSpec>KlantNummer:%String</FormalSpec>
+<ReturnType>%Boolean</ReturnType>
+</Method>
+
 <Method name="GeefLeverancierNummerVoorPartijID">
 <Abstract>1</Abstract>
 <FormalSpec>PartijID:DOM.common.PartijID</FormalSpec>
Index: vhTest/Mock/DOM/PARTIJ/LegacyPartijAPI.cls.xml
===================================================================
diff -u -r29059 -r38756
--- vhTest/Mock/DOM/PARTIJ/LegacyPartijAPI.cls.xml	(.../LegacyPartijAPI.cls.xml)	(revision 29059)
+++ vhTest/Mock/DOM/PARTIJ/LegacyPartijAPI.cls.xml	(.../LegacyPartijAPI.cls.xml)	(revision 38756)
@@ -52,6 +52,13 @@
 <Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefLeverancierPartijID",LeverancierNr)
 ]]></Implementation>
 </Method>
+
+<Method name="IsKlantPartijID">
+<FormalSpec>KlantNummer:%String</FormalSpec>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("IsKlantPartijID",KlantNummer)
+]]></Implementation>
+</Method>
 </Class>
 
 
Index: DOM/PARTIJ/impl/LegacyPartijAPI.cls.xml
===================================================================
diff -u -r29059 -r38756
--- DOM/PARTIJ/impl/LegacyPartijAPI.cls.xml	(.../LegacyPartijAPI.cls.xml)	(revision 29059)
+++ DOM/PARTIJ/impl/LegacyPartijAPI.cls.xml	(.../LegacyPartijAPI.cls.xml)	(revision 38756)
@@ -3,7 +3,7 @@
 <Class name="DOM.PARTIJ.impl.LegacyPartijAPI">
 <ClassType/>
 <ProcedureBlock>1</ProcedureBlock>
-<Super>DOM.PARTIJ.LegacyPartijAPI,%RegisteredObject</Super>
+<Super>DOM.PARTIJ.LegacyPartijAPI,TECH.RegisteredObject</Super>
 <Inheritance>right</Inheritance>
 
 <Method name="GeefKlantNummerVoorPartijID">
@@ -20,6 +20,13 @@
 ]]></Implementation>
 </Method>
 
+<Method name="IsKlantPartijID">
+<FormalSpec>KlantNummer:%String</FormalSpec>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	Quit $$$StartsWithVar(KlantNummer, "K||")
+]]></Implementation>
+</Method>
+
 <Method name="GeefLeverancierNummerVoorPartijID">
 <FormalSpec>PartijID:DOM.common.PartijID</FormalSpec>
 <ReturnType>%String</ReturnType>
Index: vhUnitTest/DOM/PARTIJ/impl/TestLegacyPartijAPI.cls.xml
===================================================================
diff -u -r29059 -r38756
--- vhUnitTest/DOM/PARTIJ/impl/TestLegacyPartijAPI.cls.xml	(.../TestLegacyPartijAPI.cls.xml)	(revision 29059)
+++ vhUnitTest/DOM/PARTIJ/impl/TestLegacyPartijAPI.cls.xml	(.../TestLegacyPartijAPI.cls.xml)	(revision 38756)
@@ -10,11 +10,6 @@
 ]]></Implementation>
 </Method>
 
-<Method name="TestGeefKlantPartijID">
-<Implementation><![CDATA[	do $$$AssertEquals(##class(DOM.PARTIJ.impl.LegacyPartijAPI).%New().GeefKlantPartijID(1000),"K||1000")
-]]></Implementation>
-</Method>
-
 <Method name="TestGeefLeverancierNummerVoorPartijID">
 <Implementation><![CDATA[
 	#dim PartijID As %String = ##class(DOM.AKP.enu.Leverancier).Blum()
@@ -37,6 +32,21 @@
 	do $$$AssertEquals(##class(DOM.PARTIJ.impl.LegacyPartijAPI).%New().GeefLeverancierIndexKLE(PartijID),"BLUMJULIUSGMBH 5005")
 ]]></Implementation>
 </Method>
+
+<Method name="Test: GeefKlantPartijID geeft K1000 voor klantnummer 1000">
+<Implementation><![CDATA[	do $$$AssertEquals(##class(DOM.PARTIJ.impl.LegacyPartijAPI).%New().GeefKlantPartijID(1000),"K||1000")
+]]></Implementation>
+</Method>
+
+<Method name="Test: IsKlantPartijID is false voor klantnummer 1000">
+<Implementation><![CDATA[	do $$$AssertFalse(##class(DOM.PARTIJ.impl.LegacyPartijAPI).%New().IsKlantPartijID(1000))
+]]></Implementation>
+</Method>
+
+<Method name="Test: IsKlantPartijID is true voor klantnummer K1000">
+<Implementation><![CDATA[	do $$$AssertTrue(##class(DOM.PARTIJ.impl.LegacyPartijAPI).%New().IsKlantPartijID("K||1000"))
+]]></Implementation>
+</Method>
 </Class>