Index: DOM/VKP/impl/DataM/DataMBonAbstract.cls.xml
===================================================================
diff -u -r29059 -r36446
--- DOM/VKP/impl/DataM/DataMBonAbstract.cls.xml	(.../DataMBonAbstract.cls.xml)	(revision 29059)
+++ DOM/VKP/impl/DataM/DataMBonAbstract.cls.xml	(.../DataMBonAbstract.cls.xml)	(revision 36446)
@@ -3,7 +3,7 @@
 <Class name="DOM.VKP.impl.DataM.DataMBonAbstract">
 <ClassType/>
 <ProcedureBlock>1</ProcedureBlock>
-<Super>DOM.VKP.Bon,%RegisteredObject</Super>
+<Super>DOM.VKP.Bon,TECH.RegisteredObject</Super>
 <Inheritance>right</Inheritance>
 
 <Property name="BonNummer">
@@ -318,6 +318,7 @@
 <Implementation><![CDATA[
 	#dim FactuurID As %String = ""
 	#dim ID As %String = $piece(^KU1(..BonNummer,"F"),"\",2)
+	Quit:$piece(^KU1(..BonNummer,"F"),"\",3)="P" ""
 	Set:(##class(DOM.DomeinContext).Instance().GeefOrderAPI().BestaatFactuur(ID)) FactuurID = ID
 	Quit FactuurID
 ]]></Implementation>
@@ -328,6 +329,7 @@
 <Implementation><![CDATA[
 	#dim ProformaID As %String = ""
 	#dim ID As %String = $piece(^KU1(..BonNummer,"F"),"\",2)
+	Quit:$piece(^KU1(..BonNummer,"F"),"\",3)'="P" ""
 	Set:(##class(DOM.DomeinContext).Instance().GeefOrderAPI().BestaatProforma(ID)) ProformaID = ID
 	Quit ProformaID
 ]]></Implementation>