FIX: dataSource error

Throw an error and exit from method when dataSource is not present

Author: Frisle

MDX2JSON/Utils.cls

@@ -573,8 +573,11 @@ ClassMethod AddWidget(sWidget As %String, sDashboard As %String, key As %String)
 		set tWidgets = ##class(%DeepSee.Dashboard.Widget).%New()
 		set st = ..UpdateWidget(tWidgets, sWidget)
 
-		$$$Insert(tDash.widgets, tWidgets)
-		do tDash.%Save()
+		if (st = $$$OK)
+		{
+			$$$Insert(tDash.widgets, tWidgets)
+			do tDash.%Save()
+		}
 
 	} else {		
 		// Edit exists widget				
@@ -596,7 +599,10 @@ ClassMethod AddWidget(sWidget As %String, sDashboard As %String, key As %String)
 		}
 		if (changed '= "") {
 			set st = ..UpdateWidget(changed, sWidget)
-			do tDash.%Save()	
+			if (st = $$$OK)
+			{
+				do tDash.%Save()	
+			}	
 		}
 	}