Re: Calling a CL program from a free-format RPG program

[Bill Howie <blhowie66@xxxxxxxxx>]

More great information!  Thanks to all!

Bill

On Fri, Jan 29, 2016 at 11:50 AM Denis Robitaille <
denis_robitaille@xxxxxxxxxxxx> wrote:

> This wil work just fine. Juste make sure to put the CL program name in
> uppercase and between quotes:
> CLProgram           PR              Extpgm('CLNAME')
>
>
> Denis Robitaille
> Chef de service TI - Solution Entreprise
> Infrastructure et Opérations
> Cascades Centre des technologies,
> 412 Marie Victorin
> Kingsey falls(Québec) Canada J0A 1B0
> T : 819 363 6130
>
>
>
> -----Message d'origine-----
> De : RPG400-L [mailto:rpg400-l-bounces@xxxxxxxxxxxx] De la part de Bill
> Howie
> Envoyé : 29 janvier 2016 10:54
> À : RPG programming on the IBM i (AS/400 and iSeries) <
> rpg400-l@xxxxxxxxxxxx>
> Objet : Calling a CL program from a free-format RPG program
>
> Hello all,
>
> I have what probably seems like a simple question but the solution is
> escaping me.   I have an RPG program written in free-format.   I'd like to
> call a CL program from this RPG program and send it a parameter.  I'd like
> to do this using free-format instead of switching back to fixed for the
> call.   Can I use the setup of defining the CL program as a procedure and
> using the EXTPGM keyword or is that only limited to calling an RPG
> program?  In other words can it be like this?
>
> CLProgram           PR              Extpgm(CLname)
> Parm1                 7  2
> Parm2                 5  0
>
>
> CallP CLProgram(Parm1:Parm2);
>
>
> Thoughts?  Thanks!
>
> Bill
> --
> This is the RPG programming on the IBM i (AS/400 and 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.
>
> Please contact support@xxxxxxxxxxxx for any subscription related
> questions.
> --
> This is the RPG programming on the IBM i (AS/400 and 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.
>
> Please contact support@xxxxxxxxxxxx for any subscription related
> questions.