Hi Michael
We have just recently upgraded to V7r1 from V5r4, and once I learnt that we were upgrading, I was determined to get as many people using free-form as I could force. cajole, bribe, strong arm etc.

I collected a list of web pages that I thought would be helpful for anyone to read and obtain a decent introduction

This is the list I concocted
Obviously there could be many more that can also be included

Four Reasons RPG Geezers Should Care About The New Free-Form RPG
https://www.itjungle.com/2014/02/12/fhg021214-story01/

The Geezer's Guide to Free-Form RPG, Part 2: Data Structures and More
https://www.itjungle.com/2014/04/16/fhg041614-story01/

The Geezer's Guide to Free-Form RPG, Part 3: Data Structures and More Data Definitions
https://www.itjungle.com/2014/05/28/fhg052814-story01/

The Geezer's Guide To Free-Form RPG, Part 4: Prototypes and Procedure Interfaces
https://www.itjungle.com/2014/07/09/fhg070914-story01/

The Geezer's Guide to Free-Form RPG, Part 5: File Definitions
https://www.itjungle.com/2014/08/13/fhg081314-story01/

Trying fully free RPG
http://www.rpgpgm.com/2015/12/trying-fully-free-rpg.html

Using SEU with totally free RPG
http://www.rpgpgm.com/2017/01/using-seu-with-totally-free-rpg.html

Coding in Free-Form RPG IV - a beginner's tutorial https://www.ibm.com/developerworks/community/wikis/home?lang=en#!/wiki/We13116a562db_467e_bcd4_882013aec57a/page/Coding%20in%20Free-Form%20RPG%20IV%20-%20a%20beginner%27s%20tutorial

Calling a program in totally free RPG
http://www.rpgpgm.com/2016/12/calling-program-in-totally-free-rpg.html

Practical RPG: Techniques for Procedures
http://www.mcpressonline.com/programming/rpg/practical-rpg-techniques-for-procedures?mc_cid=58ae4db7af&mc_eid=14b7380d89
The equivalent of MOVEA in all free RPG
http://www.rpgpgm.com/2016/09/the-equivalent-of-movea-in-all-free-rpg.html

Example subfile program using modern RPG
http://www.rpgpgm.com/2016/05/example-subfile-program-using-modern-rpg.html

Free-form RPG support on IBM i
https://www.ibm.com/developerworks/ibmi/library/i-ibmi-rpg-support/index.html

Surprises in the New Free Format RPG
http://www.ibmsystemsmag.com/ibmi/developer/rpg/freerpg_surprises/?page=2

RPG is free at last!
http://www.ocean400.org/assets/documents/2014/free_form_rpg_ocean.pdf

New RPG Free-Format operations
http://www.isoftwerks.net/newoperations.pdf

Defining variables in RPG all free
http://www.rpgpgm.com/2014/02/defining-variables-in-rpg-all-free.html

Deep dive into RPG free-form
http://www.semiug.org/2016/docs/Free_Form_RPG_Deeo_Dive.pdf
Alan Shore
E-mail : ASHORE@xxxxxxxx
Phone [O] : (631) 200-5019
Phone [C] : (631) 880-8640
'If you're going through hell, keep going.'
Winston Churchill


-----Original Message-----
From: RPG400-L [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of MichaelQuigley@xxxxxxxxxx
Sent: Friday, November 10, 2017 2:58 PM
To: rpg400-l@xxxxxxxxxxxx
Subject: Re: RPG Reference Guide (was: Anybody have an RPGIII program they could send me?)

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
AM:
----- Message from Jon Paris <jon.paris@xxxxxxxxxxxxxx> on Wed, 8 Nov
2017 07:38:05 -0500 -----

To:

Rpg400 Rpg400-L <rpg400-l@xxxxxxxxxxxx>

Subject:

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

Kevin,

You don't have to change the names to avoid "reserved" names in
free-form.

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

So this:

D myDS DS
D chain 1a

Becomes:

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

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

www.partner400.com
www.SystemiDeveloper.com

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

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


This thread ...

Replies:

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