anchor.diff:                end;
               Except
                 on E:Exception do begin
  -                TLog.NewLog(lterror,Classname,'Exception processing method'+jsonobj.AsString('method','')+' ('+E.ClassName+'): '+E.Message);
  +                TLog.NewLog(lterror,Classname,'Exception processing method'+methodName+' ('+E.ClassName+'): '+E.Message);
                   jsonresponse.GetAsObject('error').GetAsVariant('code').Value:=CT_RPC_ErrNum_InternalError;
                   jsonresponse.GetAsObject('error').GetAsVariant('message').Value:=E.Message;
                   valid:=False;
  
positive.code:   ErrorNum:=0;
    ErrorDesc:='';
    Result := false;
    TLog.NewLog(ltdebug,ClassName,'Processing RPC-JSON method '+method);
    if (method='addnode') then begin
      // Param "nodes" contains ip's and ports in format "ip1:port1;ip2:port2 ...". If port is not specified, use default
      // Returns quantity of nodes added
  
negative.code:           FSock.SendBuffer(addr(jsonresponsetxt[1]),Length(jsonresponsetxt));
          end;
        end;
        _RPCServer.AddRPCLog(FSock.GetRemoteSinIP+':'+InttoStr(FSock.GetRemoteSinPort),'Method:'+methodName+' Params:'+paramsTxt+' '+Inttostr(errNum)+':'+errDesc+' Time:'+FormatFloat('0.000',(TPlatform.GetElapsedMilliseconds(tc)/1000)));
      finally
        jsonresponse.free;
        Headers.Free;
  