Error on save object with generator (Firebird3)

BIZ TMS Aurelius
1

I use Firebird 3 and created a table for examplificate. My mapping:

[Entity]
  [Table('TESTEGN')]
  [Sequence('TESTEGN_GN')]
  [Id('FCodigo', TIdGenerator.IdentityOrSequence)]
  TTesteGN = class
  private
    [Column('CODIGO', [TColumnProp.Required, TColumnProp.NoUpdate])]
    FCodigo: Integer;
    [Column('NUMERO', [TColumnProp.Required])]
    FNumero: Integer;
    [Column('VALOR', [TColumnProp.Required])]
    FValor: Currency;
  public
    property Codigo: Integer read FCodigo write FCodigo;
    property Numero: Integer read FNumero write FNumero;
    property Valor: Currency read FValor write FValor;
  end;

When save() method is called appear an error:

var
  T: TTesteGN;
begin
  T := TTesteGN.Create;
  T.Numero := 1;
  T.Valor := 100;

  TXDataOperationContext.Current.GetManager.Save(T);
  Result := T;

{
  "error": {
    "code": "IBNativeException",
    "message": "[FireDAC][Phys][FB]Dynamic SQL Error\r\nSQL error code = -104\r\nUnexpected end of command - line 1, column 28"
  }
}
2

Make sure you use SQL dialect Firebird3, not Firebird.