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

2007-05-04 11:06 UTC+0100 Miguel Angel Marchuet (miguelangel/at/marchuet.net)

Browse Source 
* source/rdd/wafunc.c
    * change of the behavior of DbUseArea opening, so that one behaves like made Clipper, when it fails the
      opening of a table, does not recover the previous area.
This commit is contained in:
Miguel Angel Marchuet Frutos
2007-05-04 09:09:00 +00:00
parent 7cf42f9fd5
commit 71af9421c6
2 changed files with 12 additions and 4 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 13:30 UTC+0100 Foo Bar <foo.bar@foobar.org>
*/
2007-05-04 11:06 UTC+0100 Miguel Angel Marchuet (miguelangel/at/marchuet.net)
* source/rdd/wafunc.c
* change of the behavior of DbUseArea opening, so that one behaves like made Clipper, when it fails the
opening of a table, does not recover the previous area.
2007-05-04 10:15 UTC+0100 Miguel Angel Marchuet (miguelangel/at/marchuet.net)
+ contrib/bmdbfcdx/Makefile
+ contrib/bmdbfcdx/bmdbfcdx1.c

11
harbour/source/rdd/wafunc.c
View File

@@ -578,7 +578,7 @@ ERRCODE hb_rddOpenTable( const char * szFileName, const char * szDriver,
char szDriverBuffer[ HARBOUR_MAX_RDD_DRIVERNAME_LENGTH + 1 ];
DBOPENINFO pInfo;
ERRCODE errCode;
USHORT uiPrevArea;
//USHORT uiPrevArea;
AREAP pArea;
/* Clipper clears NETERR flag before RT error below */
@@ -600,7 +600,7 @@ ERRCODE hb_rddOpenTable( const char * szFileName, const char * szDriver,
szDriver = hb_rddDefaultDrv( NULL );
}
uiPrevArea = hb_rddGetCurrentWorkAreaNumber();
//uiPrevArea = hb_rddGetCurrentWorkAreaNumber();
/*
* 0 means chose first available in hb_rddInsertAreaNode()
@@ -649,12 +649,15 @@ ERRCODE hb_rddOpenTable( const char * szFileName, const char * szDriver,
{
/* Open file */
errCode = SELF_OPEN( pArea, &pInfo );
/*-----------------04/05/2007 11:00-----------------
* Clipper not restore the old workarea
* --------------------------------------------------*/
/*
if( errCode != SUCCESS )
{
hb_rddReleaseCurrentArea();
hb_rddSelectWorkAreaNumber( uiPrevArea );
}
}*/
}
}