anchor.diff:      NewState = State#state{auto_commit_mode = AutoCommitMode,
   			   scrollable_cursors = SrollableCursors},
       
  -    case gen_tcp:accept(ListenSocketSup, 5000) of
  +    case gen_tcp:accept(ListenSocketSup, port_timeout()) of
   	{ok, SupSocket} ->
   	    gen_tcp:close(ListenSocketSup),
  -	    case gen_tcp:accept(ListenSocketOdbc, 5000) of
  +	    case gen_tcp:accept(ListenSocketOdbc, port_timeout()) of
   		{ok, OdbcSocket} ->
   		    gen_tcp:close(ListenSocketOdbc),
   		    odbc_send(OdbcSocket, ODBCCmd), 
  
positive.code:     <<Binary/binary,0:16>>;
  string_terminate_value(null) ->
      null.
  
negative.code: -behaviour(gen_server).
  
  -include("odbc_internal.hrl").
  
  -define(ODBC_PORT_TIMEOUT, 5000).
  
  %% API --------------------------------------------------------------------
  
  