Index: DOM/PM/impl/DataM/DataMMaatwerkProduct.cls.xml
===================================================================
diff -u -r67637 -r67644
--- DOM/PM/impl/DataM/DataMMaatwerkProduct.cls.xml	(.../DataMMaatwerkProduct.cls.xml)	(revision 67637)
+++ DOM/PM/impl/DataM/DataMMaatwerkProduct.cls.xml	(.../DataMMaatwerkProduct.cls.xml)	(revision 67644)
@@ -29,9 +29,7 @@
 	}
 	
 	If (BerekeningsSpecificatie = "") {
-		Set Exception = ##class(TECH.Exceptions.AbstractOmschrijvingException).%New("Geen berekeningspecificatie gevonden voor product '" _ PRNr _ "'")	
-		Set Logger = ##class(vhLib.Logger).%New("DataM.DataMMaatwerkProduct")
-		Do Logger.Error("Geen BerekeningSpecificatie gevonden voor product '" _ PRNr _ "'")
+		Set Exception = ##class(TECH.Exceptions.AbstractOmschrijvingException).%New("Geen BerekeningSpecificatie gevonden voor product '" _ PRNr _ "'")	
 		Do ##class(TECH.ExceptionHandler).Throw(Exception)
 	}
 	
Index: DOM/PM/impl/DataM/DataMProductRepository.cls.xml
===================================================================
diff -u -r65143 -r67644
--- DOM/PM/impl/DataM/DataMProductRepository.cls.xml	(.../DataMProductRepository.cls.xml)	(revision 65143)
+++ DOM/PM/impl/DataM/DataMProductRepository.cls.xml	(.../DataMProductRepository.cls.xml)	(revision 67644)
@@ -96,10 +96,18 @@
 	 If ($IsObject(ProductSpecificatie) && (ProductSpecificatie.%Id() '= "")) {
 	 	Do ##class(DOM.PM.Maatwerk.Calc.Common.ProductSpecificatie).%DeleteId(ProductSpecificatie.%Id())
 	 }
-	 #dim BerekeningsSpecificatie As DOM.PM.Maatwerk.Calc.Common.BerekeningsSpecificatie = Product.GeefBerekeningsSpecificatie()
-	 If ($IsObject(BerekeningsSpecificatie) && (BerekeningsSpecificatie.%Id() '= "")) {
-	 	Do ##class(DOM.PM.Maatwerk.Calc.Common.BerekeningsSpecificatie).%DeleteId(BerekeningsSpecificatie.%Id())
-	 }
+	 
+	 #dim BerekeningsSpecificatie As DOM.PM.Maatwerk.Calc.Common.BerekeningsSpecificatie = ""
+	 Try {
+		Set BerekeningsSpecificatie = Product.GeefBerekeningsSpecificatie()	
+		If (BerekeningsSpecificatie.%Id() '= "") {
+			Do ##class(DOM.PM.Maatwerk.Calc.Common.BerekeningsSpecificatie).%DeleteId(BerekeningsSpecificatie.%Id())
+		}
+	} Catch {
+		#dim Exception As TECH.Exceptions.Exception = ##class(TECH.ExceptionHandler).Catch()
+		Set Logger = ##class(vhLib.Logger).%New("DataM.DataMProductRepository")
+		Do Logger.Error("Fout bij het verwijderen van de BerekeningSpecificatie. ", Exception)
+	}
  }
  ; Verwijderen Halux kenmerken
  Kill ^HADPR("P",PRNr)