Re: AW: SQL pre-compiler not recognizing /DEFINEd variable

If you are still on V5R2, you may try to include the copy member once with /COPY so it is considered by the SQL precompiler and the second time use /INCLUDE for including the copy member.
In this way the precompiler can access/determine the defined variables and does not get any trouble with the second implementation.

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 [mailto:rpg400-l-bounces@xxxxxxxxxxxx] Im Auftrag von mlazarus
Gesendet: Wednesday, 03.9 2014 19:34
An: RPG programming on the IBM i (AS/400 and iSeries)
Betreff: Re: AW: SQL pre-compiler not recognizing /DEFINEd variable

Stu,

Unfortunately, this is on a v5r2 box, so the RPGPPOPT() parm is not available on the CRTSQLRPGI command.

-mark

On 9/3/2014 1:19 PM, Stuart Rowe wrote:

I have no problems with this at all. I have some includes that
include others, several levels deep!

I use *LVL2 precompiler processing when I compile the module. I only
use /include statements, never /copy, so I can't offer any additional
knowledge for you there.

Stu



On Wed, Sep 3, 2014 at 12:09 PM, mlazarus<mlazarus@xxxxxxxx> wrote:

Charles,

This is working fine for RPGLE. For SQLRPGLE, the pre-compiler
seems to ignore ALL conditioning and setting of variables! This
there some setting / parameter to get it to recognize them? This is
making things quite a bit more complicated.

-mark


On 9/3/2014 12:27 PM, Charles Wilt wrote:

/INCLUDE works just like /COPY from the RPG compiler perspective...

It's just the SQL pre-compiler that treats them differently.

Charles


On Wed, Sep 3, 2014 at 10:59 AM, mlazarus<mlazarus@xxxxxxxx> wrote:

Birgitta,

Is this a permanent restriction? I can't use /INCLUDE in this
case, since the production code actually has the prototype and a
couple of related procedures. (They are message handling routines,
and I don't want to put them into a service program.) Therefore, I
really do want the same member /COPY'ed twice, but different
sections should be included based on the variable definition.

-mark


On 9/3/2014 1:18 AM, Birgitta Hauser wrote:

Just use /INCLUDE instead of /COPY.
The SQL precompiler may have some problems with compiler
directives and including the same copy member multiple times.
Since the copy member X@ only includes a prototype, which is not
used by any SQL statement, use /INCLUDE.
Copy members included with /INCLUDE are ignored by the SQL
precompiler (by
default)

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 [mailto:rpg400-l-bounces@xxxxxxxxxxxx] Im Auftrag
von mlazarus
Gesendet: Wednesday, 03.9 2014 00:24
An: RPG400-L@xxxxxxxxxxxx
Betreff: SQL pre-compiler not recognizing /DEFINEd variable

I just ran into an SQL pre-compiler situation that seems to
be a defect.

When compiling this as an RPGLE, it compiles fine. Changing
it to SQLRPGLE causes it to fail:
SQL1106 30 RPG specification out of order.

It looks like it's ignoring the defined variable and copying
the code again. This is for a client that's still on V5R2. Does
this work properly at a current compiler version?

Here's a test program to illustrate:

H OPTION( *SrcStmt: *NoDebugIO )
H dftactgrp(*NO) actgrp(*new)
/COPY X@
d Test2 pr
C EVAL *INLR = *On
P Test2 b
d Test2 pi
P Test2 e
/COPY X@

______________
Include member X@:

/IF NOT DEFINED(TestPgmPRCopied)
/DEFINE TestPgmPRCopied
* Test prototype
D TestPgm PR ExtPgm('TESTPGM')
/ENDIF

-mark
--
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.

--

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.