[<<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