topic-6941

Posts: 485

Joined: Fri Feb 09, 2007 10:34 AM

Asignar valor a una funcion
Posted: Tue May 08, 2007 05:57 PM

Muy buenas foro, tengo una duda sobre funciones, es decir, como podría asignar un valor a una funcion, me explico, tengo este codigo:

method Var(cCampo) class CDIt
local nPos
nPos:=ascan( ::acTipos, {|v| lower(v[1]) = lower(cCampo) } )
if nPos<>0
::acTipos[nPos,2] // Me da el valor de esa variable
end if
return

y me gustaría llamar a esa funcion como si de una variable se tratase, es decir, como algo así:

o:Var("numeroserie"):="999"

Entonces la variable numeroserie que está en un array de la clase CDIt pueda modificarla de esta forma, o como sea, es decir, enfocarme como podría hacerlo, gracias.

Un Saludo.

Antonio Linares

Posts: 44158

Joined: Thu Oct 06, 2005 05:47 PM

Asignar valor a una funcion
Posted: Tue May 08, 2007 08:02 PM

Code: Select all Collapse

method Var(cCampo, cValor ) class CDIt

   local nPos := AScan( ::acTipos, {|v| lower(v[1]) = lower(cCampo) } )

   if nPos<>0
      if PCount() > 1
         ::acTipos[nPos,2] = cValor
      else
         return ::acTipos[ nPos, 2 ]
      endif
   else
      ...
   end if

return

o:Var("numeroserie", "999" )

regards, saludos

Antonio Linares
www.fivetechsoft.com

FiveTech Support Forums

Continue the discussion