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

 C_ISOPEN()

 DESCRIPTION

 C_ISOPEN() checks whether a specified database is already open in
 another work area.  All work areas can be checked, or a range of
 work areas can be specified to check.

 SYNTAX

 C_ISOPEN(alias [,st_area] [,end_area])

 PARAMETERS

 alias (C) is the database alias name to check.

 st_area (N) is the starting work area to begin checking.  If
 st_area is not specified, the default of the first work area, 1, is
 used.

 end_area (N) is the ending work area to stop checking.  If end_area
 is not specified, the default of the last work area, 255, is used.

 RETURNS

 C_ISOPEN() returns true (.T.) if the specified database file is
 open in another work area, or false (.F.) if the file is not open.

 EXAMPLES

 && Check to make sure test.dbf is not open in work area 1 to 25
 if !c_isopen("TEST",1,25)
   select 5
   use test
 endif
 ...
 ...
 && Check to make sure test.dbf is open to prevent a run-time
 && error trying to select a closed database
 if c_isopen("TEST")
   select test
   use
 endif