Re: RDi 9.6 Procedure wizzard

Here is an example.


Called program:
/if not defined(PrototypesOnly)
ctl-opt Copyright('(C) Copyright Group Dekko Inc.')
ActGrp(*NEW) ExprOpts(*RESDECPOS) DatFmt(*USA)
OPTION(*SRCSTMT:*NODEBUGIO:*NOUNREF) EXTBININT(*YES)
BndDir('ROUTINES/SRVPGM':'QC2LE');
/endif

dcl-pr GDSMBOM1 extpgm;
INPPart char(15) const;
end-pr;

/if defined(PrototypesOnly)
/eof
/endif

Calling program
/define PrototypesOnly
/include QRPGLESRC,GDSMBOM1
/undefine ProtoTypesOnly
___________________________________
Darren Strong
Dekko





From: dlclark@xxxxxxxxxxxxxxxx
To: Rational Developer for IBM i / Websphere Development Studio Client
for System i & iSeries <wdsci-l@xxxxxxxxxxxx>
Date: 11/30/2017 01:48 PM
Subject: Re: [WDSCI-L] RDi 9.6 Procedure wizzard
Sent by: "WDSCI-L" <wdsci-l-bounces@xxxxxxxxxxxx>



"WDSCI-L" <wdsci-l-bounces@xxxxxxxxxxxx> wrote on 11/30/2017 01:40:51 PM:

Not seeing it on my end. I personally find compiler directives a better
way to bring in prototypes from the actual target program source, rather
than use /copy books to a source member with just a prototype in it

What compiler directive is it that will bring in prototypes from
the actual target program source?


Sincerely,

Dave Clark