+---------------------------------+
|            DISKSPACE            |
+---------------------------------+
DISKSPACE()

-----------------------------------
Returns space available on default disk drive.
Return value - Numeric
-----------------------------------

The DISKSPACE() function returns the number of bytes currently available
on the default drive.

This function is useful for determining if sufficient space is available
for backups or to execute commands, such as SORT, which require
substantial space for disk work files.

+---------------------------------+
|         Program Example         |
+---------------------------------+
In this example, DISKSPACE() is used to see if sufficient disk space is
available to do a sort.

*** Check DISKSPACE before sort ***

USE customer

*** Get size of database header ***
dbf_top = HEADER()
*** Calculate size of database ***
file_size = dbf_top + (RECSIZE() * RECCOUNT() + 1)

IF DISKSPACE() > (file_size * 3)
        @ 5,0 SAY 'Sufficient diskspace to Sort.'
ELSE
        @ 5,0 SAY 'Insufficient diskspace. Sort cannot be done.'
ENDIF

-----------------------------------

See Also:  HEADER(), RECSIZE()

-----------------------------------