Retro video games delivered to your door every month!
Click above to get retro games delivered to your door ever month!
X-Hacker.org- CA-Clipper 5.3 . Guide To CA-Clipper - <b>dbcloseall()</b> http://www.X-Hacker.org [<<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

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