Bloques de código con parámetros y Eval

Descripción general

Bloque usa { |parámetros| expresiones } y recibe valores pasados a Eval después del bloque. Devuelve última expresión; bloque vacío devuelve Nil. Parámetros son locales al bloque; capturar variable del llamador es otro vínculo con efectos de memoria y duración. Ejemplo solo suma números sin macroejecución de texto. En callbacks de interfaz o ASort, respetar argumentos y retorno exigidos por llamador. (TOTVS, s.f., refs. 1–2)

Ejemplo comentado

#Include "Protheus.ch"
User Function EdBloco()
    Local bSumar := {|nUno, nDos| nUno + nDos}
    Local nTotal := Eval(bSumar, 7, 3)
    // Crear bloque no ejecuta expresion.
    ConOut(cValToChar(nTotal))
Return Nil

Contenido relacionado