Xbasic Table Search Not Working

[blawton]

This is driving me crazy, am I doing something wrong here? It's pretty straightforward, I open an alpha table, set an index and search on it:

dim country_id = "US"
dim rec as n
dim lookupTable as p
lookupTable = table.open("country_code_lookup")
		
lookupTable.index_primary_put("Code")
rec = lookupTable.fetch_find(country_id)

debug.png
Debug (click for larger)

I've double-checked by debug and just opening the table in question; the tablename/fieldname are correct, and the table gets opened and has those fieldnames, so what am I doing wrong?

[Stan Mathews]

Re: Xbasic Table Search Not Working

What are you doing with rec? Why do you say the code is not working?

[blawton]

Re: Xbasic Table Search Not Working

Hi Stan,

Ah, I suppose including the error would be helpful! rec is just what I assign the result of the fetch (last line) to. The error I get is 'Tagname not found', on that line.

error.png

[Stan Mathews]

Re: Xbasic Table Search Not Working

rec is just what I assign the result of the fetch (last line) to

As long as you understand that the result is the record number of the found record and nothing else, ok.

Tagname not found means the index tag named in the .index_primary_put() wasn't found. Suggest you double check the indexes for the country_code_lookup table.

[blawton]

Re: Xbasic Table Search Not Working

Hey Stan,

Yeah, I use the rec just to make sure I've found a record (my next line checks it, pulls the information I require):

if (rec > 0) then
	
 	country = lookupTable.country
    	country_enum = lookupTable.enum
	
end if

My issue is the indexes are correct -- take a look at the debug:

debug.png

Thanks for your help.
Bob

[Stan Mathews]

Re: Xbasic Table Search Not Working

The debug() screenshot shows me the table pointer and certain properties of the current record. To use .index_primary_put() you must have defined and saved indexes.

[blawton]

Re: Xbasic Table Search Not Working

Aha! I was under the impression that index_primary_put() applied an index or defined a field to search by. Thanks for your help, Stan!

[Stan Mathews]

Re: Xbasic Table Search Not Working

For anyone else encountering this issue........

If you specify a Tag_Name that does not exist, Alpha Five will choose the closest matching Tag_Name that has the same first letter as the Tag_Name you specified. If there is no Tag_Name with the same first letter, Alpha Five will generate an error message.

[Stan Mathews]

Re: Xbasic Table Search Not Working

I just realized you can do that this way. (without an index, the order() method creates a query list which .fetch_find() can use)

dim country_id = "US"
dim rec as n
dim lookupTable as p
lookupTable = table.open("country_code_lookup")

lookupTable.order("Code")
rec = lookupTable.fetch_find(country_id)

The drawback is that with a large table ordering the records might take some time whereas an index is already built.