FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Macro en xHarbour
Posts: 845
Joined: Sun Oct 09, 2005 05:36 PM
Macro en xHarbour
Posted: Fri Jun 03, 2011 05:59 PM
Este codigo en Harbour si me funciona pero en xHarbour No

Local acObjF1[5], acObjF2[10]

FOR x := 1 TO LEN(aModulos)
xx := ALLTRIM(STR(x))
cVar := aModulos[x,3]
FOR y := 1 TO LEN(cVar)
acObjF&xx[y] := IF(VAL(SUBSTR(cVar,y,1))==1,.T.,) // me dice que la variable acObjF1 no existe
NEXT
NEXT

pero la declaro en Local
cual es el equivalente de esta operacion en xHarbour
gracias
saludos
paco
____________________

Paco

Continue the discussion