EMPTY( ) (Función)

Artículo
04/11/2008

Determina si una expresión está vacía o no.

EMPTY(eExpression)

Valores devueltos

Logical

Parámetros

eExpression
Especifica la expresión evaluada por EMPTY( ).

La expresión que incluya puede ser una expresión de caracteres, numérica, de fecha o lógica, o el nombre de un campo memo o general de una tabla abierta. EMPTY( ) devuelve verdadero (.T.) cuando las expresiones de los tipos de datos siguientes contienen los datos indicados:

Tipo de expresión	Se evalúa como
Character	La cadena vacía, espacios en blanco, tabulaciones, retornos de carro o avances de línea o cualquier combinación de éstos.
Numeric	0
Currency	0
Float	0
Integer	0
Double	0
Date	Vacío (p.e., CTOD(''))
DateTime	Vacío (p.e., CTOD(''))
Logical	Falso (.F.)
Memo	Vacío (sin contenido)
General	Vacío (sin objeto OLE)
Picture	Vacío (sin imagen)

EMPTY( ) no puede utilizarse para determinar si una referencia de objeto de variable está vacía. Por ejemplo, una variable puede contener una referencia de objeto para un formulario. Si el formulario se cierra haciendo clic en Cerrar desde el menú contextual del formulario o con CLEAR WINDOWS, la variable contendrá el valor nulo.

El programa de ejemplo siguiente demuestra cómo usar TYPE( ) y ISNULL( ) para determinar si una referencia de objeto de variable es válida.

goMyForm = CREATEOBJECT('Form')
WAIT WINDOW IIF(TYPE('goMyForm') = 'O' AND !ISNULL(goMyForm), ;
   'goMyForm has valid object reference',;
   'goMyForm does not have valid object reference')

Observaciones

EMPTY( ) devuelve verdadero (.T.) si la expresión eExpression está vacía. Si la expresión no está vacía, EMPTY(°) devolverá falso (.F.).

Ejemplo

El ejemplo siguiente abre la tabla customer de la base de datos testdata. FOR ... Se usa FOR ... ENDFOR para crear un bucle en el cual se usa EMPTY( ) para determinar si TAG( ) devuelve la cadena vacía. El nombre de cada etiqueta de índice estructural se muestra con su estado de candidato.

CLOSE DATABASES
OPEN DATABASE (HOME(2) + 'data\testdata')
USE customer     && Open customer table

FOR nCount = 1 TO 254
   IF !EMPTY(TAG(nCount))  && Checks for empty string
   ? TAG(nCount)  && Display tag name
   ? CANDIDATE(nCount)  && Display candidate status
   ELSE
      EXIT  && Exit the loop when no more tags are found
   ENDIF
ENDFOR

Vea también

LEN( ) | TYPE( ) (Función) | ISNULL( ) (Función)

Share via