Re: prototyping CL program in the CL program source

["Rory Hewitt" <roryhewitt@xxxxxxxxx>]

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.