RE: Using MIN in embedded SQL

[Gary Thompson <gthompson@xxxxxxxxxxx>]

Birgitta,
I think your solution is about as elegant and suitable to Michael's post
as possible.
On the other hand,  Dieter raises an excellent point, highlighting the
ambiguity of the post, which was confusing because Michael requested
setting "an RPG program variable" while providing query results having
multiple rows/values without further qualification.
Getting a result is one thing, getting a correct, reliable result over time
is another.
Michael could help others help him by including more detail about the
data and why a single value is required.


-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Birgitta Hauser
Sent: Thursday, April 10, 2014 10:58 PM
To: 'RPG programming on the IBM i (AS/400 and iSeries)'
Subject: AW: Using MIN in embedded SQL

I think this requirement can be done without CTE and/or sub-select:

Select  Ordyr, count(*) as Orders
   From MacFile
   Where Ordyr between 2003 and 2013
   Group By Ordyr
   Order By Orders
Fetch First Row Only;

Mit freundlichen Grüßen / Best regards

Birgitta Hauser

"Shoot for the moon, even if you miss, you'll land among the stars." (Les
Brown)
"If you think education is expensive, try ignorance." (Derek Bok) "What is worse than training your staff and losing them? Not training them and keeping them!"

-----Ursprüngliche Nachricht-----
Von: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx] Im Auftrag von Michael Smith
Gesendet: Thursday, 10.4 2014 22:43
An: RPG programming on the IBM i (AS/400 and iSeries)
Betreff: RE: Using MIN in embedded SQL

Thanks,  I will try this.

with years as (
  select ordyr, count(*) as orders
  from macfile
  where ordyr between 2003 and 2013
  group by ordyr)
select year, orders
from years
where orders = (select min(orders) from years)

--
This is the RPG programming on the IBM i (AS/400 and iSeries) (RPG400-L) mailing list To post a message email: RPG400-L@xxxxxxxxxxxx To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives at http://archive.midrange.com/rpg400-l.


--
This is the RPG programming on the IBM i (AS/400 and iSeries) (RPG400-L) mailing list To post a message email: RPG400-L@xxxxxxxxxxxx To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives at http://archive.midrange.com/rpg400-l.