RE: Enbedded SQL In RPGLE

Date: Thu, 29 Oct 2009 10:36:13 -0500
Subject: Re: Enbedded SQL In RPGLE
From: koldark@xxxxxxxxx
To: rpg400-l@xxxxxxxxxxxx

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.