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

Interesting. When did the type thing come in to play ?

I'm guessing this is what Jon was talking about.

Regards,
Richard Schoen
Web: http://www.richardschoen.net
Email: richard@xxxxxxxxxxxxxxxxx

------------------------------

message: 4
date: Tue, 19 Nov 2024 16:19:10 -0500
from: Buck Calabro <kc2hiz@xxxxxxxxx>
subject: Re: How do I pass a packed numeric valid into a called RPG
program?

On 11/19/2024 3:50 PM, James H. H. Lampert via RPG400-L wrote:

On 11/19/24 12:49 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?

I'm not *absolutely* certain of this, but I *think* you have to create
a *CMD object that will pass your parameter as packed.

Far and away, this is the easiest!!!

Nowadays, if I'm in a pinch, all I need to do is CALL PGM(mypgmn)
PARM((60609 (*DEC 5 0)))


In the old days, if I needed to test something quickly, I'd just send
the number in packed form. Say the parameter is packed(5, 0), and I want
to pass a ZIP code like 60609, that would look like

call mypgm x'60609f'