topic-16560

Board index FiveWin para Harbour/xHarbour No me actualiza la Variable

Posts: 325

Joined: Sun Feb 03, 2008 11:04 PM

No me actualiza la Variable
Posted: Thu Sep 03, 2009 11:55 AM

Estimados

Tengo variables que quiero actualizar con informacion de una base de datos, lo estaoy haciendo de esta forma.
el tema NO me actualiza la variable, que puede estar faltando?

este es un ejemplo.

Code (fw): Select all Collapse

local Q 
local NomVariResu
local NomCampResu

local mRESUL01:=0 
local mRESUL02:=0 
local mRESUL03:=0 

For Q = 1 to 3
  NomVariResu := 'mRESUL'+STRZERO(Q,2)
  NomCampResu := 'RESUL'+STRZERO(Q,2)
  &(NomVariResu) := (MUESRESU)->&(NomCampResu)
NEXT Q

muchas gracias

David
argentina

ADBLANCO

Posts: 299

Joined: Mon Oct 22, 2007 03:03 PM

Re: No me actualiza la Variable
Posted: Thu Sep 03, 2009 12:50 PM

prueba con

&NomVariResu. := (MUESRESU)->&NomCampResu

Saludos

Angel, Valencia, Venezuela

xH .997 - FW 7.9 - BCC55 - WorkShop - MySql

Biel EA6DD

Posts: 682

Joined: Tue Feb 14, 2006 09:48 AM

Re: No me actualiza la Variable
Posted: Thu Sep 03, 2009 01:35 PM

Seguramente como te comenta Angel te funcione, pero te quedaria un código más obtimizado y sin macrosustitución de la siguiente manera:

Code (fw): Select all Collapse

LOCAL q,aVar[3]

FOR q:=1 TO Len(aVar)
   aVar[q]:=MuesResu->(FieldGet(FieldName('resul'+STRZERO(Q,2))))
NEXT

Saludos desde Mallorca
Biel Maimó
http://bielsys.blogspot.com/

dobfivewin

Posts: 325

Joined: Sun Feb 03, 2008 11:04 PM

Re: No me actualiza la Variable
Posted: Sat Sep 05, 2009 09:34 AM

Muchas gracias por sus respuestas

Se solucionó declarando la variables como PRIVADAS, ya que me dijeron solo las variables Private se pueden actualizar.

muchas gracias

David

FiveTech Support Forums

Continue the discussion