Any ideas

[Gerald L. Craig]

I'm sure there is a very easy solution to this but I'm not sure how to do it. How would I get the name of the current index to either display on a form or be able to use the current index's name in a calculated expression? Any help would be greatly appreciated.

[Stan Mathews]

RE: Any ideas

"tbl".index_primary_get()
Syntax:
"Index> = "Tbl".index_primary_get()
Description:
Returns an object pointer, ("Index") that references the primary index or query
list of the table referenced by "Tbl". The primary index is the index that is
currently controlling the order of the records in the table.
Example:
'Display the name of the primary index in the Trace window.
'----------------------------------------------------------
tbl = table.current()
index_pointer = tbl.index_primary_get()
index_name = index_pointer.name_get()
trace.writeln("The name of the primary index is: "+index_name)
See Also:
"tbl".index_primary_put()

[Gerald L. Craig]

RE: Any ideas

Thanks Stan. I learned something new! Appreciate the help.

[Stan Mathews]

RE: Any ideas

You're welcome. All I did was cut and paste from the pdf. I just happened to remember that I had seen it.

[French]

RE: Any ideas


...and from there, to get it printed on the form or report?

And to which event would this script be attached?

[Stan Mathews]

RE: Any ideas

index_name = index_pointer.name_get()

The variable named index_name now contains the name of the current index. Create a field that refers to this variable to have it display or print.

If you want this to display on a form the event question is problematic. Suppose you have a button on the form which allows "index setting". You would want to have this code on the button after the code to set the index, before the code to refresh the parent form. If you don't have such a button, but the user has access to the normal menu, I would suggest attaching the code (plus the refresh) to the ontimer event. I can't think of another way to ensure that the variable is updated if the user changes indexes via menu.

For a report you could set the variable in the onprintinit event to ensure currency.

[French]

RE: Any ideas


"Create a field that refers to this variable to have it display or print."

Details, please?

[Stan Mathews]

RE: Any ideas

At some level, probably most conveniently form level maybe table level, declare this index_name to be a global variable (character).

From the drop drag list you will then have the variable available to drop onto the form. In a report you might need to created a calculated field = var->index_name if you use the form level declaration. Then you can place the calculated field on your report.

[Stan Mathews]

RE: Any ideas

Testing seems to indicate that the easiest place to declare the variable is at the table level, edit structure, table menu, global variables, global, index_name, character, "".

This is then available to forms and reports based on the table.

tbl = table.current()
index_pointer = tbl.index_primary_get()
index_name = index_pointer.name_get()
:Sm_Testing:Index_Name.Refresh()

placed in the oninit event for the form "Sm_testing" displays the name of the current index tag (at the time the form is first displayed) in a field created by dragging the index_name field from the drag-drop list (variables section of the list). Other events would need the same code under the conditions described earlier.

[French]

RE: Any ideas


thank you!