index.records_get()

[Tassos]

When I try to count the number of records, I get 0 the first time and then using a second time the code I get the correct number of records.
Why is this occurring? (same in A5V11 As in A5V12)

The code:

DIM counter as N
DIM counter1 as N

'' returns the <Index> object pointer that references the primary index
indx2=pointer2.index_primary_get()

'' retrieves the Number_of_Records selected by the specified index tag
'' first time in var counter1
counter1=indx2.records_get()
'' second time in var counter
counter =indx2.records_get()

'' result
ui_msg_box("values for var <counter>","counter1= "+counter1+" counter= "+counter,UI_OK)

alpha5V12_rec_count.jpg

[Al Buchholz]

Re: index.records_get()

When I try to count the number of records, I get 0 the first time and then using a second time the code I get the correct number of records.
Why is this occurring? (same in A5V11 As in A5V12)

The code:

DIM counter as N
DIM counter1 as N

'' returns the <Index> object pointer that references the primary index
indx2=pointer2.index_primary_get()

'' retrieves the Number_of_Records selected by the specified index tag
'' first time in var counter1
counter1=indx2.records_get()
'' second time in var counter
counter =indx2.records_get()

'' result
ui_msg_box("values for var <counter>","counter1= "+counter1+" counter= "+counter,UI_OK)

[ATTACH=CONFIG]38123[/ATTACH]

There is more code involved. You haven't connected to a table.

Please show that additional code.

I just tried the code with a table.open to a dbf and it worked as expected in v11 runtime.

[Tassos]

Re: index.records_get()

Here is the code before the above lines (with explanations):

(using Alpha5V12 build 1856)

DIM counter as N
DIM counter1 as N
DIM anc_val as N
dim selindex as C
DIM sum_mean_hrs as N

'' pointer represents set "runhrs.set" composed of main table "grpname.dbf" (pointer1)
'' and table (one to multiple) "runhrs.dbf" (pointer2)
''Table grpname has folllowing fields
'' vesnr N3
''Vesname C30
'' Grpcode N5
''Grpname C50
''Hrsenable L1
''Grphrsno N2
''Lasthrsdays N5 2
''Grpincharge N2
''Inchargename C20
"Upd D8
"user C10


'' table runhrs has following fields
'' vesnr N3
''Vesname C30
'' Groupcode N5
" Runhrs N7
"Upd D8
"user C10


dim pointer as P
dim pointer1 as P
dim pointer2 as P

'' SET.CURRENT() method returns a pointer to the current set.
pointer = set.current()
pointer1=pointer.grpname
pointer2=pointer.runhrs

''' defines the number of the group that i'm interested in
code_group=pointer1.grpcode.value_get()
code_group_str=ltrim(str(code_group))

' index name
' var->vesnrselect is a global var containing a number (string)
selindex= "group"+code_group_str+var->vesnrselect

'index of table runhrs created if it does not exist, otherwise use the existing one

' filter
filtreA= "VESNR="+ltrim(str(var->vesnrselect))
filtre1="GROUPCODE="+code_group_str+".AND."+filtreA

' creation/use of index
index_p=pointer2.Index_Tag_Add(selindex,"INVERT(RUNHRS)",filtre1,"A")

'' using this index as primary index (created or existing index : selindex)
indx=pointer2.index_primary_put(selindex)

''index that is currently controlling the order of the records in the table
indx2=pointer2.index_primary_get()

counter1=indx2.records_get()
counter =indx2.records_get()

...etc (here then, the code of the previous post)

and a snapshot of the form with the button:

alpha5V12_rec_count3.jpg


Thanks for trying

[Al Buchholz]

Re: index.records_get()

There is more going on than what you originally presented.

Given the situation, I'd take out the manipulation(filters and anything else other than opening) of the table prior to testing the count and then add back in one at a time to show what code has an effect on the count.

[Tassos]

Re: index.records_get()

I created a new button to test this particular piece of code as you sugested.
I don't test that the index exists ( in this case it is OK, the indexes I use, already exists)
and also I don't use: indx2=pointer2.index_primary_get() as indx2=pointer2.index_primary_put(selindex) should be sufficient.

I have still the same results as before.
I don't know if I mentioned it, but this happens only the first time I click on the button on every change of index. If I stay on the same page (that means I have the same Index) then the first value (counter1) is also correct.

=======code ==============
DIM counter as N
DIM counter1 as N
DIM anc_val as N
dim selindex as C
dim pointer as P
dim pointer1 as P
dim pointer2 as P
dim indx2 as P
pointer = set.current()
pointer1=pointer.grpname
pointer2=pointer.runhrs

code_group=pointer1.grpcode.value_get()
code_group_str=ltrim(str(code_group))

selindex= "group"+code_group_str+var->vesnrselect
indx2=pointer2.index_primary_put(selindex)

counter1=indx2.records_get()
counter =indx2.records_get()
ui_msg_box("values for var <counter>","counter1= "+counter1+" counter= "+counter,UI_OK)
end
''**** End

========== code end ==========


rec_count_firsttime.jpg

rec_count_secondtime.jpg

The best way I found to overcome this problem, is, to repeat the records_get() command two times

[Tom Cone Jr]

Re: index.records_get()

I'm unclear on the context in which this script is running.

If the set is supporting a form, I don't think it's a good idea to change the primary index controlling the linked child table while the set is open.

Have you considered using either TableCount() or DbCount() functions ? Both of these will return the count you are looking for, but each will open a new instance of the table to do so.

[Ronald Anusiewicz]

Re: index.records_get()

From the help file:

A5_GET_RECORDS_IN_QUERY()

Syntax

Record_Count as N = A5_GET_RECORDS_IN_QUERY( Table_or_Set_Name as C, Filter_Expn as C [, Session_Handle as N [, Count_Child_Records as L ]] )

Argument
Description

Table_or_Set_Name
The name of the table or set. Include the ".set" suffix when working with a set.

Filter_Expn
A character filter expression that evaluates to a logical value. Selects records.

Session_Handle
Optional. Default = -1 (current session).

Count_Child_Records
Optional. Default = .T.

.T. = Count child records.

.F. = Count only parent records.


Description

The A5_GET_RECORDS_IN_QUERY() function returns the number of records in the specified table or set that satisfy a query expression.

Supported By

Alpha Five Version 5 and Above

Example

? a5_get_records_in_query("customer", "lastname > " + s_quote("M"))

= 27.000000

? a5_get_records_in_query("inventory.set", "cost > 2")

= 105


This is a good way to test if a table is empty. Assuming the table's name is customer :

if (a5_get_records_in_query("customer", .t.) = 0) then


This expression returns the number of records in the current query.

a5_get_records_in_query(current_filter_expn() )

[Al Buchholz]

Re: index.records_get()

I think it's time for an simple example database to see what else is going on.

[Tassos]

Re: index.records_get()

A5_GET_RECORDS_IN_QUERY() seems to work, thanks.


I have attached an example of the problem.
Go to the form. There is a button called "Test"
Pressing the button first time you get 0 and the correct number
Pressing the button a second time you get the correct number 2 times (as it should be)

Tassos