remove error message test console logs, update log level for broadcastall

emiMobileServer/Source/Ws.DataModel.pas

@@ -83,13 +83,13 @@ end;
 
 procedure TWsDataModel.BroadcastAll;
 begin
-  Logger.Log(3, 'WsDataModel: BroadcastAll initiated');
+  Logger.Log(5, 'WsDataModel: BroadcastAll initiated');
   try FBroadcast(BuildBadgeCountsJson);   except on E: Exception do Logger.Log(2, 'WsDataModel BADGE_COUNTS error: ' + E.Message); end;
   try FBroadcast(BuildUnitMapJson);       except on E: Exception do Logger.Log(2, 'WsDataModel UNIT_MAP error: '       + E.Message); end;
   try FBroadcast(BuildComplaintMapJson);  except on E: Exception do Logger.Log(2, 'WsDataModel COMPLAINT_MAP error: '  + E.Message); end;
   try FBroadcast(BuildUnitListJson);      except on E: Exception do Logger.Log(2, 'WsDataModel UNIT_LIST error: '      + E.Message); end;
   try FBroadcast(BuildComplaintListJson); except on E: Exception do Logger.Log(2, 'WsDataModel COMPLAINT_LIST error: ' + E.Message); end;
-  Logger.Log(3, 'WsDataModel: BroadcastAll end');
+  Logger.Log(5, 'WsDataModel: BroadcastAll end');
 end;
 
 function TWsDataModel.BuildBadgeCountsJson: string;

webEMIMobile/ConnectionModule.pas

@@ -80,12 +80,9 @@ procedure TDMConnection.InitApp(SuccessProc: TSuccessProc;
     if Config.WsUrl <> '' then
       FWsUrl := Config.WsUrl;
 
-    console.log('InitApp: opening AuthConnection');
-
     AuthConnection.Open(
       procedure
       begin
-        console.log('InitApp: AuthConnection opened');
         VerifyVersion(SuccessProc);
       end);
   end;
@@ -97,7 +94,6 @@ end;
 
 procedure TDMConnection.VerifyVersion(SuccessProc: TSuccessProc);
 begin
-  console.log('VerifyVersion: calling server');
   XDataWebClient1.Connection := AuthConnection;
 
   XDataWebClient1.RawInvoke('IAuthService.VerifyVersion', [clientVersion],
@@ -106,7 +102,6 @@ begin
       jsonResult: TJSObject;
       error: string;
     begin
-      console.log('VerifyVersion: response received');
       jsonResult := TJSObject(Response.Result);
 
       if Assigned(jsonResult) and jsonResult.HasOwnProperty('error') then
@@ -121,8 +116,7 @@ begin
     end,
     procedure(Error: TXDataClientError)
     begin
-      console.log('VerifyVersion ERROR: ' + Error.ErrorMessage);
-      TFViewErrorPage.Display('Unable to connect to the database.');
+      TFViewErrorPage.Display(Error.ErrorMessage);
     end);
 end;