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

2009-12-04 15:55 UTC+0200 Mindaugas Kavaliauskas (dbtopas/at/dbtopas.lt)

Browse Source 
* harbour/src/rdd/dbf1.c
    ! fixed variable length field setting after DBCREATE()
This commit is contained in:
Mindaugas Kavaliauskas
2009-12-04 13:57:10 +00:00
parent 699c1ce5f9
commit c7d2e8a0f4
2 changed files with 5 additions and 0 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.
*/
2009-12-04 15:55 UTC+0200 Mindaugas Kavaliauskas (dbtopas/at/dbtopas.lt)
* harbour/src/rdd/dbf1.c
! fixed variable length field setting after DBCREATE()
2009-12-04 10:29 UTC+0100 Viktor Szakats (harbour.01 syenar.hu)
* contrib/hbwin/tests/testprn.prg
! Fixed to fit all examples on the page.

1
harbour/src/rdd/dbf1.c
View File

@@ -3113,6 +3113,7 @@ static HB_ERRCODE hb_dbfCreate( DBFAREAP pArea, LPDBOPENINFO pCreateInfo )
uiCount = ( pArea->uiNullCount + 7 ) >> 3;
pThisField->bLen = ( BYTE ) uiCount;
pThisField->bDec = ( BYTE ) ( uiCount >> 8 );
pArea->uiNullOffset = pArea->uiRecordLen;
pArea->uiRecordLen += uiCount;
ulSize += sizeof( DBFFIELD );
}