anchor.diff:    begin
       // Get Parameters
       Result := False;
  -    accountName := LowerCase(params.AsString('name', '')); // Convert to lowercase...
  +    accountName.FromString(LowerCase(params.AsString('name', ''))); // Convert to lowercase...
       accountType := params.AsInteger('type', -1);
       start := params.AsInteger('start', 0);
       max := params.AsInteger('max', 100);
  
positive.code:         end;
          if (jsonArr.GetAsObject(i).IndexOfName('new_name')>=0) then begin
            changeinfo.Changes_type:=changeinfo.Changes_type + [account_name];
            changeinfo.New_Name:=jsonArr.GetAsObject(i).AsString('new_name','');
          end;
          if (jsonArr.GetAsObject(i).IndexOfName('new_type')>=0) then begin
            changeinfo.Changes_type:=changeinfo.Changes_type + [account_type];
  
negative.code:       ms.WriteBuffer(raw[Low(raw)],Length(raw));
        ms.Position := 0;
        OperationsHashTree := TOperationsHashTree.Create;
        if (Length(raw)>0) then begin
          If not OperationsHashTree.LoadOperationsHashTreeFromStream(ms,false,CT_PROTOCOL_1,Nil,errors) then begin
            FreeAndNil(OperationsHashTree);
            exit;
  