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

 indorder()          Return order number of active controlling index
------------------------------------------------------------------------------
 Declaration
   database.hdr

 Syntax
   func uint indorder extern

 Arguments
   None.

 Return
   The order number of the controlling index.

 Description
   indorder() returns the number of the active controlling index in the
   current work area.

 Example
   #define EXAMPLE_DATABASE
   #include example.hdr

   proc Test_indorder
   open "stest.dbf" index sIdxLN, sIdxB alias sTest
   ? indorder()          // prints 1
   set order to 2
   ? indorder()          // prints 2
   set order to 1
   ? indorder()          // prints 1
   endproc

   proc main
   Test_indorder()
   endproc