anchor.diff:    FOnChanged:=Nil;
     FListOrderedBySha256 := TList.Create;
     FListOrderedByAccountsData := TList.Create;
  +  FListOrderedByOpReference := TOrderedOpReferenceList.Create;
     FTotalAmount := 0;
     FTotalFee := 0;
     FHashTree := '';
  
positive.code:       l.Clear;
        FListOrderedBySha256.Clear;
        FListOrderedByAccountsData.Clear;
        FHashTree := '';
      End;
      If Assigned(FOnChanged) then FOnChanged(Self);
  
negative.code:     Class function FinalOperationHashAsHexa(Const operationHash : TRawBytes) : AnsiString;
      class function OperationHashAsHexa(const operationHash : TRawBytes) : AnsiString;
      function Sha256 : TRawBytes;
      function GetOpReference : TOpReference;
    End;
  
    { TOperationsHashTree }
  