la siguiente instruccion.
Code: Select all
cSql := "SELECT A.NUM_COBR, A.NOMBRE, B.NOMBRE AS CIUDAD, iif( A.ACTIVO,'Si','No') as CACTIVO "
cSql += "FROM COBRADORES AS A "
cSql += "LEFT OUTER JOIN CIUDADES AS B ON A.NUM_CIUD = B.NUM_CIUD "
// IF !Empty( cFiltro )
// cSql += "WHERE A." + cFiltro
// ENDIF
IF ADSRunSql( "REPO", cSql )
IF REPO->( Eof() )
MsgAlert( "No hay cobradores registrados, nada que listar!", "Alerta" )
ELSE
?1
aStruct := REPO->( DBStruct() )
xbrowse( aStruct )
?2
lSalir := FALSE
ENDIF
ENDIF
if( A.ACTIVO,'Si','No') as CACTIVO es definida por ADS como de tipo "Q", y eso amigos me esta jodiendo la vida.
![Smile :-)](./images/smilies/icon_smile.gif)
![Image](%5Burl=http%3A//imageshack.us/photo/my-images/843/estructuram.png/%5D%5BIMG%5Dhttp://img843.imageshack.us/img843/5074/estructuram.png)
![Image](http://img843.imageshack.us/img843/5074/estructuram.png)