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

2002-10-27 21:35 UTC+0100 J-F lefebvre <jfl@mafact.com>

Browse Source
This commit is contained in:
Jean-Francois Lefebvre
2002-10-27 20:41:36 +00:00
parent 99ebe7331f
commit 683aecc0e5
2 changed files with 7 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
harbour/ChangeLog
View File

@@ -8,6 +8,11 @@
2002-12-01 23:12 UTC+0100 Foo Bar <foo.bar@foobar.org>
*/
2002-10-27 21:35 UTC+0100 J-F lefebvre <jfl@mafact.com>
* source/rdd/dbf1.c
* added missing typecasting for msvc.
2002-10-27 10:28 UTC+0200 Chen Kedem <niki@actcom.co.il>
* doc/en/lang.txt
+ Added Russian KIO-8 to HB_LANGSELECT() list of supported ID's

4
harbour/source/rdd/dbf1.c
View File

@@ -1246,7 +1246,7 @@ ERRCODE hb_dbfPutValue( DBFAREAP pArea, USHORT uiIndex, PHB_ITEM pItem )
memcpy( pArea->pRecord + pArea->pFieldOffset[ uiIndex ],
hb_itemGetCPtr( pItem ), uiSize );
if( HB_IS_STRING( pItem ) )
hb_cdpnTranslate( pArea->pRecord + pArea->pFieldOffset[ uiIndex ], s_cdpage, pArea->cdPage, uiSize );
hb_cdpnTranslate( (char *) pArea->pRecord + pArea->pFieldOffset[ uiIndex ], s_cdpage, pArea->cdPage, uiSize );
memset( pArea->pRecord + pArea->pFieldOffset[ uiIndex ] + uiSize,
' ', pField->uiLen - uiSize );
}
@@ -1745,7 +1745,7 @@ ERRCODE hb_dbfOpen( DBFAREAP pArea, LPDBOPENINFO pOpenInfo )
( ( PHB_DYNS ) pArea->atomAlias )->hArea = pOpenInfo->uiArea;
if( pOpenInfo->cdpId )
{
pArea->cdPage = hb_cdpFind( pOpenInfo->cdpId );
pArea->cdPage = hb_cdpFind( (char *) pOpenInfo->cdpId );
if( !pArea->cdPage )
pArea->cdPage = s_cdpage;
}