Display Number of Invoices for a Customer

[jlucio]

Hi!. I Know somebody can helpme.
In an aplication, I must show how many invoices has each customer in a Customer Form. There are Customer.DBF (Parent) and Invoices.DBF (Child). The problem is that I must count number of invoices for customer as the operator click in Next, Previous, etc. Which property of Form can I Use to do a simple scan to count?
Thank You in advice

 

[Mike Gagnon]

In the click event of your commandgroup (not each bottoms) call a function you would have previously created in the form.
Assuming your count is shown on the form in a textbox;

in the click event:

thisform.textcount.value=;
thisform.countmyinvoice(thisform.customernumber)

And star your function with a paramater

LPARAMETER lcCustno
local count1
SELECT custnumber FROM customer into cursor myCount
COUNT TO count1
RETURN count1

 

[jlucio]

mgagnon:
Thanks for the tip. However, all works fine when I tried in the InteractiveChange event of the commandgroup, not in de click envent. The last doesn´t seem to work
jlucio

 

[wgcs]

The commandgroup's contained Button's Click event would be a place to put the form method call; the CommandGroup's InteractiveChange works, too, because it fires when any contained button is clicked.

 

[Mike Gagnon]

jlucio,

Sorry, I hadn't tested it, but I'm glad you were able to work it out.