Hi Michael,

I start here:

It's not as user-friendly as we'd all like but everything is here.
Hope this helps.

Yours truly,

Glenn Gundermann
Email: glenn.gundermann@xxxxxxxxx
Work: (905) 486-1162 x 239
Cell: (416) 317-3144

On 10 November 2017 at 14:57, <MichaelQuigley@xxxxxxxxxx> wrote:

Is def-subj supposed to be dcl-subf instead? I'm trying to step up my use
of RPG and working hard to do it in free-form. I understand if this was
simply a typo (the Lord knows I make enough of those myself), but I want
to be sure I haven't missed something.

This also begs the question. Where on God's green earth do you find a
decent RPGLE Reference manual? </warning rant> IBM's websites have always
been a little frustrating. Recently, they've gone to catastrophic lengths
of obfuscation to make it virtually unusable--either that or I'm just a
complete failure at using it. Well, I'm a failure at using it no matter
what the cause. Then to frustrate me even more once I find something, the
format is sooooo different than the way IBM Reference manuals were for
decades that I have a hard time understanding how I'm to apply the
information therein. </end rant>

I wish I felt better after then rant, but I really don't.

Michael Quigley
Computer Services
The Way International

"RPG400-L" <rpg400-l-bounces@xxxxxxxxxxxx> wrote on 11/08/2017 07:38:21
----- Message from Jon Paris <jon.paris@xxxxxxxxxxxxxx> on Wed, 8
Nov 2017 07:38:05 -0500 -----


Rpg400 Rpg400-L <rpg400-l@xxxxxxxxxxxx>


Re: Anybody have an RPGIII program they could send me?


You don't have to change the names to avoid "reserved" names in

On data declarations in DS for example you simply add dcl-subj in
front of the name.

So this:

D chain 1a


Dcl-ds myDS;
def-subf chain char(1);

Similar options exist for procedure interface and prototype
parameters. It is basically the same scenario as being able to omit
EVAL in cals. You can omit it if the filed name does not match an
opcode name. So you have to code:

EVAL chain = 'Y';

Jon Paris


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: https://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at https://archive.midrange.com/rpg400-l.

Please contact support@xxxxxxxxxxxx for any subscription related

Help support midrange.com by shopping at amazon.com with our affiliate
link: http://amzn.to/2dEadiD

This thread ...


Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2020 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].