Hola,
Necesito pasar una aplicación bastante grande, desde FWH del 2.006 con xHarbour a FWH 2014 con Harbour.
Me encuentro varios problemas al compilar y no encuentro cual es la razón, a ver si alguien me puede orientar.
1) En una definición de clase, si uso PRIVATE: o PUBLIC: para definir las DATA´s en estos ámbitos de visibilidad, Harbour se queja con este error:
Compilando lremesa.prg...
lremesa.prg(1435) Error E0020 Incomplete statement or unbalanced delimiters
lremesa.prg(1442) Error E0020 Incomplete statement or unbalanced delimiters
2) En este código:
Do Case
Case cType$"C" .OR. cType$"M"
x := comillas( "%"+Alltrim( x )+"%" )
Case cType == "N"
x := if(valtype(x)="C",val(x),x)
x := alltrim(Str( x, nLen, nDec ))
Case cType == "D"
TRY
if Empty(x)
x := "null"
else
x := comillas(if(valtype(x)="C", x, DtoS(x)))
endif
CATCH
msginfo( "Se ha encontrado una fecha errónea"+CRLF+ valtype(x) )
END
EndCase
da el error:
TDomDbf.prg(454) Error E0012 ENDCASE does not match DO CASE
3) En esta línea en C:
hb_storc( cAddr, -1, ++n );
da el error:
Error E2227 xDomi.prg 256: Extra parameter in call to hb_storc in function HB_FUN_GETLOCALIP
4) Por último unos warnings que no me gustan:
Compilando xZoom.prg...
C:\local\fwh2014\include\WinApi.ch(25) Warning W0002 Redefinition or duplicate definition of #define WS_CHILD
C:\local\fwh2014\include\WinApi.ch(27) Warning W0002 Redefinition or duplicate definition of #define WS_CLIPSIBLINGS
C:\local\fwh2014\include\WinApi.ch(37) Warning W0002 Redefinition or duplicate definition of #define WS_BORDER
C:\local\fwh2014\include\WinApi.ch(38) Warning W0002 Redefinition or duplicate definition of #define WS_DLGFRAME
C:\local\fwh2014\include\WinApi.ch(42) Warning W0002 Redefinition or duplicate definition of #define WS_THICKFRAME
Por supuesto con xHarbour compila bien.
Un Saludo,
Joaquín Martínez