XBROWSE, strange behavior...

[damianodec]

I have this code:

Code: Select all  Expand view

cAlias := cGetNewAlias( "UTILE2" )
   USE UTILE2 NEW ALIAS (cAlias) SHARED VIA "DBFCDX"
   SET ORDER TO TAG 1
   GO TOP
ordscope(0,chiavelocate)
ordscope(1,chiavelocate)
DbGotop()

DEFINE FONT oFont NAME 'TAHOMA' SIZE 0,-12
DEFINE DIALOG oDlg SIZE 1000,600 PIXEL TITLE UTILE1->RAGSOC FONT oFont;
           
@ 10,10 XBROWSE oBrw SIZE -10,-30 PIXEL OF oDlg ;
            AUTOSORT FOOTERS LINES CELL ALIAS cAlias ;
            COLUMNS "DESCRI", "UM", "QUANTI", "PREZZO", "EXTRA", "SCONTO", "IMPORT", "COSTO/1000", ;
                    "PERCUT", "EURTON", "KGVEND" ;
            HEADERS "DESCRIZIONE", "UM", "QUANTITA'", "PREZZO", "EXTRA", ;
                    "SCONTO", "IMPORTO", "COSTO", "% UT", "UT/TN", "KG" ;
            PICTURES ,,'@E 9,999,999.99','@E 999.99999','@E 9.99999','@E 999.99','@E 9,999,999.99', ;
                     '@E 999.99999','@E 9999.99','@E 99999.99', '@E 99999.99' ;
            SIZES   280,,70,,,,70

oBrw:bLogicLen = { || reccount()}
           
if !Empty( oCol := oBrw:oCol( "KG" ) )
    oCol:nFooterType := AGGR_SUM
endif   

oBrw:MakeTotals()
oBrw:CreateFromCode()

ACTIVATE DIALOG oDlg CENTERED
 

and I get this dialog:
[img]
http://imageshack.us/photo/my-images/405/dialogdf.png/
[/img]

the first row is duplicate (see the second line).
after about 10 seconds the second line disappears...
after about 10 seconds the second line reappears...
and continues...

[nageswaragunupudi]

Please remove this line.

Code: Select all  Expand view

oBrw:bLogicLen = { || reccount()}
 

XBrowse internally takes care of all.
There is no data bLogicLen in xbrowse.

[damianodec]

Hi,
I removed that line but not change.
That dialog is called from another xbrowse.
I have a xbrowse that read file utile1.dbf.
with double click in this xbrowse I open another xbrowse utile2.dbf.
For each record in utile1 there are one or more record in utile2. When I open utile2.dbf, I use ordscope(topdcope, cJoin) and ordscope(bottomscope, cJoin), where in cJoin put the value join.
Can I use other functions?

[nageswaragunupudi]

Please tru specifing Order Tag Name ( not number ) in the statement SET ORDER TO TAG <cTagName>