fivedev/harbour-core
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

2010-03-02 00:45 UTC+0100 Viktor Szakats (harbour.01 syenar.hu)

Browse Source 
* contrib/rddsql/sddodbc/sddodbc.c
    ! Fixed returning Chr( 0 ) instead of last real char.
This commit is contained in:
Viktor Szakats
2010-03-01 23:47:23 +00:00
parent 96328f92e2
commit 39320786aa
2 changed files with 6 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
harbour/ChangeLog
View File

@@ -17,6 +17,10 @@
past entries belonging to author(s): Viktor Szakats.
*/
2010-03-02 00:45 UTC+0100 Viktor Szakats (harbour.01 syenar.hu)
* contrib/rddsql/sddodbc/sddodbc.c
! Fixed returning Chr( 0 ) instead of last real char.
2010-03-01 14:45 UTC+0100 Viktor Szakats (harbour.01 syenar.hu)
* contrib/rddsql/sddodbc/sddodbc.c
+ Added support to return any size of string buffer from ODBC.

4
harbour/contrib/rddsql/sddodbc/sddodbc.c
View File

@@ -594,8 +594,8 @@ static HB_ERRCODE odbcGoTo( SQLBASEAREAP pArea, HB_ULONG ulRecNo )
{
if( iLen > 0 )
{
SQLPOINTER * val = ( SQLPOINTER * ) hb_xgrab( iLen );
if( SQL_SUCCEEDED( res = SQLGetData( hStmt, ui, iTargetType, val, iLen, &iLen ) ) )
SQLPOINTER * val = ( SQLPOINTER * ) hb_xgrab( iLen + sizeof( O_HB_CHAR ) );
if( SQL_SUCCEEDED( res = SQLGetData( hStmt, ui, iTargetType, val, iLen + sizeof( O_HB_CHAR ), &iLen ) ) )
{
#if defined( UNICODE )
iLen /= 2;