× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.



UNION by default will do a UNION DISTINCT Meaning that it will match
records from each select and make sure that only one record will be in the
result set. Thus taking more time to process. If you know that all
selects are going to return unique records, then it's best to specify UNION
ALL so that it doesn't look for matching records in the result set.



--

Michael Schutte
Admin Professional



Try Bob Evans GRILLING SAUSAGE! This summerâs hottest destination is your
own backyard with Bob Evans Brats and Italian Sausage! For tasty recipes
using Bob Evans grilling sausage, visit http://www.BobEvans.com/Recipes





Mike
<koldark@xxxxxxxx
m> To
Sent by: "RPG programming on the IBM i /
rpg400-l-bounces@ System i" <rpg400-l@xxxxxxxxxxxx>
midrange.com cc

Subject
10/29/2009 11:36 Re: Enbedded SQL In RPGLE
AM


Please respond to
RPG programming
on the IBM i /
System i
<rpg400-l@midrang
e.com>






I have always been confused on why use UNION ALL vs. UNION. Have you just
tried UNION?

--
Mike Wills
http://mikewills.info
P: (507) 933-0880 | Skype: koldark


On Thu, Oct 29, 2009 at 10:24 AM, Marc Couture <couturem@xxxxxxxxxxx>
wrote:


I Have an error, and can't figure out ! All the 3 files has same
structure.





*--------------------------------------------------------------------------------------------*


* Get BI Orders From OEHLDHDR, OEHDRBU or HSTHDRBU
*



*--------------------------------------------------------------------------------------------*


C Get_OeHldHdr Begsr

*

C/Exec Sql

C+ Select HordNo

SQL0109 UNION Clause not allowed

C+

C+ Into :XhOrdNo

C+

C+ From OeHldHdr

C+

C+ Where SubStr(Ech.hcpsn,3,10) = :BhInva

C+ Union All

C+

C+ Select HordNo

C+

C+ Into :XhOrdNo

C+

C+ From OeHdrBu

C+

C+ Where SubStr(Ech.hcpsn,3,10) = :BhInva

C+

C+ Union All

C+

C+ Select HordNo

C+

C+ Into :XhOrdNo

C+

C+ From HstHdrBu

C+

C+ Where SubStr(Ech.hcpsn,3,10) = :BhInva

C+

C+

C/End-Exec




Best Regards,



Marc

--
This is the RPG programming on the IBM i / System i (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 / System i (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.


As an Amazon Associate we earn from qualifying purchases.

This thread ...

Replies:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.