To solve this problem obtain the latest Delphi/400 patch from: "http://libra.netmastersllc.com/borland400/patches.html"

There is no way to know if a field is NULL or contains NOTHING. so, the Resolver will replace each field with no data by a NULL. In most case, this will generate a error on the AS/400. (if your fields don't allow NULL). That's why you should had something like this on the server side :

procedure TDemoServer.MyProviderGetData(DataSet: TClientDataSet); var i:integer; begin with DataSet do begin while not EOF do begin Edit; for i:=0 to fieldcount- do begin if fields[i].IsNull then fields[i].asstring:=''; end; Post; Next; end; end; end;

4/ /99 4: 2:08 PM