anchor.diff:      Property PreviousUpdatedBlocks : TAccountPreviousBlockInfo read FPreviousUpdatedBlocks; // New Protocol V3 struct to store previous updated blocks
     End;
   
  -  TPCBankLog = procedure(sender: TPCBank; Operations: TPCOperationsComp; Logtype: TLogType ; Logtxt: AnsiString) of object;
  +  TPCBankLog = procedure(sender: TPCBank; Operations: TPCOperationsComp; Logtype: TLogType ; const Logtxt: String) of object;
   
     TPCBankNotify = Class(TComponent)
     private
  
positive.code:     Property HasValidSignature : Boolean read FHasValidSignature;
      Class function OperationHash_OLD(op : TPCOperation; Block : Cardinal) : TRawBytes;
      Class function OperationHashValid(op : TPCOperation; Block : Cardinal) : TRawBytes;
      class function IsValidOperationHash(const AOpHash : AnsiString) : Boolean;
      class function TryParseOperationHash(const AOpHash : AnsiString; var block, account, n_operation: Cardinal; var md160Hash : TRawBytes) : Boolean;
      Class function DecodeOperationHash(Const operationHash : TRawBytes; var block, account,n_operation : Cardinal; var md160Hash : TRawBytes) : Boolean;
      Class function EqualOperationHashes(Const operationHash1, operationHash2 : TRawBytes) : Boolean;
      Class function FinalOperationHashAsHexa(Const operationHash : TRawBytes) : AnsiString;
      class function OperationHashAsHexa(const operationHash : TRawBytes) : AnsiString;
      class function GetOpReferenceAccount(const opReference : TOpReference) : Cardinal;
      class function GetOpReferenceN_Operation(const opReference : TOpReference) : Cardinal;
      function Sha256 : TRawBytes;
  
negative.code: end;
  
  procedure TPCBank.UpdateValuesFromSafebox;
  Var aux : String;
    i : Integer;
  begin
    { Will update current Bank state based on Safebox state
  