Retro video games delivered to your door every month!
Click above to get retro games delivered to your door ever month!
X-Hacker.org- Advantage CA-Clipper Guide v5.5 - ax_isreindex() http://www.X-Hacker.org [<<Previous Entry] [^^Up^^] [Next Entry>>] [Menu] [About The Guide]
 AX_IsReindex()
 Check if REINDEX is in progress
------------------------------------------------------------------------------

 Syntax

     AX_IsReindex() -> logical

 Returns

     Returns a logical .T. if a REINDEX is in progress.  If no REINDEX is
     occurring, it returns a .F.

 Description

     AX_IsReindex() checks if a REINDEX is in progress.  When a UDF is
     specified in an EVAL clause of INDEX or REINDEX, this function
     determines which index case is in progress.  This function can be
     called within the UDF.

 Example

     USE test VIA "DBFCDXAX"            // TEST.CDX opened automatically
     REINDEX EVAL ShowIt() EVERY 100

     FUNC ShowIt()

        //Display the appropriate message
        ? IF( AX_IsReindex(), "Reindexing ", "Indexing " )

        // Display the index file and tag name.
        ? AX_I_IndexName() + " : " + AX_I_TagName()
        ?
        // Show how many keys have been included.
        @ ROW(), 1 SAY AX_KeysIncluded()

     RETURN .T.


See Also: AX_I_IndexName() AX_I_TagName() AX_KeysIncluded()

Online resources provided by: http://www.X-Hacker.org --- NG 2 HTML conversion by Dave Pearson