Code changes to enable building in .NET

Author: SteveIves

SRC/LIBRARY/DepartmentSqlIO.dbl

@@ -2283,12 +2283,13 @@ GetExceptionDetails,
             begin
                 ;;Download the error file
                 data exceptionRecords, [#]string
+                data errorMessage, string
 
                 now = %datetime
                 writelog("Downloading remote exceptions data file")
                 writett("Downloading remote exceptions data file")
 
-                if (fsc.DownloadText(remoteExceptionsFile,exceptionRecords))
+                if (fsc.DownloadText(remoteExceptionsFile,exceptionRecords,errorMessage))
                 begin
                     data ex_ch, int
                     data exceptionRecord, string
@@ -2331,12 +2332,13 @@ GetExceptionDetails,
             begin
                 ;;Download the error file
                 data exceptionRecords, [#]string
+                data errorMessage, string
 
                 now = %datetime
                 writelog("Downloading remote exceptions log file")
                 writett("Downloading remote exceptions log file")
 
-                if (fsc.DownloadText(remoteExceptionsLog,exceptionRecords))
+                if (fsc.DownloadText(remoteExceptionsLog,exceptionRecords,errorMessage))
                 begin
                     data ex_ch, int
                     data exceptionRecord, string

SRC/LIBRARY/EmployeeSqlIO.dbl

@@ -2526,12 +2526,13 @@ GetExceptionDetails,
             begin
                 ;;Download the error file
                 data exceptionRecords, [#]string
+                data errorMessage, string
 
                 now = %datetime
                 writelog("Downloading remote exceptions data file")
                 writett("Downloading remote exceptions data file")
 
-                if (fsc.DownloadText(remoteExceptionsFile,exceptionRecords))
+                if (fsc.DownloadText(remoteExceptionsFile,exceptionRecords,errorMessage))
                 begin
                     data ex_ch, int
                     data exceptionRecord, string
@@ -2574,12 +2575,13 @@ GetExceptionDetails,
             begin
                 ;;Download the error file
                 data exceptionRecords, [#]string
+                data errorMessage, string
 
                 now = %datetime
                 writelog("Downloading remote exceptions log file")
                 writett("Downloading remote exceptions log file")
 
-                if (fsc.DownloadText(remoteExceptionsLog,exceptionRecords))
+                if (fsc.DownloadText(remoteExceptionsLog,exceptionRecords,errorMessage))
                 begin
                     data ex_ch, int
                     data exceptionRecord, string