Re: No %editc in V3R2!!! -- RPG400-L

How about creating the program in an RPG ILE program that
returns the value as a Parm.  Compile it any way you want.

Then when your RPG III programs want to call it, they call
the program using the CALL command, passing the parameter
and retrieving the parameter.  Your RPG III program doesn't
care if it's RPG III or RPG IV.

I did this when I wanted to take advantage of some RPG III
calls but usable by RPG II programs without having to convert
them.  Worked fine.

I basically made two programs.  Both RPG III, the initial one
is the one that actually did the call, and I would have other
RPG III programs call it.  The second was an RPG program that
called this program, then returned it in a format RPG II would
understand.  A wrapper, if you will.

Regards,

Jim Langston

Scott Klement wrote:
> 
> Hi Dan,
> 
> On Thu, 28 Dec 2000 D.BALE@handleman.com wrote:
> >
> > Scott, your example worked perfectly, except (?!?!?) that the app needs to 
>be
> > compiled with DFTACTGRP(*NO) ACTGRP(QILE).  Of course, you can't specify 
>these
> > on the H-spec in V3R2 <groan>, but only in the CRTBNDRPG command, which I 
>have
> > no control over in the aforementioned Aldon CMS.  I see in my v4r4 softcopy
> > that the H-spec supports these but, then, if it were v4r4 I was running on,
> > I'd had %editc and avoided this whole mess!  Gotta start pushing some hot
> > buttons around here to upgrade!
> >
> 
> Actually, it doesn't care what activation group you use, as long as it
> isn't the default activation group.   You can't use subprocedures in the
> default activation group.
> 
> If Aldon CMS (which I've never used) can't do any other activation group
> besides default, then it is broken and Aldon should fix it.   (in my
> opinion, anyway)  They have no business saying that they support RPG IV if
> you can't specify activation groups.
> 
> > Actually, when I did a straight compile, I got an error message:
> >      1 d EditC           PR            43A
> > ======>  aaaaa
> > *RNF3788 30 a  000100  Keyword EXTPGM must be specified when 
>DFTACTGRP(*YES) is
> >                        specified on the CRTBNDRPG command.
> >
> > Is there a way to specify EXTPGM for how I would like to use this 
>subprocedure
> > (source inline) without having to mess with compiler options?
> >
> > Dan Bale
> > IT - AS/400
> > Handleman Company
> > 248-362-4400  Ext. 4952
> >
> 
> No, if you want to use EXTPGM, you'd need to make the "EditC" subprocedure
> into a seperate program.   This would be workable, but would not have the
> source inline.  Since you can do this with RPG III programs as well,
> perhaps your shop standards don't forbid it?
> 
> Perhaps a better solution is to convert it from a subprocedure into a
> subroutine.  This would be a lot more awkward, hard to reuse, etc... but
> it'd solve the problem.
> 
> +---
> | This is the RPG/400 Mailing List!
> | To submit a new message, send your mail to RPG400-L@midrange.com.
> | To subscribe to this list send email to RPG400-L-SUB@midrange.com.
> | To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
> | Questions should be directed to the list owner/operator: david@midrange.com
> +---
+---
| This is the RPG/400 Mailing List!
| To submit a new message, send your mail to RPG400-L@midrange.com.
| To subscribe to this list send email to RPG400-L-SUB@midrange.com.
| To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---