diff --git a/harbour/ChangeLog b/harbour/ChangeLog index 65216652c8..6d84556b24 100644 --- a/harbour/ChangeLog +++ b/harbour/ChangeLog @@ -17,6 +17,10 @@ past entries belonging to author(s): Viktor Szakats. */ +2010-04-08 00:32 UTC+0200 Mindaugas Kavaliauskas (dbtopas/at/dbtopas.lt) + * harbour/contrib/sddodbc/sddodbc.c + + VARBINARY, LONGVARBINARY type support + 2010-04-07 09:44 UTC-0800 Pritpal Bedi (pritpal@vouchcac.com) * contrib/hbide/ideprojmanager.prg ! Added some more debug code for *nix users to understand diff --git a/harbour/contrib/sddodbc/sddodbc.c b/harbour/contrib/sddodbc/sddodbc.c index f64ce11669..98a435b277 100644 --- a/harbour/contrib/sddodbc/sddodbc.c +++ b/harbour/contrib/sddodbc/sddodbc.c @@ -434,6 +434,12 @@ static HB_ERRCODE odbcOpen( SQLBASEAREAP pArea ) pFieldInfo.uiType = HB_FT_STRING; break; + case SQL_VARBINARY: + case SQL_LONGVARBINARY: + pFieldInfo.uiType = HB_FT_STRING; + pFieldInfo.uiFlags = HB_FF_BINARY; + break; + case SQL_TINYINT: case SQL_SMALLINT: case SQL_INTEGER: