Antonio,
Thanks. Resent the email.
Now it works fine with Browse() and OrdSetFocus(), but not with xBrowse().
With xBrowse() I get:
Error description: Error BASE/1074 Error de argumento: <=
Args:
[ 1] = C LIBROS1
[ 2] = N 2
Stack Calls
===========
Called from: lucas2.prg => ADO_ORDINFO( 824 )
Called from: => ORDBAGNAME( 0 )
Called from: .\source\classes\XBROWSE.PRG => TXBROWSE:SETRDD( 4140 )
Called from: .\source\classes\XBROWSE.PRG => XBRWSETDATASOURCE( 13030 )
Called from: .\source\function\XBROWSER.PRG => XBROWSE( 112 )
Called from: lucas2.prg => MAIN( 87 )
ADO_ORDINFO( 824 ) is:
- Code: Select all Expand view
CASE nIndex == DBOI_BAGNAME
IF ! Empty( aWAData[ WA_INDEXES ] ) .AND. ! Empty( aOrderInfo[ UR_ORI_TAG ] ) .AND. ;
aOrderInfo[ UR_ORI_TAG ] <= LEN(aWAData[ WA_INDEXES ])
last line.
\source\classes\XBROWSE.PRG => TXBROWSE:SETRDD( 4140 )
- Code: Select all Expand view
::aCols[ nFor ]:cOrdBag := ( cAlias )->( OrdBagName( ::aCols[ nFor ]:cSortOrder ) )
Seems that same change applied to OrdSetFocus() should be done to OrdBagName()?.
Thank you.
Muchas gracias. Many thanks.
Un saludo, Best regards,
Harbour 3.2.0dev, Borland C++ 5.82 y FWH 13.06 [producción]
Implementando MSVC 2010, FWH64 y ADO.
Abandonando uso xHarbour y SQLRDD.