Index: APPS/Halux/PPS/TBXZaag/impl/VerwijderBatch.cls.xml
===================================================================
diff -u -r2737 -r2817
--- APPS/Halux/PPS/TBXZaag/impl/VerwijderBatch.cls.xml	(.../VerwijderBatch.cls.xml)	(revision 2737)
+++ APPS/Halux/PPS/TBXZaag/impl/VerwijderBatch.cls.xml	(.../VerwijderBatch.cls.xml)	(revision 2817)
@@ -30,10 +30,12 @@
 <ClassMethod>1</ClassMethod>
 <Implementation><![CDATA[
 	Set Subscription = ##class(TECH.PubSub.EventSubscription).%New("BatchRemovedEvent",..%ClassName(1),"BatchWerdVerwijderdCatch")
-	Do Subscription.%Save()
+	Set sc=Subscription.%Save()
+	Write:$$$ISERR(sc) "subsription save error"_$$ParseStatus^vhLib(sc)
 
 	Set Subscription = ##class(TECH.PubSub.EventSubscription).%New("BatchHergeopendEvent",..%ClassName(1),"BatchHergeopendCatch")
-	Do Subscription.%Save()
+	Set sc=Subscription.%Save()
+	Write:$$$ISERR(sc) "subsription save error"_$$ParseStatus^vhLib(sc)
 ]]></Implementation>
 </Method>