RE: prototyping CL program in the CL program source

Do you mean, CL has no concept of compiler directive?

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Rory Hewitt
Sent: Monday, November 13, 2006 10:56 AM
To: RPG programming on the AS400 / iSeries
Subject: Re: prototyping CL program in the CL program source

Lim,

Nope - CL has no concept of prototypes...

Rory


On 11/13/06, Lim Hock-Chai <Lim.Hock-Chai@xxxxxxxxxxxxxxx> wrote:

I plan to recommending putting external program's prototype inside of 
the source of the actual program.  Can this be done is CL program?

I can do it in RPG easily using Barbara's example that I seen long 
time
ago:

/if Defined (pgm_prototype_only)
D alphaDate       PR                  extpgm('TESTFREE2')
D  CurrDateAlp                   8A

D TESTFREE2       PR
D  CurrDateAlp                   8A
/endif

/if not Defined (pgm_prototype_only)

... actual program

/endif

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