On 12/12/2018 12:05 PM, Robert Tulloch wrote:

On 12/12/2018 11:00 AM, Dimitry Sibiryakov sd@... [firebird-support] wrote:

12.12.2018 16:45, Robert Tulloch tultalk@... [firebird-support] wrote:

Interesting last message.

   Binaries are not allowed in this list. Use Ctrl-C to copy error message text and Ctrl-V 
to paste it into mail directly.
   If you use Windows command-line console, "select" and "copy" commands are in system menu.
   Code calling your SQL is useless for diagnostic UDF errors (unless this query is 
executed in isql w/o error). UDF code and its declaration are useful.

I did execute the statement in ISQL for testing (outside of my program) and got the error messages the image of which were deleted.


Error message when run from program in IDE
First chance exception at $7C812FD3 . Exception class EIBInterBaseError with message 'Unable to complete network request to host "ws1".
Error writing data to the connection.
An established connection was aborted by the software in your host machine.
'. Process IBConsole.exe ($A54)

Stepped to error block

function TIBTransaction.Call(ErrCode: ISC_STATUS;
  RaiseError: Boolean): ISC_STATUS;
var
  i: Integer;
begin
  result := ErrCode;
  for i := 0 to FDatabases.Count - 1 do if FDatabases[i] <> nil then
    Databases[i].FCanTimeout := False;
  FCanTimeout := False;
  {Handle when the Error is due to a Database disconnect.  Pass it on to
   FDatabase so it can handle this}
  if CheckStatusVector([isc_lost_db_connection]) then
    FDefaultDatabase.Call(ErrCode, RaiseError)
  else
    if RaiseError and (result > 0) then
      IBDataBaseError;
end;