El &mes como lo suplanto?

[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

[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

[RuFer]

Luis Alfonso:

Funcionó perfecto.

Muchas gracias.

Ruben Fernandez.