topic-28019

Posts: 434

Joined: Wed Jun 06, 2007 02:58 PM

xbrowse sort
Posted: Thu Jan 30, 2014 10:22 AM

Hallo,
I can't put in order a table in XBROWSE

oDbf := CREATEOBJECT( "ADODB.Recordset" )
cQuery := ( "SELECT ....
oDbf:Open( cQuery , ....
oDbf:MoveFirst()
...
...
REDEFINE XBROWSE oBrw DATASOURCE odbf ;
COLUMNS "CODICE", "DESCRIZIONE","UM", "SALDO", "ORDINI" ;
COLSIZES 95, 330, 25, 80,70 ;
HEADERS "Codice", "Descrizione", "um", "Saldo", "Ordini" ;
PICTURE ,,,"@ZE 999,999.999","@ZE 999,999.999" ;
ID 200 OF oDlg ;
SORT "SALDO"

but the output is in "CODICE" ascend,
why?

FiveWin for xHarbour 24.02 - Feb. 2024 - Embarcadero C++ 7.60 for Win32 Copyright (c) 1993-2023

FWH 64 for Harbour 19.06 (MSVC++) Jun. 2019 - Harbour 3.2.0dev (r1904111533)

Visual Studio 2019 - Pelles C V.8.00.60 (Win64)

Rick Lipkin

Posts: 2706

Joined: Fri Oct 07, 2005 01:50 PM

Re: xbrowse sort
Posted: Thu Jan 30, 2014 02:01 PM

damianodec

When you create your query .. add the Order By clause to your recordset

Code (fw): Select all Collapse

cQuery := ( "SELECT .... Order by [Codice] DESC" )

Hope that helps

Rick Lipkin

James Bott

Posts: 4840

Joined: Fri Nov 18, 2005 04:52 PM

Re: xbrowse sort
Posted: Thu Jan 30, 2014 02:40 PM

Or this:

Code (fw): Select all Collapse

cQuery := ( "SELECT .... Order by [SALDO]" )

FWH 18.05/xHarbour 1.2.3/BCC7/Windows 10

damianodec

Posts: 434

Joined: Wed Jun 06, 2007 02:58 PM

Re: xbrowse sort
Posted: Thu Jan 30, 2014 08:55 PM

Saldo is calculate Field: Select... T0.totd - t0.tota as SALDO, if I put ORDER BY SALDO I get error...

Sent from lumia 720 Tapatalk

FiveWin for xHarbour 24.02 - Feb. 2024 - Embarcadero C++ 7.60 for Win32 Copyright (c) 1993-2023

FWH 64 for Harbour 19.06 (MSVC++) Jun. 2019 - Harbour 3.2.0dev (r1904111533)

Visual Studio 2019 - Pelles C V.8.00.60 (Win64)

Marcelo Via Giglio

Posts: 1088

Joined: Fri Oct 07, 2005 03:33 PM

Re: xbrowse sort
Posted: Thu Jan 30, 2014 11:13 PM

Code (fw): Select all Collapse

cQuery := ( "SELECT .... Order by T0.totd - t0.tota DESC " )

damianodec

Posts: 434

Joined: Wed Jun 06, 2007 02:58 PM

Re: xbrowse sort
Posted: Fri Jan 31, 2014 07:37 AM

ok,
and if I have this query whit subquery...

Select fieldA as A, fieldB as B, (Select SUM(fieldC) from tableB) as fieldZ
from tableA

and I want order by fieldZ ?

FiveWin for xHarbour 24.02 - Feb. 2024 - Embarcadero C++ 7.60 for Win32 Copyright (c) 1993-2023

FWH 64 for Harbour 19.06 (MSVC++) Jun. 2019 - Harbour 3.2.0dev (r1904111533)

Visual Studio 2019 - Pelles C V.8.00.60 (Win64)

James Bott

Posts: 4840

Joined: Fri Nov 18, 2005 04:52 PM

Re: xbrowse sort
Posted: Fri Jan 31, 2014 03:20 PM

I don't know if this will work, but try sorting the recordset after the query. This sorts the recordset after it is retrieved from the server.

Code (fw): Select all Collapse

oDbf:CREATEOBJECT("ADODB.Recordset")
oDdf:CursorLocation := 3   // client-side cursor 
oDbf:= ("SELECT...
oDbf:Open( cQuery, ...
oDbf:sort("SALDO")
oDbf:MoveFirst()

James

FWH 18.05/xHarbour 1.2.3/BCC7/Windows 10

damianodec

Posts: 434

Joined: Wed Jun 06, 2007 02:58 PM

Re: xbrowse sort
Posted: Mon Feb 03, 2014 08:50 AM

thanks mr James,
very good!

FiveWin for xHarbour 24.02 - Feb. 2024 - Embarcadero C++ 7.60 for Win32 Copyright (c) 1993-2023

FWH 64 for Harbour 19.06 (MSVC++) Jun. 2019 - Harbour 3.2.0dev (r1904111533)

Visual Studio 2019 - Pelles C V.8.00.60 (Win64)

FiveTech Support Forums

Continue the discussion