Retro video games delivered to your door every month!
Click above to get retro games delivered to your door ever month!
X-Hacker.org- SIx Driver RDD v3.00 - Reference Guide - <b>sx_roxunlock():</b> http://www.X-Hacker.org [<<Previous Entry] [^^Up^^] [Next Entry>>] [Menu] [About The Guide]
  Sx_ROXUnLock():

  Syntax:   Sx_ROXUnLock()

  Returns:  NIL

  Description:  Turns Read-Only Index Locking off for the currently active
                index.  The index lock would have been previously set by the
                Sx_ROXLock() function.  This function has no effect in a
                non-shared mode.

    NOTE:  This function is NOT supported under SIXNTX.

  Example:

    #include "SIXNSX.CH"

    LOCAL nSecs := 0, nCount := 0

    SET EXCLUSIVE OFF              // Make sure we're in SHARED mode

    RDDSetDefault("SIXNSX")        // Select the SIXNSX Driver
    CLEAR                          // Clear the screen
    USE test                       // Open a table with SIXNSX
    INDEX ON last TO last          // Create an IDX index
    CLOSE ALL                      // Close everything and reopen it
    USE test INDEX test            //   to unlock the newly-created index

    nSecs := Seconds()             // Save the start time
    ? "Without ROXLock...: "       // Display an informational message
    FOR nCount := 1 TO 1000        // Loop 1000 times and
      dbSeek("BogusName")          //   SEEK a value that doesn't exist
    ENDDO
    ?? AllTrim( Str( Seconds()-nSecs )) + " Seconds"  // Display total time

    Sx_ROXLock()                   // Set a Read-Only lock on LAST.IDX
    nSecs := Seconds()             // Save the start time
    ? "With ROXLock......: "       // Display an informational message
    FOR nCount := 1 TO 1000        // Loop 1000 times and
      dbSeek("BogusName")          //   SEEK a value that doesn't exist
    ENDDO
    ?? AllTrim( Str( Seconds()-nSecs )) + " Seconds"  // Display total time
    Sx_ROXUnLock()                 // Unlock the index



See Also: Sx_ROXLock() Sx_IsROXLock() Sx_IsMyROX() Sx_UnLock()

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