Index: DOM/VKP/impl/DataM/DataMBon.cls.xml
===================================================================
diff -u -r29059 -r49015
--- DOM/VKP/impl/DataM/DataMBon.cls.xml	(.../DataMBon.cls.xml)	(revision 29059)
+++ DOM/VKP/impl/DataM/DataMBon.cls.xml	(.../DataMBon.cls.xml)	(revision 49015)
@@ -26,7 +26,7 @@
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
 <Implementation><![CDATA[
-	Set ..KlantNr = $P(^KU1(BonNummer,FacturatieSoort),"\")
+	Set ..KlantNr = $P(^KU1(BonNummer,"F"),"\")
 	Set ..FacturatieSoort = FacturatieSoort
 	Set ..BonNr = BonNummer
 	Quit ##super(BonNummer)