Click above to get retro games delivered to your door ever month!

  Sx_I_TagName():

  Syntax:   Sx_I_TagName()

  Returns:  <char> Name of current tag being indexed or reindexed.
                   "" if no index or reindex occurring.

  Description:  This function returns the name of the tag currently being
                indexed or reindexed.  This function would be used in a
                UDF (specified with the OPTION clause of INDEX or REINDEX)
                to identify which tag is being indexed or reindexed.

                If the current file is an .IDX (single index file), then
                the file name is returned.

    NOTE:  This function is NOT supported under SIXNTX.

  Example:

    #include "SIXCDX.CH"

    USE TEST VIA "SIXCDX"             // TEST.CDX opened automatically
    REINDEX OPTION ShowIt() STEP 100

    FUNC ShowIt()

      // Bof() is .T. on first call to OPTION UDF.  Use this for setup.
      IF Bof()
          // Display the appropriate message
          ? iif(Sx_IsReindex(), "Reindexing ", "Indexing ")

          // Display the index file name and tag name.
          ? Sx_I_IndexName() + " : " + Sx_I_TagName()
          ?
          Return(NIL)
      ENDIF

      // Show how many keys have been included so far
      @ ROW(),1 SAY Sx_KeysIncluded()

    Return(NIL)