FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Problema con :=
Posts: 189
Joined: Fri Oct 14, 2005 12:33 AM
Problema con :=
Posted: Sun Nov 16, 2008 07:47 PM
Hola,

Utilizo FWH 8.10, con el xHarbour correspondiente. El siguiente pedacito de codigo me da problemas, a ver a quien mas le pasa:

mMes := MONTH(DATE())
mAno := YEAR(DATE())
MsgGet( "A que mes ?", "Introduzca el Mes de la Nomina", @mMes)
MsgGet( "A que año ?", "Introduzca el Año de la Nomina", @mAno)


El segundo MsgGet() me dice que la variable mAno no existe...

Cuando usaba FWH 2.7 + xHarbour 0.99.81 eso no ocurria !

¿Que pasa ?

Agradecido por adelantado,
Julio Llinás
Visita mi Blog en http://mangucybernetico.blogspot.com/
xHarbour 1.1.0 + FWH810 + Borland 5.5.1
Posts: 2365
Joined: Wed Nov 02, 2005 11:46 PM
Problema con :=
Posted: Sun Nov 16, 2008 08:18 PM

la has declarado local, static, public, etc...?

Posts: 189
Joined: Fri Oct 14, 2005 12:33 AM
Problema con :=
Posted: Mon Nov 17, 2008 12:53 AM
Ok, voy yo mismo otra vez, lo que pasa es que esto se podia antes en FWH 2.7, pero ahora no:

cCode := "nMes := MONTH(DATE())"
bCode := &("{||"+cCode+"}")
EVAL( bCode )
MsgInfo( nMes )


¿Que hacer ahora?.... ni idea, pues antes esto no daba problemas, ahora me dice que la variable nMes no existe.

Comprendo que el problema no es de FWH, sino mas bien de xHarbour.

¿Alguna solucion?

Gracias,
Julio Llinás
Visita mi Blog en http://mangucybernetico.blogspot.com/
xHarbour 1.1.0 + FWH810 + Borland 5.5.1
Posts: 389
Joined: Mon Oct 13, 2008 11:26 AM
Problema con :=
Posted: Mon Nov 17, 2008 11:10 AM

tente declarar a variável como private em outra função, tive um problema parecido com este e contornei assim [;)]

Email: SamirSSabreu@gmail.com
xHarbour 1.2.3 + Fwhh 20.2
Posts: 601
Joined: Wed Jul 04, 2007 03:51 PM
Problema con :=
Posted: Mon Nov 17, 2008 11:12 AM

Escomo dice sambomb, hay que declarar las variables.

Ojeda Esteban Eduardo.

Buenos Aires - Argentina.

FWH - PellesC - DBF/CDX - ADS - Gloriosos .Bat - MySql - C# .net - FastReport

Skype: jreduojeda
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Problema con :=
Posted: Mon Nov 17, 2008 11:53 AM

Te falta:

public nMes

ó

private nMes

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 8515
Joined: Tue Dec 20, 2005 07:36 PM
Problema con :=
Posted: Mon Nov 17, 2008 11:54 AM
Antonio Linares wrote:Te falta:

public nMes

ó

private nMes


#Include "FiveWin.Ch"

FUNCTION MES()

   MEMVAR mMes, mAno, cMes

   SET CENTURY ON
   SET DATE BRITISH
   SET EPOCH TO 1950

   mMes := MONTH(DATE())
   cMes := CMONTH(DATE())
   mAno := YEAR(DATE())

   MsgGet( "A que mes ? ", "Introduzca el Mes de la Nomina ", @mMes )
   MsgGet( "A que mes ? ", "Introduzca el Mes de la Nomina ", @cMes )
   MsgGet( "A que año ? ", "Introduzca el Año de la Nomina ", @mAno )

RETURN NIL

//-> FIN
João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341
Posts: 189
Joined: Fri Oct 14, 2005 12:33 AM
Problema con :=
Posted: Mon Nov 17, 2008 05:35 PM

Solucionado..... muchas Gracias

Lo que hice fue declarar las variables como PRIVATE antes de ejecutar las sentencias.

Abrazos,

Julio Llinás
Visita mi Blog en http://mangucybernetico.blogspot.com/
xHarbour 1.1.0 + FWH810 + Borland 5.5.1

Continue the discussion