2010-06-22 16:49 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl)
* harbour/src/rdd/dbcmd.c
* changed HB_LONG to int in dbSelectArea()
This commit is contained in:
@@ -16,6 +16,10 @@
|
||||
The license applies to all entries newer than 2009-04-28.
|
||||
*/
|
||||
|
||||
2010-06-22 16:49 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl)
|
||||
* harbour/src/rdd/dbcmd.c
|
||||
* changed HB_LONG to int in dbSelectArea()
|
||||
|
||||
2010-06-22 15:22 UTC+0200 Viktor Szakats (harbour.01 syenar.hu)
|
||||
* contrib/hbsqlit3/hbsqlit3.c
|
||||
+ Changed to use hb_fopen().
|
||||
|
||||
@@ -766,19 +766,19 @@ HB_FUNC( DBSELECTAREA )
|
||||
}
|
||||
else
|
||||
{
|
||||
HB_LONG lNewArea = hb_parnl( 1 );
|
||||
int iNewArea = hb_parni( 1 );
|
||||
|
||||
/*
|
||||
* NOTE: lNewArea >= HB_RDD_MAX_AREA_NUM used intentionally
|
||||
* In Clipper area 65535 is reserved for "M" alias [druzus]
|
||||
*/
|
||||
if( lNewArea < 1 || lNewArea >= HB_RDD_MAX_AREA_NUM )
|
||||
if( iNewArea < 1 || iNewArea >= HB_RDD_MAX_AREA_NUM )
|
||||
{
|
||||
hb_rddSelectFirstAvailable();
|
||||
}
|
||||
else
|
||||
{
|
||||
hb_rddSelectWorkAreaNumber( lNewArea );
|
||||
hb_rddSelectWorkAreaNumber( iNewArea );
|
||||
}
|
||||
}
|
||||
|
||||
|
||||
Reference in New Issue
Block a user