Index: APPS/StockBeheer/impl/TAORPlatenMagazijn.cls.xml
===================================================================
diff -u -r45890 -r60690
--- APPS/StockBeheer/impl/TAORPlatenMagazijn.cls.xml	(.../TAORPlatenMagazijn.cls.xml)	(revision 45890)
+++ APPS/StockBeheer/impl/TAORPlatenMagazijn.cls.xml	(.../TAORPlatenMagazijn.cls.xml)	(revision 60690)
@@ -20,7 +20,7 @@
 </Property>
 
 <Parameter name="EmailAdres">
-<Default>vdr@vanhoecke.be;Planning_Halux@halux.be</Default>
+<Default>vdr@vanhoecke.be;Jonas.VanLaere@halux.be;Planning_Halux@halux.be</Default>
 </Parameter>
 
 <Method name="%OnNew">
@@ -112,8 +112,9 @@
 	Set Body=Body_"Voorraad aanpassingen:"_$$$CRLF
 	Set Body= Body_..CorrectiesMailBody
 	
-	#Dim To as %List = $LB(..#EmailAdres)
-	#Dim Status as %Status = $$SendMiniMail^vhLib.Mail($$$SystemMail("system"),To,"Winstore : Voorraad aanpassingen",Body)
+	#dim lbTo as %List = $LB(..#EmailAdres)
+	#dim Status as %Status = $$SendMiniMail^vhLib.Mail($$$SystemMail("system"),lbTo,"Winstore : Voorraad aanpassingen",Body)
+	Do ##class(TECH.Exceptions.StatusException).ThrowIndienNietOK(Status,"Kon mail 'TAORPlatenMagazijn' niet verzenden.")
 ]]></Implementation>
 </Method>
 </Class>