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

dfClose()
Optimised file closure
------------------------------------------------------------------------------
Syntax:

     dfClose( <aFile>, <lPos>, <lRec> ) --> NIL

Parameters:

     <aFile>    Array of open files.
     <lPos>     If .T., restores the index order. If the file is already
     open when dfUse() is called, it saves the current index
     order and record pointer. DEFAULT .F.
     <lRec>     If .T., restores the record pointer. If the file is already
     open when dfUse() is called, it saves the current index
     order and record pointer. DEFAULT .F.

Returns:

     NIL

Description:

     dfClose() constitutes the optimised file closure used by dBsee
     objects. Files opened by dfUse() are stored in an array. If the file
     is already in use, dfUse() does not append a new element to the array,
     but only stores the index order and the record pointer. dfClose() will
     use this information to restore these settings.

Example:

     LOCAL aFile := {}
     USE art NEW
     dfUse( "art", NIL, aFile ) // Art file already
                                // in use, aFile = {}
     dfUse( "cli", NIL, aFile ) // File Cli not in use,
                                //  aFile = {"cli"}
     Cli->(DBSETORDER( 1 ))
     Cli->(DBGOTO( 18 ))
     SubFunc()
     
     FUNC SubFunc
     LOCAL aFile := {}
     dfUse( "cli", NIL, aFile ) // File Cli in use,
                                // aFile = {"cli", 1, 18}
     dfClose( aFile )           // Closes all files

See also:

     dfUse()