con los últimos cambios en thdolphin
sucede que en una consulta con columnas tipo lógicas o de fecha, cuando no contienen datos, se convierten en tipo caracter vació.
revisando el código y comparando he realizado los siguientes cambios:
- Code: Select all Expand view
METHOD VerifyValue( nIdx, cField ) CLASS TDolphinQry
LOCAL cType, uValue
LOCAL nPad
cType := ::aStructure[ nIdx ][ MYSQL_FS_CLIP_TYPE ] //, ::aStructure[ nIdx ][ MYSQL_FS_TYPE ]
SWITCH cType
CASE "L"
IF cField == NIL //.OR. Empty(cField) <------------------------ ACA SE COMENTA ANTES DEl .OR.
uValue := If( IS_NOT_NULL( ::aStructure[ nIdx ][ MYSQL_FS_FLAGS ] ), .F., cField )
ELSE
uValue := If( ValType( cField ) == "L", cField, !( Val( cField ) == 0 ) )
ENDIF
EXIT
CASE "N"
IF cField == NIL //.OR. Empty(cField) <------------------------ ACA SE COMENTA ANTES DEl .OR.
uValue = If( IS_NOT_NULL( ::aStructure[ nIdx ][ MYSQL_FS_FLAGS ] ), 0, cField )
ELSE
uValue = If( ValType( cField ) == "N", cField, Val( cField ) )
ENDIF
EXIT
CASE "D"
IF Empty( cField ) //.OR. Empty(cField) <------------------------ ACA SE COMENTA ANTES DEl .OR.
uValue = If( IS_NOT_NULL( ::aStructure[ nIdx ][ MYSQL_FS_FLAGS ] ), CToD( "" ), cField )
ELSE
uValue := If( ValType( cField ) == "D", cField, SqlDate2Clip( cField ) )
ENDIF
EXIT
CASE "M"
// we can not use PadR in memo field
IF ( cField == NIL .OR. Empty(cField) )
uValue := ""
ELSE
uValue := cField
ENDIF
EXIT
CASE "T"
CASE "C"
IF D_SetPadRight()
nPad = Min( If( ::aStructure[ nIdx ][ MYSQL_FS_MAXLEN ] > ::aStructure[ nIdx ][ MYSQL_FS_LENGTH ],;
::aStructure[ nIdx ][ MYSQL_FS_MAXLEN ], ::aStructure[ nIdx ][ MYSQL_FS_LENGTH] ), MAX_BLOCKSIZE )
ELSE
nPad = 0
ENDIF
IF ( cField == NIL .OR. Empty(cField) )
uValue = If( IS_NOT_NULL( ::aStructure[ nIdx ][ MYSQL_FS_FLAGS ] ), PadR(nPad), cField )
ELSE
uValue := PadR( cField, Max( Len( cField ), nPad ) )
ENDIF
EXIT
#ifdef __XHARBOUR__
DEFAULT
#else
OTHERWISE
#endif
// uValue = cField
ENDSWITCH
RETURN uValue
otra cosa, has visto este post
http://forums.fivetechsupport.com/viewtopic.php?f=6&t=27901&p=155778&hilit=carlos+vargas#p155778