How do you create an index using xbasic

[David Boomer]

I create a new table using an intersect operation.

When the operation is finished it erases the indexes (even though i deselected "delete dictionary files".

Ok...

How do i recreate the two indexes using xbasic???

The two indexes are:
ordernum no filter, ascending, all
ordnumunique no filter, ascending, unique

I have tried using the code in the help file but i get errors.

Is there an easy way to do this??

Thanks

[MikeC]

Re: How do you create an index using xbasic

David,
Help file directed me to this page when I did an index search for "index".
http://support.alphasoftware.com/alp...NDEX_ADD().htm

You did not state what you had tried and this is where I would start.

You also did not state what the error was so cannot even guess on an answer for that issue.

EDIT: Did you verify by looking at the xbasic created for the operation that indeed the logical for dictionary deletion was set to False? could be a bug if not set correctly or if set correctly and not doing as it should.....

[DaveM]

Re: How do you create an index using xbasic

Hope this helps.

tbl = table.current()  ' could also be table.open()
table.index_create_begin("CA customers", "LAST_NAME", "State_prov = 'CA'", "U") 
index2 = tbl.index_create_end(a_DB_current_PATH + "temp.cdx")

.

[David Boomer]

Re: How do you create an index using xbasic

Tried LOTS of xbasic from the help screens

Latest is


'Build ordernum and ordnumunique indexes on orderpayordersintersectar table

dim tbl As P

tbl = table.open("orderpayordersintersectar")
table.index_create_begin("ORDERNUM", "ORDERNUM")
tbl.index_add("ORDERNUM", "ORDERNUM")
index1 = tbl.index_create_end()


table.index_create_begin("ORDNUMUNIQUE", "ORDERNUM")
tbl.index_add("ORDNUMUNIQUE", "ORDERNUM",.t.,"U")
index1 = tbl.index_create_end()

tbl.close()


FAILS!!

msgbox says something about incorrect syntax

any ideas?

[Tim Kiebert]

Re: How do you create an index using xbasic

I would say
table.index_create_begin("ORDERNUM", "ORDERNUM")

should be

tbl.index_create_begin("ORDERNUM", "ORDERNUM")

[Tim Kiebert]

Re: How do you create an index using xbasic

dim tbl As P

tbl = table.open("orderpayordersintersectar")
tbl.index_create_begin("ORDERNUM", "ORDERNUM")
tbl.index_add("ORDNUMUNIQUE", "ORDERNUM","","U")
index1 = tbl.index_create_end()

tbl.close()

[David Boomer]

Re: How do you create an index using xbasic

Thanks!!!

The following code worked!!!



'Date Created: 27-Jul-2010 07:48:50 PM
'Last Updated: 27-Jul-2010 07:48:50 PM
'Created By : David
'Updated By : David
'Build ordernum and ordnumunique indexes on orderpayordersintersectar table

dim tbl As P

tbl = table.open("orderpayordersintersectar")
table.index_create_begin("ORDERNUM", "ORDERNUM",".t.","D")
tbl.index_add("ORDNUMUNIQUE", "ORDERNUM",".t.","U")
'index1 = tbl.index_create_end()


'table.index_create_begin("ORDNUMUNIQUE", "ORDERNUM",".t.","U")
'tbl.index_add("ORDNUMUNIQUE", "ORDERNUM")
index1 = tbl.index_create_end()

tbl.close()

I LOVE this forum!

[Tim Kiebert]

Re: How do you create an index using xbasic

At first I thought maybe you pasted in the wrong code?

After the table open line you still have a 'table' instead of 'tbl'. I thought that should not work because your pointer is actually 'tbl'.

So I checked the help and found a mixture. In <tbl>.index_create_begin() 'tbl' is used throughout. In <tbl>.index_create_end() a mixture of 'tbl' and 'table'. In the help for <tbl>.index_add() there is also a mixture including index_add() with no pointer at all.

But after testing, it seems that with those three index functions and maybe others you can use 'table' and the function uses the most recently opened table. I even was able to create the index file by only using 'table' on the index_create_end() function and nothing on create_begin and add. Although this seems to work I would get in the habit of using the pointer of the table that you are actually dealing with. In this case, 'tbl'. Say for some reason you want to create an index to a table that was opened earlier in your code and after that point in the code you open another table then the second and wrong table will be used. Also, if you open and close the second table then 'table' will not pick up the first table and actually throws an error.

[David Boomer]

Re: How do you create an index using xbasic

Thanks Tim

That was one of the things that was confusing. Things just weren't working and still didn't when i used the pointer reference.

At this point i am sure that the pointer ref is the best approach and that when i was first developing the index create script the code didnt work for other reasons.

Everything works now!

Thanks