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

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

Browse Source 
* contrib/rddsql/sddoci/sddoci.c
    ! Fixed handling of dates.
This commit is contained in:
Viktor Szakats
2010-02-27 23:20:29 +00:00
parent 7052a7a7a7
commit a082c41517
2 changed files with 9 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
harbour/ChangeLog
View File

@@ -17,6 +17,10 @@
past entries belonging to author(s): Viktor Szakats.
*/
2010-02-28 00:19 UTC+0100 Viktor Szakats (harbour.01 syenar.hu)
* contrib/rddsql/sddoci/sddoci.c
! Fixed handling of dates.
2010-02-27 11:40 UTC-0800 Pritpal Bedi (pritpal@vouchcac.com)
* contrib/hbqt/generator/hbqtgen.prg
! Introduced $EXTERNALLINK$ tag.
@@ -88,7 +92,7 @@
; Not being an Oracle user, I only have the few sample
tables, so no testing was made with these types.
; TOFIX: decimal position retrieval is currently wrong.
; TOFIX: date/time/timestamp doesn't seem to get through.
; TOFIX: date/time/timestamp doesn't seem to get through. [DONE]
* config/win/global.mk
* config/rules.mk

7
harbour/contrib/rddsql/sddoci/sddoci.c
View File

@@ -593,9 +593,10 @@ static HB_ERRCODE ocilibGoTo( SQLBASEAREAP pArea, HB_ULONG ulRecNo )
case HB_FT_TIME:
{
OCI_Date * date = OCI_GetDate( rs, ui );
int iHour, iMin, iSec;
if( date && OCI_DateGetTime( date, &iHour, &iMin, &iSec ) )
pItem = hb_itemPutTDT( NULL, 0,
int iYear, iMonth, iDay, iHour, iMin, iSec;
if( date && OCI_DateGetDateTime( date, &iYear, &iMonth, &iDay, &iHour, &iMin, &iSec ) )
pItem = hb_itemPutTDT( NULL, hb_dateEncode( iYear, iMonth, iDay ),
hb_timeEncode( iHour, iMin, iSec, 0 ) );
break;
}