Most of the times we test the variable contents in a way that is subject to
errors (mistyping).

#xtranslate BETWEEN( <xLowVal>, <xVar>, <xHighVal> ) => ((<xLowVal> <=
<xVar> .AND. <xVar> <= <xHighVal> ))

#xtranslate INLIST( <xData>, <aList> ) => (ASCAN( <aList>, <xData> ) > 0)

Simple to search when debugging.

HTH

Jos Luis Otermin
Technical Support
--------------------------------------------------------------------
Alaska Software Inc.
Foros de Usuarios: news://news.alaska-software.com
Foros de Usuarios Web: http://news.alaska-software.com
Pgina Web: http://www.alaska-software.com
Base de Conocimientos en la Web: http://www.alaska-software.com/kbase.shtm
Oficina en Europa: Fax: +49 (0) 61 96 - 77 99 99 23
Oficina en EEUU: Fax: +1 (646) 218 1281
--------------------------------------------------------------------
Nos gustara poder recibirle en la tercera conferencia de Xbase++ en
Manchester, NH, EE.UU.; Los detalles se encuentran ac:
http://www.xbasedevcon.com:8001/

As vezes testamos o contedo das variveis em uma forma que pode acontecer
um erro. (A maiora, na escritura).

#xtranslate BETWEEN( <xLowVal>, <xVar>, <xHighVal> ) => ((<xLowVal> <=
<xVar> .AND. <xVar> <= <xHighVal> ))

#xtranslate INLIST( <xData>, <aList> ) => (ASCAN( <aList>, <xData> ) > 0)

Estas pseudo funes so mais simples quando estamos depurando o cdigo.


Saudaes

Jos Luis Otermin
Suporte Tcnico
--------------------------------------------------------------------
Foros de Usurios: news://news.alaska-software.com
Foros de Usurios na Web: http://news.alaska-software.com
Pgina Web: http://www.alaska-software.com
Base de Conhecimentos na Web: http://www.alaska-software.com/kbase.shtm
Escritrio em Europa: Fax: +49 (0) 61 96 - 77 99 99 23
Escritrio em  USA: Fax: +1 (646) 218 1281
--------------------------------------------------------------------
Ns gostaramos de receb-lo na terceira conferncia de Xbase++ em
Manchester, NH, EUA; Os detalhes esto aqui:
http://www.xbasedevcon.com:8001/