RE: Compiler directive

["Wilt, Charles" <CWilt@xxxxxxxxxxxx>]

Since I don't like having the /ENDIF all the way down at the bottom of
the include file.  I always do

/if defined (INVENTORY_INCD)
/eof                        
/else                       
/define INVENTORY_INCD      
/endif                      

Charles
 

> -----Original Message-----
> From: rpg400-l-bounces@xxxxxxxxxxxx 
> [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of rob@xxxxxxxxx
> Sent: Monday, August 07, 2006 5:08 PM
> To: RPG programming on the AS400 / iSeries
> Subject: Re: Compiler directive
>
> <snip>
>       /IF NOT DEFINED(copybook-name)
>       /DEFINE(copybook-name)
> copybook data goes here
>       /ENDIF
> </snip>
>
> You know, that may even look cleaner that what we currently 
> are doing. Our 
> main programs have:
>       /If not defined(JOBI0200)
>       /INCLUDE ROUTINES/QAPISRC,JOBI0200
>       /EndIf
> When they simply could have
>       /INCLUDE ROUTINES/QAPISRC,JOBI0200
> And then the member JOBI0200 could have:
>       /If not defined(JOBI0200)
>       // ... all the stuff that JOBI0200 currently has...
>       /EndIf
> And we wouldn't have to retrofit our current main programs.
> And if someone wrote a main program and forgot the /IF they 
> wouldn't get 
> burned.
>
> Rob Berendt
> -- 
> Group Dekko Services, LLC
> Dept 01.073
> PO Box 2000
> Dock 108
> 6928N 400E
> Kendallville, IN 46755
> http://www.dekko.com
>
> -- 
> 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.