Error ftlargeint - huge number

WEB TMS WEB Core
1
Hello.

I have a WebClientDataset with a Field which datatype is ftlargeint.

After recieve data in the clientdataset, occours an error. 

The message is:

ERROR
267938960001,00 is not between -2147483648,00 and 2147483647,00 for ID_PERSONA | fMessage::267938960001,00 is not between -2147483648,00 and 2147483647,00 for ID_PERSONA fHelpContext::0
at http://localhost:8000/PEpefi/PEpefi.js [38317:15]

ID_PERSONA is a field that It can have a huge number 

How can I resolve the error?

I'm using Web Core 1.3.8.0

Thanks

2

I cannot reproduce this.

Test

procedure TForm1.WebButton1Click(Sender: TObject);
begin
  WebClientDataSet1.FieldDefs.Clear;
  WebClientDataSet1.FieldDefs.Add('_LargeInt',ftLargeInt);
  WebClientConnection1.Active := true;
end;

procedure TForm1.WebButton2Click(Sender: TObject);
begin
  WebClientDataSet1.Edit;
  WebClientDataSet1.FieldByName('_LargeInt').AsInteger := 267938960001;
  WebClientDataSet1.Post;
end;
3
Hello Bruno

After I worked a lot of time, I could find the mistake.

The error was mine because I was trying to solve a problem with LargeInt fields in WebClientDatasets.

I'll try to clarify the situation.

If I use a ClientDataset with a persistent LargeIntfield ocurrs an error when I run de application.

So if I use a field created at runtime then there isn't error. 


The error that I asked you was because I used a TIntegerField instead a TLargeIntField. I saw it after I sleep and rest. 

I don't know why, but if I create a Largeint field in design mode, then in the formcreate event, I can't use the WebClientDataset 

Please try to reproduce the error with next code.  Remember I use 1.3.8.0

object Form1: TForm1
  Left = 0
  Top = 0
  Width = 640
  Height = 480
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Arial'
  Font.Style = []
  TabOrder = 1
  OnCreate = WebFormCreate
  object CDCliente: TWebClientDataSet
    Left = 306
    Top = 212
    object CDClienteFieldString: TStringField
      FieldName = 'FieldString'
      Size = 10
    end
    object CDClienteFieldLARGEINT: TLargeintField
      FieldName = 'FieldLARGEINT'
    end
  end
end


unit Unit1;

interface

uses
  System.SysUtils, System.Classes, JS, Web, WEBLib.Graphics, WEBLib.Controls,
  WEBLib.Forms, WEBLib.Dialogs, Data.DB, WEBLib.CDS;

type
  TForm1 = class(TWebForm)
    CDCliente: TWebClientDataSet;
    CDClienteFieldString: TStringField;
    CDClienteFieldLARGEINT: TLargeintField;
    procedure WebFormCreate(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.WebFormCreate(Sender: TObject);
begin
    CDCliente.Active:=true;

    CDCliente.Append;

    CDClienteFieldString.AsString:='Hola';
    CDClienteFieldLARGEINT.AsLargeInt:=1;


    CDCliente.Post;


end;

end.


If I run the application, I have this message


ERROR
CDCliente : Field not found : "FieldLARGEINT" | fMessage::CDCliente : Field not found : "FieldLARGEINT" fHelpContext::0
at http://localhost:8000/Project1/Project1.js [304:11]


If you delete the largeintfield the application run OK.

Perhaps is for 1.3.8.0 version. Now I'm working and I don't have time to try the New Beta Version 


Thanks Bruno
4

Thanks for these details.
This helped us to analyze and solve the problem.
We can confirm it will be fixed in the next update.