AEVAL()

Sintaxis

AEVAL( <array>, <bloque de código> [ , <expresión numérica 1>  ]  [ , <expresión numérica 2> ] )

Propósito

Ejecuta un bloque de código para cada uno de los elementos de un array.

Argumentos

< array >

Define el nombre del array cuyos elementos se evaluarán.

< bloque de código >

Define el bloque de código que se ejecutará o evaluará para cada elemento del array.

< expresión numérica1 >

Define el número del primer elemento para el cual el bloque de código se ejecutará. Si no se especifica se asumirá el primer elemento.

< expresión numérica2 >

Define la cantidad de elementos, a partir del elemento definido por la expresión numérica 1, para los cuales el bloque de código especificado se ejecutará. Si no se especifica, se procesarán todos los elementos del array a partir del primero definido.

Utilización

La función AEVAL() evalúa un bloque de código para cada elemento de un array, pasando el valor del elemento como parámetro para el bloque de código especificado. El valor resultante del bloque de código se ignora.

Todos los elementos del array se procesan, a menos que se especifiquen las expresiones numéricas 1 o 2 para seleccionarlos.

La función AEVAL(), a priori, no identifica el tipo de dato contenido en cada elemento del array, asumiendo que el bloque de código especificado sabrá tratarlos adecuadamente.

Sugerencias

La función AEVAL() es semejante a la función DBEVAL(), que ejecuta un bloque de código para cada registro de un archivo de datos.

Ejemplos

En este ejemplo, la función AEVAL() se utiliza para presentar un array con los nombres y las fechas de actualización de archivos de datos suministrados por la función DIRECTORY().

#include “Protheus.ch”

LOCAL aArqs := DIRECTORY(“*.CTE”)

AEVAL(aArqs, { | aDbf | MSGALERT(PADR(aDbf[F_NAME], 10), aDbf(F_DATE] ) } )

RETURN