Page 1 of 1

El &mes como lo suplanto?

Posted: Tue Mar 14, 2006 12:01 am
by RuFer
Amigos:

Tengo una Base de Datos _ son
Mes1,mes1,mes3 hasta mes12

una variable cMes
cMes :="MES"+ALLTRIM(STR(MONTH(FOCU)))
IF DBSEEK(STRZERO(VAL(cMes),10))
CANTIR->&cMes := CANTIR->&cMes + 1
ELSE
DBAPPEND()
CANTIR->&cMes := CANTIR->&cMes +1
ENDIF

En el símbolo & tengo el problema, funcionaba Ok con los
FW 16 bits

Muchas Gracias

Ruben Fernandez

Posted: Tue Mar 14, 2006 1:17 am
by lafug
Ruben,

cMes :="MES"+ALLTRIM(STR(MONTH(FOCU)))

A mi me funciona asi:

en vez de usar CANTIR->&cMes

prueba:

CANTIR->&( "MES"+ALLTRIM(STR(MONTH(FOCU))) )

saludos
xHabrazos
FWH2.7, xHarbour, BCC55

Posted: Tue Mar 14, 2006 2:37 am
by RuFer
Luis Alfonso:

Funcionó perfecto.

Muchas gracias.

Ruben Fernandez.