DISKSPACE() 
 Devuelve el espacio disponible en el disco especificado
------------------------------------------------------------------------------
 Sintaxis

     DISKSPACE([<nUnidad>]) --> nBytes

 Argumentos

     <nUnidad> es el número de la unidad que se va a examinar, donde uno
     es la unidad A, dos es B, tres es C, etc. Si se omite <nUnidad> o se
     especifica cero, el valor por defecto es la unidad del DOS actual.

 Devuelve

     DISKSPACE() devuelve el número de bytes de espacio disponible en la
     unidad de disco especificada, en forma de valor numérico entero.

 Descripción

     DISKSPACE() es una función de entorno que determina el número de bytes
     disponibles en la unidad de disco especificada. Se utiliza antes de
     ejecutar un mandato COPY o SORT en otra unidad, para determinar si
     existe suficiente espacio. También puede utilizarse con RECSIZE() y
     RECCOUNT() para crear un procedimiento para realizar una copia de
     seguridad de ficheros de base de datos.

     DISKSPACE() es independiente del valor de SET DEFAULT.

 Ejemplos

      Este ejemplo es una función definida por el usuario que
        muestra la utilización de DISKSPACE() para hacer una copia de
        seguridad de un fichero de base de datos en otra unidad:

        FUNCTION CopiaSeg( cFicheroDestino, cUnidadDestino )
           LOCAL nEspacioNecesario, nUnidadDestino
           //
           nEspacioNecesario := INT((RECSIZE() * ;
              LASTREC()) + HEADER() + 1)
           nUnidadDestino := ASC(UPPER(cUnidadDestino)) - 64
           //
           IF DISKSPACE(nUnidadDestino) < nEspacioNecesario
              RETURN .F.
           ENDIF
           COPY TO (cUnidadDestino + ":" + cFicheroDestino)
           //
           RETURN .T.

 Ficheros   La biblioteca asociada es EXTEND.LIB.
 To download this example - click here.

See Also: LASTREC() LUPDATE() RECSIZE()