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 21:33:04 +00:00
parent 7d3a9ee6ad
commit 56d7ec14ba
2 changed files with 10 additions and 0 deletions
--- 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 
--- 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: