compilando con Harbour/xHarbour tengo errores...

Mayor_Valenzuela · Post by **Mayor_Valenzuela** » Tue Sep 09, 2008 6:09 pm

En el siguiente código me da error en las senencias Copy To e Index On, me arroja que sigue:

.\SOURCE\IMPCOMI.PRG(139) Error E0030 Syntax error: "syntax error at 'TO'"

.\SOURCE\IMPCOMI.PRG(142) Error E0030 Syntax error: "syntax error at 'ON'"

**Copy To &(Substr(Local3,9,7))
If ( DbUseFile(Local1, .F.,"DBFNTX") )
DATABASE oDat[1]
** Index On N_Fact To &(Substr(Local1,9,7))
Else
Return ( Nil )
EndIf

** Es donde aparecen los errores, si puede ayudarme...
Gracias.

quique · Post by **quique** » Tue Sep 09, 2008 6:26 pm

prueba quitando los &

Mayor_Valenzuela · Post by **Mayor_Valenzuela** » Tue Sep 09, 2008 6:51 pm

Lo que sucede es que necesito la macrosustitucion para realizar esta tarea. A no ser que exista otro metodo de macro...

Gracias...

quique · Post by **quique** » Tue Sep 09, 2008 6:56 pm

según creo, debería de funcionarte bien utilizando () sin &, pero en dado caso prueba directamente con las funciones

__dbCopy()
dbCreateIndex()

Mayor_Valenzuela · Post by **Mayor_Valenzuela** » Tue Sep 09, 2008 8:05 pm

Bueno retire el & y deje solo los (), paso sin problemas... con la version anterior de harbour que estaba usando me lo reconocia de todas formas...

Muchas gracias...