[<<Previous Entry] [^^Up^^] [Next Entry>>] [Menu] [About The Guide]
 DBCLOSEALL()
 Close all occupied work areas
------------------------------------------------------------------------------
 Syntax

     DBCLOSEALL() --> NIL

 Returns

     DBCLOSEALL() always returns NIL.

 Description

     DBCLOSEALL() releases all occupied work areas from use.  It is
     equivalent to calling DBCLOSEAREA() on every occupied work area.
     DBCLOSEALL() has the same effect as the standard CLOSE DATABASES
     command.  For more information, refer to the USE and CLOSE commands.

 Examples

     .  The following example closes all work areas:

        cLast := "Winston"
        DBUSEAREA( .T., "DBFNTX", "Sales", "Sales", .T. )
        DBSETINDEX( "SALEFNAM" )
        DBSETINDEX( "SALELNAM" )
        //
        DBUSEAREA( .T., "DBFNTX", "Colls", "Colls", .T. )
        DBSETINDEX( "COLLFNAM" )
        DBSETINDEX( "COLLLNAM" )
        //
        DBSELECTAREA( "Sales" )      // select "Sales" work area
        //

        IF ( Sales->(DBSEEK(cLast)) )
           IF Sales->( DELETED() )
              IF RLOCK()
                 Sales->( DBRECALL() )
                 ? "Record deleted: ", Sales( DELETED() )
              ENDIF
           ENDIF
        ELSE
           ? "Not found"
        ENDIF
        DBCLOSEALL()                  // close all work areas

 Files   Library is CLIPPER.LIB.


See Also: CLOSE DBCLOSEAREA() DBUSEAREA() SELECT USE
This page created by ng2html v1.05, the Norton guide to HTML conversion utility. Written by Dave Pearson