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

2010-04-23 01:32 UTC+0300 Mindaugas Kavaliauskas (dbtopas/at/dbtopas.lt)

Browse Source 
* harbour/contrib/rddads/ads1.c
    * adjusted empty date fallback condition in putValue method. 
      Thanks Przemek for suggestion.
This commit is contained in:
Mindaugas Kavaliauskas
2010-04-22 22:32:31 +00:00
parent 6a2b94a9f6
commit e8a29d5ef3
2 changed files with 6 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
harbour/ChangeLog
View File

@@ -17,6 +17,11 @@
past entries belonging to author(s): Viktor Szakats.
*/
2010-04-23 01:32 UTC+0300 Mindaugas Kavaliauskas (dbtopas/at/dbtopas.lt)
* harbour/contrib/rddads/ads1.c
* adjusted empty date fallback condition in putValue method.
Thanks Przemek for suggestion.
2010-04-23 00:19 UTC+0200 Viktor Szakats (harbour.01 syenar.hu)
* contrib/hbwin/win_evnt.c
! Fixed C++ casting errors.

2
harbour/contrib/rddads/ads1.c
View File

@@ -2589,7 +2589,7 @@ static HB_ERRCODE adsPutValue( ADSAREAP pArea, HB_USHORT uiIndex, PHB_ITEM pItem
/* ADS does not support dates before 0001-01-01. It generates corructed
DBF records and fires ADS error 5095 on FIELDGET() later. [Mindaugas] */
if( pArea->iFileType != ADS_ADT && lDate < 1721426 ) /* 1721426 ~= 0001-01-01 */
if( pField->uiLen != 4 && lDate < 1721426 ) /* 1721426 ~= 0001-01-01 */
lDate = 0;
bTypeError = HB_FALSE;