RE: Compiler directive

Bob,

I get it.  I kind of like that approach.  One of my issues here with
using external defines is duplicating prototypes.  This may be my
answer.

Rick

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Bob Cozzi
Sent: Tuesday, August 08, 2006 12:26 PM
To: 'RPG programming on the AS400 / iSeries'
Subject: RE: Compiler directive

The member name is also used as the symbolic name.
The logic is actually the opposite of what you're describing.
If the symbol is NOT defined, the member is included, the
symbol is defined.
Should the member be /COPY'd into the same program again, the
symbol is already defined and therefore the member is not
/COPY'd in (the /EOF directive causes this).


-Bob Cozzi
www.iSeriesTV.com
Ask your Manager to watch iSeriesTV.com


-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of
Rick.Chevalier@xxxxxxxxxxxxxxx
Sent: Tuesday, August 08, 2006 11:37 AM
To: rpg400-l@xxxxxxxxxxxx
Subject: RE: Compiler directive


Bob,

I apologize if this was mentioned in another post.  The
thread is coming across in chunks for me.

What member name are you using for the define?  Is it the
copy member name or the program source member name?  I'm
thinking it has to be the copy member name.  If that's
correct I don't understand the point of defining it in your
example.  The MBRNAME define isn't used after it's defined. 
If it is defined (by the program source I presume) when the
member is loaded  the copy source is skipped.  It seems
backwards to me.

Rick

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Bob Cozzi
Sent: Tuesday, August 08, 2006 8:55 AM
To: 'RPG programming on the AS400 / iSeries'
Subject: RE: Compiler directive

Neither,
I do this:

 /IF NOT DEFINED(MBRNAME)
 /DEFINE MBRNAME
 /else
 /eof
 /endif
d  proc1          PR                
d   piParm1                     10 

d  proc2          PR                
d   piParm2                     10 

d  proc2          PR                
d   piParm2                     10 

I use the member name as the name for the DEFINED() parameter. That
way I never have an issue with multi-defined symbolic

names. However I

do often include an underscore in the name just to be more

confident

that it isn't defined elsewhere. For example:
  If NOT DEFINED(APPTITLE_MBRNAME)
  /DEFINE  APPTITLE_MBRNAME
etc.

-Bob Cozzi
www.iSeriesTV.com
Ask your Manager to watch iSeriesTV.com

Privileged and Confidential.  This e-mail, and any
attachments there to, is intended only for use by the
addressee(s) named herein and may contain privileged or
confidential information.  If you have received this e-mail
in error, please notify me immediately by a return e-mail and
delete this e-mail.
You are hereby notified that any dissemination, distribution
or copying of this e-mail and/or any attachments thereto, is
strictly prohibited.

--
This is the RPG programming on the AS400 / 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 AS400 / 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.

Privileged and Confidential.  This e-mail, and any attachments there to, is 
intended only for use by the addressee(s) named herein and may contain 
privileged or confidential information.  If you have received this e-mail in 
error, please notify me immediately by a return e-mail and delete this e-mail.  
You are hereby notified that any dissemination, distribution or copying of this 
e-mail and/or any attachments thereto, is strictly prohibited.