Subject Re: [firebird-support] Order By Not Working Using "WITH" Clause
Author Vishal Tiwari
Hi SET,

You have done it this time too....

Your SQL worked with a small amount of change in below statement

    DECLARE VARIABLE FK_BOM2 VARCHAR(2000);

Because FK_BOM2 is of GUID type.

You are awesome as usual.

I would like to say Thank You from bottom of HEART.... 


Thanks Once Again SET... You Are my ROCKSTAR.....


Thanking You And With Best Regards.

Vishal





On Friday, 3 July 2015 11:33 PM, "Svein Erling Tysvær svein.erling.tysvaer@... [firebird-support]" <firebird-support@yahoogroups.com> wrote:


 
>Hi All,
>
>I have below SQL, which is concatenating the ShortCode column data, but without ordering as per the ORDER_NUMBER column in ABC table in "WITH" clause.
>
>Please help.
>
>With TBL_SHORT_CODE (SHORT_CODE, FK_KEY) As 
>(
>SELECT Distinct(XYZ.SHORT_CODE) As SHORT_CODE, ABC.FK_KEY 
>From ABC Join XYZ On ABC.PK_KEY = XYZ.FK_KEY
>where XYZ.FK_KEY = '{009DA0F8-51EE-4207-86A6-7E18F96B983A}' And ABC.STATUS_CODE = 1
>Order By ABC.ORDER_NUMBER
>)
>
>SELECT LIST(Distinct(TBL_SHORT_CODE.SHORT_CODE), '' ), ABC.FK_BOM
>From ABC 
>Join XYZ ON ABC.FK_KEY = XYZ.PK_KEY 
>Join TBL_SHORT_CODE On TBL_SHORT_CODE.FK_KEY = ABC.FK_KEY
>where ABC.FK_BOM = '{009DA0F 8-51EE-4207-86A6-7E18F96B983A}' And ABC.STATUS_CODE = 1
>Group By ABC.FK_BOM

I've had a similar problem once, Vishal. Then I think I solved it by using EXECUTE BLOCK. You could try something similar:

EXECUTE BLOCK RETURNS (SHORT_CODES VARCHAR(2000), FK_BOM INTEGER
AS
DECLARE VARIABLE SHORT_CODE VARCHAR(20);
DECLARE VARIABLE FK_BOM2 INTEGER;
DECLARE VARIABLE DUMMY INTEGER;
BEGIN
FK_BOM = NULL;
FOR With TBL_SHORT_CODE (SHORT_CODE, FK_KEY, ORDER_NUMBER) As
(SELECT XYZ.SHORT_CODE, ABC.FK_KEY, min(ABC.ORDER_NUMBER)
From ABC Join XYZ On ABC.PK_KEY = XYZ.FK_KEY
where XYZ.FK_KEY = '{009DA0F8-51EE-4207-86A6-7E18F96B983A}' And ABC.STATUS_CODE = 1
group by 1, 2)

SELECT ABC.FK_BOM, tsc.SHORT_CODE, min(tsc.ORDER_NUMBER)
From ABC
Join XYZ ON ABC.FK_KEY = XYZ.PK_KEY
Join TBL_SHORT_CODE tsc On tsc.FK_KEY = ABC.FK_KEY
where ABC.FK_BOM = '{009DA0F 8-51EE-4207-86A6-7E18F96B983A}' And ABC.STATUS_CODE = 1
Group By 1, 2
ORDER BY 1, 3
into :FK_BOM2, :SHORT_CODE, :DUMMY do
begin
if (FK_BOM2 > FK_BOM) then
suspend;
if (FK_BOM2 is distinct from FK_BOM) then
begin
FK_BOM = FK_BOM2;
SHORT_CODES = '';
end
SHORT_CODES = SHORT_CODES ||', '||SHORT_CODE;
end
suspend;
end

This should order the SHORT_CODES by the lowest ORDER_NUMBER within each FK_BOM. To also order the FK_BOMs by the lowest ORDER_NUMBER amongst themselves would add more complexity, hopefully you don't need that.

HTH,
Set