Can you describe the nature of the inconsistency?
Your code there looks right.

I verified that the values for the calculated fields are getting stored and
retrieved from the memory cache.

Jason Wharton
CPS - Mesa AZ
http://www.ibobjects.com

----- Original Message -----
From: <jrt@...>
To: <IBObjects@egroups.com>
Sent: Wednesday, December 06, 2000 2:17 PM
Subject: [IBO] Re: 3.6 C released to all areas.


> OK,
> I'm at location, so it hard to create a sample app. I have included
> the code below.
> Server 5.6
> Client gds 5.1
> HTH
> John
> procedure TfrmJob.IB_QConfigurationCalculateField(Sender:
> TIB_Statement;
> ARow: TIB_Row; AField: TIB_Column);
> var
> x: ansistring;
> I: INTEGER;
> begin
> if AFIELD.FieldName = 'WIN_COUNT' then begin
> X := AROW.BYNAME('DESCRIPTION').ASSTRING;
>
> I := CountF(X, '-', 1) + 1; // hyperstr func to count occurances
>
> AFIELD.AsInteger := I;
> end;
> end;
>