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

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.