FiveTech Software tech support forums

Saludos foro

Tengo esta linea de codigo y me esta generando incidencias con la compilacion de HBMK2

Code: Select all  Expand view

@ 04,37 GET oFrmDown:nAnoFin PICTURE "9999" SPINNER VALID (oFrmDown:nAnoFin>=oFrmDown:nAnoIni);
           WHEN oFrmDown:lRelease UPDATE VALID HACERFECHADOWN(oFrmDown)
 

Aca el error

hbmk2: Processing environment options: -comp=msvc
hbmk2: Compiling Harbour sources...
source\xxxxx.prg(1004) Error E0030 Syntax error "syntax error at '@'"

Estas son las librerias que utilizo

hbxpp.hbc
xhb.hbc
hbwin.hbc
hbct.hbc
hbmzip.hbc
hbziparc.hbc
hbfoxpro.hbc
hbmisc.hbc
hbodbc.hbc

Finalmente, realizo la compilacion con VisualStudio 2022

Gracias de antemano

Estas usando dos claúsulas VALID

de ahi el error

Gracias maestro

Acabo de remover una de las clausulas y el error persiste

Continua removiendo claúsulas, una a una y prueba

hasta que lo caces

Antonio Linares wrote:Continua removiendo claúsulas, una a una y prueba

hasta que lo caces

Coloque la instruccion asi y funciono. Haya lgun problema con esto ya que con xharbour funcionaba sin problemas

Code: Select all  Expand view

@ 04,37 GET oFrmDown:nAnoFin PICTURE "9999" SPINNER VALID (oFrmDown:nAnoFin>=oFrmDown:nAnoIni) ;
           WHEN oFrmDown:lRelease //UPDATE HACERFECHADOWN(oFrmDown)
 

Compuin wrote:
Coloque la instruccion asi y funciono. Haya lgun problema con esto ya que con xharbour funcionaba sin problemas

Code: Select all  Expand view

@ 04,37 GET oFrmDown:nAnoFin PICTURE "9999" SPINNER VALID (oFrmDown:nAnoFin>=oFrmDown:nAnoIni) ;
           WHEN oFrmDown:lRelease //UPDATE HACERFECHADOWN(oFrmDown)
 

Esto debería funcionar sin problema

Code: Select all  Expand view

@ 04,37 GET oFrmDown:nAnoFin PICTURE "9999" SPINNER VALID (oFrmDown:nAnoFin>=oFrmDown:nAnoIni) ;
           WHEN oFrmDown:lRelease UPDATE
 

Y, en cuanto a lo que comentas de xHarbour ( lo he usado muy poco por decir algo ), si un compilador no me detecta una duplicidad de una clausula en un preprocesado, pues, creo que no confiaría mucho en él, pero....

UPDATE no admite una acción, como haces en tu código:

UPDATE HACERFECHADOWN(oFrmDown)

De ahi el error

Hola maestro y Sr Navarro

Muchas gracias a ambos por sus comentarios y sugerencias