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

2009-10-01 13:22 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl)

Browse Source 
* harbour/include/hbrdddbf.h
  * harbour/source/rdd/dbf1.c
    ! resolve pending relations before clearing WA filter
This commit is contained in:
Przemyslaw Czerpak
2009-10-01 11:22:17 +00:00
parent 35e51707fa
commit a22cc6a4c6
3 changed files with 22 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.
*/
2009-10-01 13:22 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl)
* harbour/include/hbrdddbf.h
* harbour/source/rdd/dbf1.c
! resolve pending relations before clearing WA filter
2009-10-01 11:53 UTC+0200 Viktor Szakats (harbour.01 syenar.hu)
* config/global.mk
* utils/hbmk2/hbmk2.prg

2
harbour/include/hbrdddbf.h
View File

@@ -311,7 +311,7 @@ static HB_ERRCODE hb_dbfForceRel( DBFAREAP pArea );
#define hb_dbfOrderCreate NULL
#define hb_dbfOrderDestroy NULL
#define hb_dbfOrderInfo NULL
#define hb_dbfClearFilter NULL
static HB_ERRCODE hb_dbfClearFilter( DBFAREAP pArea );
#define hb_dbfClearLocate NULL
#define hb_dbfClearScope NULL
#define hb_dbfCountScope NULL

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

@@ -4810,6 +4810,22 @@ static HB_ERRCODE hb_dbfForceRel( DBFAREAP pArea )
return HB_SUCCESS;
}
/*
* Clear the filter condition for the specified WorkArea.
*/
static HB_ERRCODE hb_dbfClearFilter( DBFAREAP pArea )
{
HB_TRACE(HB_TR_DEBUG, ("hb_dbfClearFilter(%p)", pArea));
if( pArea->lpdbPendingRel )
{
if( SELF_FORCEREL( ( AREAP ) pArea ) != HB_SUCCESS )
return HB_FAILURE;
}
return SUPER_CLEARFILTER( ( AREAP ) pArea );
}
/*
* Set the filter condition for the specified WorkArea.
*/