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

2008-09-23 08:45 UTC-0300 Antonio Carlos Pantaglione <toninho@fwi.com.br>

Browse Source 
* contrib/rddads/adsmgmnt.c
     + ADSMGSETHANDLE( nHandle ) to set an existing connection handle
     ! ADSMGGETUSERNAMES() that was skipping first user
This commit is contained in:
Antonio Carlos Pantaglione
2008-09-23 11:42:39 +00:00
parent a1a7c1cb07
commit b45ddd75e0
2 changed files with 17 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
harbour/ChangeLog
View File

@@ -8,6 +8,11 @@
2008-12-31 13:59 UTC+0100 Foo Bar (foo.bar foobar.org)
*/
2008-09-23 08:45 UTC-0300 Antonio Carlos Pantaglione <toninho@fwi.com.br>
* contrib/rddads/adsmgmnt.c
+ ADSMGSETHANDLE( nHandle ) to set an existing connection handle
! ADSMGGETUSERNAMES() that was skipping first user
2008-09-23 11:27 UTC+0200 Viktor Szakats (harbour.01 syenar hu)
* source/vm/fm.c
! Enabled USE_DL_PREFIX for _MSC_VER compilers.

18
harbour/contrib/rddads/adsmgmnt.c
View File

@@ -79,6 +79,12 @@ HB_FUNC( ADSMGGETHANDLE )
hb_retnl( ( long ) s_hMgmtHandle );
}
HB_FUNC( ADSMGSETHANDLE )
{
s_hMgmtHandle = hb_parnl( 1 );
hb_retl( 1 );
}
HB_FUNC( ADSMGKILLUSER )
{
hb_retnl( ( UNSIGNED16 ) AdsMgKillUser( s_hMgmtHandle,
@@ -383,22 +389,22 @@ HB_FUNC( ADSMGGETUSERNAMES )
PHB_ITEM pArrayItm = hb_arrayGetItemPtr( pArray, ulCount );
hb_arrayNew( pArrayItm, 6 );
hb_arraySetC( pArrayItm, 1, ( char * ) pastUserInfo[ ulCount ].aucUserName );
hb_arraySetNL( pArrayItm, 2, pastUserInfo[ ulCount ].usConnNumber );
hb_arraySetC( pArrayItm, 1, ( char * ) pastUserInfo[ ulCount - 1 ].aucUserName );
hb_arraySetNL( pArrayItm, 2, pastUserInfo[ ulCount - 1 ].usConnNumber );
#if ADS_LIB_VERSION >= 600
hb_arraySetC( pArrayItm, 3, ( char * ) pastUserInfo[ ulCount ].aucAddress );
hb_arraySetC( pArrayItm, 3, ( char * ) pastUserInfo[ ulCount - 1 ].aucAddress );
#else
hb_arraySetC( pArrayItm, 3, NULL );
#endif
#if ADS_LIB_VERSION >= 800
hb_arraySetC( pArrayItm, 4, ( char * ) pastUserInfo[ ulCount ].aucAuthUserName );
hb_arraySetC( pArrayItm, 5, ( char * ) pastUserInfo[ ulCount ].aucOSUserLoginName );
hb_arraySetC( pArrayItm, 4, ( char * ) pastUserInfo[ ulCount - 1 ].aucAuthUserName );
hb_arraySetC( pArrayItm, 5, ( char * ) pastUserInfo[ ulCount - 1 ].aucOSUserLoginName );
#else
hb_arraySetC( pArrayItm, 4, NULL );
hb_arraySetC( pArrayItm, 5, NULL );
#endif
#if ADS_LIB_VERSION >= 810
hb_arraySetC( pArrayItm, 6, ( char * ) pastUserInfo[ ulCount ].aucTSAddress );
hb_arraySetC( pArrayItm, 6, ( char * ) pastUserInfo[ ulCount - 1 ].aucTSAddress );
#else
hb_arraySetC( pArrayItm, 6, NULL );
#endif