Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Pulling index names programatically
Message
 
 
To
21/11/2000 15:44:46
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Miscellaneous
Thread ID:
00444343
Message ID:
00448430
Views:
8
>I'm pretty sure I've seen this before but does anyone know of the syntax for programatically pulling the indexes for a free table (someting very similar to copy stucture extended results?
                              select WorkFile
                              lnTagCount=TagCount()
                              if lnTagCount>0
                                   dimension laIndTags[lnTagCount], ;
                                        laIndExpr[lnTagCount], ;
                                        laFilterExpr [lnTagCount]

                                   for lnCount=1 to lnTagCount
                                        laIndTags[lnCount]=upper(tag(lnCount)) && TagName
                                        laIndExpr[lnCount]=upper(sys(14,lnCount)) && Index Expression
                                        laFilterExpr[lnCount]=upper(for(lnCount)) && Filter Expression
                                   endfor
                              endif
In VFP7.0 it would not need this code, since there would be a native function available.
If it's not broken, fix it until it is.


My Blog
Previous
Reply
Map
View

Click here to load this message in the networking platform