FiveTech Software tech support forums

http://computer-programming-forum.com/19-clipper/334184917aa7f776.htm nCampo:= 2 aFields := {"FIRST" ,; "LAST" ,; "STREET" ,; "CITY" ,; "STATE" ,; "ZIP" ,; "HIREDATE",; "MARRIED" ...

... CENTER Return(nil) //Esta funcion permite manejar las tablas aun sin datos //----------------------------------------- Function MyCampo(oBjeto, nCampo, nEnt, nDec) local cCampo, cRet, nCol, nCont, cField, nPos If VALTYPE(nCampo) = "C" // vino el nombre de un campo nCampo := ALLTRIM(nCampo) ...

... Gracias de antemano. Abrazos. A ver si entendí: aGet[1] := SPACE(len(cDBF->cCampo)) aGet[2] := Replicate("9",len(str(cDBF->nCampo))) PICTURE "999,999.99" SET DATE BRITISH SET CENTURY ON aGet[3] := cDBF->dCampo Saludos.

... que me pinte oMy:aDbf que es mi array oCol:bStrData :=vzGenArrayBlock( { || if(oBrow:nArrayAt=0,ablankito[1],oMy:aDbf[ oBrow:nArrayAt ])}, val(ncampo),"C", .t. , oMy , oBrow ) Bueno esta es mi funcion q genera el codeblock trabaja de maravillas cuando el array esta lleno STATIC FUNCTION vzGenArrayBlock( ...

... la columna Precio y mediante un menu secundario dispondría la selección y lo aplicaría a: :aColumns[ nColumn ]:bData := {|| ALIAS->( FieldGet( nCampo ) ) }, como indica Manuel Bueno, es la primer idea Saludos

... No soy experto en la TWBrowse de Hernán pero creo que podrías usar algo como esto: oLbx:aColumns[ nColumn ]:bData := {|| ALIAS->( FieldGet( nCampo ) ) } Así el dato que se muestra dependerá del valor de la variable nCampo Saludos Manuel Mercado

Alfonso,

Las macros (&) usan la tabla de símbolos pública y las variables locales no estan en dicha tabla, por eso falla.

Pruébalo así:
eval( &( "{| o | pruebas( o,nCampo)}" ), oGet )

... ) ) y funciona perfectamente, el problema es cuando queremos pasar parametros en la funcion, por ejemplo eval( &( "{|| pruebas(oGet,nCampo)}" ) ), en ese caso devuelve un error al tiempo de ejecucion "Variable oGet no encontrada", cuando realmente esta definida con anterioridad.