RE: Compiler directive

I like being Bass-ackwards....

In the copybook I have:

/if defined(myproc)
 proc stuff goes here
/endif
/if defined(myproc2)
 proc2 stuff goes here...
/endif

Then in my programs I just define what I need copied in.

/define myproc
/copy mycopybook

That way if someone else looks at the main proc they see exactly what
parts of the copybook are being used....

Like I said...I'm Bass-ackwards.... 


Thanks,
Tommy Holden


-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of rob@xxxxxxxxx
Sent: Monday, August 07, 2006 4: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