count in grid 1

[foxup]

Hi,

I can't seem to wrap my head around this simple task. So, I have a form with a grid and simple label on the grid. In the label-click I have:
USE ETHORDERS
SET ORDER TO EORDERID DESC
SET FILTER TO SUBSTR(INTERN_QID,1,1)="B"
GO TOP
THISFORM.grid1.REFRESH()

easy enuf.

Now at the bottom of the form I wanna display the simple count. Example:

XX Records meet criteria

Is there a very simple way of doing so?

My brain is in neutral today and I can't seem to figure this simple task out.

Any help please.

Thanks,
J

 

[Mike Lewis]

Well, you can't use RECCOUNT(), because that gives you the total number of records in the file (as opposed to the filter).

And you can't do SELECT COUNT(*) FROM Ethorders (for much the same reason).

But what you can do this this:

DIMENSION ARRAY laResults(1)
SELECT COUNT(*) FROM Ethorders WHERE SUBSTR(INTERN_QID,1,1)="B" INTO ARRAY laResults
THISFORM.Label1.Caption = TRANSFORM(laResults(1)) + " meet the criterion"

Obviously, if you used a different filter, you would have to change the WHERE clause.

Mike



__________________________________
Mike Lewis (Edinburgh, Scotland)

Visual FoxPro articles, tips, training, consultancy

 

[foxup]

OK, I just thought there might have been a quicker / simpler way. Some sort of built in function. I erred. Thanks Mike.

Ciao for now,
J

 

[Olaf Doschke]

Another solution is [COUNT To lnCount], it will respect the filter while counting, but it will also put the record pointer to EOF.

Bye, Olaf.

 

[foxup]

Thanks Mike & Olaf.