FiveTech Software tech support forums

... ), .t. ) * endif endif DEFAULT ::bKeyNo := {| n | iif( n == nil,; ( ::cAlias )->( OrdKeyNo() ),; ( ::cAlias )->( OrdKeyGoto( n ); ) ) },; ::bKeyCount := {|| ( ::cAlias )->( If( eof() .and. bof(), 0, OrdKeyCount() ) ) } Endif :::::: ¿Puede alguien por favor decirme si causará algún error ...

... nHeight, lHighLite, .t., nFor, 0 ) endif 5. method paintdata() class txbrwcolumn if ::bStrData != nil.and. !EVAL(::obrw:bBookMark)==EVAL(::obrw:bkeyCount)+1,.t.); .or.::obrw:lgetbar.and.nPaintRow<=0 if ::obrw:lgetbar.and.nPaintRow==-1 cdata:=::cf1 elseif ::obrw:lgetbar.and.nPaintRow==0 cdata:=::cf2 ...

... xBrowse se debe a ADS, a mi me pasó lo mismo hace tiempo y lo solucione con estas 2 lineas en el xBrowse. Me lo dijeron aqui en el foro. oLstChq:bKeyCount := {|| h0["DetaCheq23"]:cAlias->( AdsKeyCount( , , ADS_RESPECTFILTERS ) ) } oLstChq:bKeyNo := {| n | IIf( HB_IsNil( n ), h0["DetaCheq23"]:cAlias->( ...

... )->(ordnumber()) == 0 DEFAULT ::bKeyNo := {| n | iif( n == nil,; ( ::cAlias )->( RecNo() ),; ( ::cAlias )->( DbGoto( n ); ) ) },; ::bKeyCount := {|| ( ::cAlias )->( If( eof() .and. bof(), 0, ReCcount() ) ) } else DEFAULT ::bKeyNo := {| n | iif( n == nil,; ( ::cAlias )->( OrdKeyNo() ...

It seems as oGet:bKeyCount is nil

Set a codeblock to that data to return the number of entries, I guess so

Maurizio,

Please try this change in Class TAutoGet:

METHOD KeyCount() INLINE If( ! Empty( ::bKeyCount ), Eval( ::bKeyCount ), 0 )

... oWIN:oClient:=oBRW oWIN:SetControl(oBRW) ACTIVATE WINDOW oWIN ON INIT WndAdjClient(oWIN:hWnd) ; VALID ( oBrw:bKeyCount:={||0} , oBrw:bKeyNo := {||0} , CLOSE_DB(oXDBF) , .T. ) Return .T. ************************ // Close DataBase Function CLOSE_DB(oDBF) IF oDBF<>NIL ...

Armando, comenta // esto:

oBrx:bKeyCount := {|| oRsAdj:RecordCount() }

Que retorna ahora?

... ). Avoid using kinetic browse and be careful about btnbar and menu actions. The should check whether the dbf is open before taking action, oBrw:bKeyCount := {|| 0 } oBrw:bKeyNo := {|| 0 } Make it much safer. We get used to these over time.

Probably bKeyCount was never initialized.
Can we see a small sample reproducing the problem?

... => TXBROWSE:KEYCOUNT( 0 ) in my copy of xbrowse (13.02) it corresponds to this line METHOD KeyCount() INLINE ( ::nLen := Eval( ::bKeyCount ),; iif(::oVScroll != nil ,; ( ::VSetRange( 1, ::nLen ), ::VUpdatePos() ), ),; ::nLen ) Richard

... => _FWH( 3169 ) Called from: => SYSREFRESH( 0 ) Here is a sample of my Mdi\Child valid close .. note the code blocks oLbxA:bKeyCount := { || 0 } oLbxA:bKeyNo := { || 0 } //---------------------------------------------Static FUNCTION ExitPgm( lOk3,oWndChildA,oWndCHild,oLbxA,lOk,;  ...

bKeyCount() might be the problem here as it might not be respecting filters ...?

Likely.

Actually the Loop should end when either nRow > Eval( bKeyCount ) .or. Eval( bSkip, 1 ) != 1, whichever happens first.

You can try checking behavior of these codeblocks.

... me. In theory users may set a filter and then try to export to excel that subset that passes the filter condition. Filters are created using AOFs. bKeyCount() might be the problem here as it might not be respecting filters ...? If so, then this is something I can fix. I'll get back when I have ...

... Check #1: Does the table really contain more rows than the limit? If so please consider exporting subsets of table. Check #2: Does Eval( oBrw:bKeyCount() ) correctly return the number of rows in the table? If not check the codeblocks for oBrw:bKeyCount() .and. oBrw:bSkip Check #3: We need ...