::vGet[ 01 ] := IIf( cLinea IN { "HARBOUR", "XHARBOUR" }, IIf( cLinea == "HARBOUR", 1, 2 ), 1 )Muestra algo más completo.
en esa linea es el problema
Cual é el error? Post error.log ó un ejemplo simples. No hay nada en \samples con este comando.
::vGet[ 01 ] := IIf( ASCAN({ "HARBOUR", "XHARBOUR" },cLinea)>0, IIf( cLinea == "HARBOUR", 1, 2 ), 1 )Yo lo que quiero saber es si en harbour se utiliza el "IN" como en el xharbour..
Ahi el error que tira es (para mi entender) que el harbour no reconoce el "IN",
CM si pongo lo que me decis funciona bien. Pero quiero saber si en todas las app que este usando IN tengo que pasarlo a SCAN...
gracias.
"In" es una extensión de xHarbour. No existe en Harbour. Se usa "$" en vez de "In" como en clipper.
Saludos
if XHARBOUR
IN {....}
ELSE
$...
ENDIF::vGet[ 01 ] := IIf( ( cLinea = "HARBOUR" .or. cLinea = "XHARBOUR" ), IIf( cLinea == "HARBOUR", 1, 2 ), 1 )
Pruebo y aviso.
gracias.
Asà lo uso sin problemas con xHarbour:
::vGet[ 01 ] := IIf( cLinea IN "HARBOUR,XHARBOUR", IIf( cLinea == "HARBOUR", 1, 2 ), 1 )
o
::vGet[ 01 ] := IIf( cLinea $ "HARBOUR,XHARBOUR", IIf( cLinea == "HARBOUR", 1, 2 ), 1 )
Joel Andujo
en mi caso uso bastante el "IN" pero en xharbour,
ahora bien he visto que en algunos sources hacen algo para que cuando
se compile con xharbour tome un camino y cuando es con harbour utilicen otro,
pero no lo tengo bien presente como es el mecanismo al compilar, como le digo que estoy compilando
con xharbour o harbour.
Gustavo,
En hbcompat.ch mira como se traduce IN para que funcione en Harbour:
