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

Totally agree on the lack of "press". Subroutines were added in V5.4.

At my last employer, I did a presentation for the other programmers shortly after I was hired in 2014. It was titled "Structured CL - Oxymoron or Awesome?". They were gobsmacked to see subroutines and bifs. We were on 7.2 at the time.

And, like Buck, I really enjoyed making use of CL subroutines. If they had just come out with local variables and parameter passing/return that would have been icing on the cake.

Roger Harman
COMMON Certified Application Developer - ILE RPG on IBM i on Power



-----Original Message-----
From: RPG400-L <rpg400-l-bounces@xxxxxxxxxxxxxxxxxx> On Behalf Of Buck Calabro
Sent: Wednesday, November 20, 2024 8:06 AM
To: rpg400-l@xxxxxxxxxxxxxxxxxx
Subject: Re: How do I pass a packed numeric valid into a called RPG program?

On 11/19/2024 5:22 PM, Richard Schoen wrote:

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

7.4

I always felt that CL enhancements didn't get enough 'press'.

https://www.ibm.com/docs/en/i/7.4?topic=language-whats-new-i-74

7.3 was quiet, but 7.2 had some string handling enhancements:
https://www.ibm.com/docs/en/i/7.2?topic=language-whats-new-i-72

I don't recall when it was added, but CALLSUBR and friends make CL
programming fun again.
--buck

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

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)))

--
--buck

http://wiki.midrange.com/
Your updates make it better!


--
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.