Re: SQL precompiler problem?

Yes. Sorry it is not qualified.

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." (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!"
„Train people well enough so they can leave, treat them well enough so they
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 SQL Statement
is

shown

commented out and then the generated code. You can see that the SQL
Statement has :C.GHRID but the generated SQL shows only GHRID. This

really

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 business!

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, 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, 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 related
questions.

Help support midrange.com by shopping at amazon.com with our affiliate
link:https://amazon.midrange.com