|
According to this from documentation on LIKEREC - A data structure--
defined with LIKEREC is a QUALIFIED data structure.
That's as much as i know - I don't know why the generated code is the
way it is.
Cheers
Vern
On 12/12/2021 12:38 PM, Art Tostaine, Jr. wrote:
Yes. Sorry it is not qualified.(Les
D DoBarCount PR N
D locrec LIKEDS(locmst_iu)
D VALUE
d p likerec(genhdr00r)
D VALUE
d c likerec(genhdr07r)
D VALUE
p DoBarCount b
d DoBarCount pi n
d locrec LIKEDS(locmst_iu)
d VALUE
d p likerec(genhdr00r)
d VALUE
d c likerec(genhdr07r)
d VALUE
exec sql select plt into :plt
from locplt00
where rid = :c.ghrid
and bld=:locrec.bld
and sec=:locrec.sec
and ais=:locrec.ais and slt=:locrec.slt and lvl=:locrec.lvl;
On Sun, Dec 12, 2021 at 6:49 AM Birgitta
Hauser<Hauser@xxxxxxxxxxxxxxx>
wrote:
Can you show the definition of the c datastructure?
Mit freundlichen Grüßen / Best regards
Birgitta Hauser
"Shoot for the moon, even if you miss, you'll land among the stars."
themBrown)
"If you think education is expensive, try ignorance." (Derek Bok)
"What is worse than training your staff and losing them? Not
training
theyand keeping them!"
„Train people well enough so they can leave, treat them well enough
so
business!don't want to.“ (Richard Branson)
-----Original Message-----
From: RPG400-L<rpg400-l-bounces@xxxxxxxxxxxxxxxxxx> On Behalf Of
Art Tostaine, Jr.
Sent: Sonntag, 12. Dezember 2021 03:13
To: RPG programming on IBM i<rpg400-l@xxxxxxxxxxxxxxxxxx>
Cc: David Gibbs<david@xxxxxxxxxxxx>
Subject: Re: SQL precompiler problem?
Yes.
On Sat, Dec 11, 2021 at 6:48 PM David Gibbs via RPG400-L <
rpg400-l@xxxxxxxxxxxxxxxxxx> wrote:
Is the c data structure qualified?
On Sat, Dec 11, 2021 at 2:14 PM Art Tostaine, Jr.
<atostaine@xxxxxxxxx>
wrote:
This is from the DBGVIEW of a SQLRPGLE. The embedded SQLshown
Statement is
commented out and then the generated code. You can see that thereally
SQL Statement has :C.GHRID but the generated SQL shows only
GHRID. This
screws up the program as you can imagine. Anyone seen this before?--
145000 //* exec sql select plt into :plt
145100 //* from locplt00
145200 //* where rid=:c.ghrid and bld=:locrec.bld and
sec=:locrec.sec
145300 //* and ais=:locrec.ais and slt=:locrec.slt and
lvl=:locrec.lvl;
145300 SQL_00005 = GHRID;
145300 SQL_00006 = LOCREC.BLD;
145300 SQL_00007 = LOCREC.SEC;
145300 SQL_00008 = LOCREC.AIS;
145300 SQL_00009 = LOCREC.SLT;
145300 SQL_00010 = LOCREC.LVL;
--
This is the RPG programming on IBM i (RPG400-L) mailing list To
post a message email:RPG400-L@xxxxxxxxxxxxxxxxxx To subscribe,
unsubscribe, or change list options,
visit:https://lists.midrange.com/mailman/listinfo/rpg400-l
or email:RPG400-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives at
https://archive.midrange.com/rpg400-l.
Please contactsupport@xxxxxxxxxxxxxxxxxxxx for any subscription
related questions.
Help support midrange.com by shopping at amazon.com with our
affiliate link:https://amazon.midrange.com
IBM i on Power Systems: For when you can't afford to be out of
or--
I'm riding in the American Diabetes Association's Tour de Cure to
raise money for diabetes research, education, advocacy, and awareness.
You can make a tax-deductible donation to my ride by visiting
https://mideml.diabetessucks.net.
You can see where my donations come from by visiting my
interactive donation map ...https://mideml.diabetessucks.net/map
(it's a geeky thing).
I may have diabetes, but diabetes doesn't have me!
--
This is the RPG programming on IBM i (RPG400-L) mailing list To
post a message email:RPG400-L@xxxxxxxxxxxxxxxxxx To subscribe,
unsubscribe, or change list options,
visit:https://lists.midrange.com/mailman/listinfo/rpg400-l
or email:RPG400-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives at
https://archive.midrange.com/rpg400-l.
Please contactsupport@xxxxxxxxxxxxxxxxxxxx for any subscription
related questions.
Help support midrange.com by shopping at amazon.com with our
affiliate link:https://amazon.midrange.com
This is the RPG programming on IBM i (RPG400-L) mailing list To
post a message email:RPG400-L@xxxxxxxxxxxxxxxxxx To subscribe,
unsubscribe,
relatedchange list options,
visit:https://lists.midrange.com/mailman/listinfo/rpg400-l
or email:RPG400-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives at
https://archive.midrange.com/rpg400-l.
Please contactsupport@xxxxxxxxxxxxxxxxxxxx for any subscription
relatedquestions.
Help support midrange.com by shopping at amazon.com with our
affiliate
link:
https://amazon.midrange.com
--
This is the RPG programming on IBM i (RPG400-L) mailing list To
post a message email:RPG400-L@xxxxxxxxxxxxxxxxxx To subscribe,
unsubscribe, or change list options,
visit:https://lists.midrange.com/mailman/listinfo/rpg400-l
or email:RPG400-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives
athttps://archive.midrange.com/rpg400-l.
Please contactsupport@xxxxxxxxxxxxxxxxxxxx for any subscription
--questions.
Help support midrange.com by shopping at amazon.com with our
affiliate link:https://amazon.midrange.com
This is the RPG programming on IBM i (RPG400-L) mailing list To post a
message email: RPG400-L@xxxxxxxxxxxxxxxxxx To subscribe, unsubscribe,
or change list options,
visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives at
https://archive.midrange.com/rpg400-l.
Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription
related questions.
Help support midrange.com by shopping at amazon.com with our affiliate
link: https://amazon.midrange.com
As an Amazon Associate we earn from qualifying purchases.
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.
midrange.com
