Re: How do I pass a packed numeric valid into a called RPG program?

[Niels Liisberg <nli@xxxxxxxxxxxxxxxxx>]

Besides using data types directly on the call command like this
CALL   PGM(RPG_PGM) PARM((31 (*DEC 10 2)))

You can also declare your parameter in your RPGLE code a package decimal
(15.5)  this is what the command processor by default converts values to.

Then i look like;

CALL   PGM(RPG_PGM) PARM((31)

...
   pi *n;
      p1 packed (15:5);
   end-pi;





On Tue, Nov 19, 2024 at 9:47 PM <dfreinkel@xxxxxxxxxxxxxxxxx> wrote:

> I have seen it done but never used it. How would I call a RPG program
> passing packed numerics from the command line?
>
>
>
> Call RPG_PGM parm(31)
>
>
>
> TIA
>
>
>
> Darryl Freinkel
>
> A4G
>
> Telephone: 770.321.8562
>
>
>
> --
> This is the RPG programming on IBM i (RPG400-L) mailing list
> To post a message email: RPG400-L@xxxxxxxxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
> or email: RPG400-L-request@xxxxxxxxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at https://archive.midrange.com/rpg400-l.
>
> Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription related
> questions.