|
total guess, but from 7.1 ILE RPG Lang Ref I do find "*N" mentioned as a "null response"
-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Steve Richter
Sent: Monday, October 07, 2013 1:14 PM
To: RPG programming on the IBM i (AS/400 and iSeries)
Subject: Re: Free format H, F, D and P specs
ctl-opt dftactgrp(*no);
dcl-pi *n;
caller_name char(10) const;
end-pi;
dcl-c RECORD_LEN 80;
dcl-f qprint printer(RECORD_LEN);
dcl-ds prtDs len(RECORD_LEN) qualified;
*n char(6) inz('Hello');
name char(50);
end-ds;
prtDs.name = transform(caller_name);
write qprint prtDs;
*inlr = '1';
dcl-proc transform;
dcl-pi *n varchar(50);
name varchar(10) const options(*trim);
end-pi;
return '*** ' + name + ' ***';
end-proc;
It looks good. Esp since it is optional.
I don't follow the *n in the first dcl_pi. Is that because there is only one procedure in the source member?
Can procedures be defined within procedures?
too bad the dcl-proc cant be rolled into the dcl-pi. All you need dcl-proc for is to export the procedure.
if we had namespaces then you could specify "file" in place of "dcl-f" and "con" in place of "dcl-c". If there was a name clash with file or con then you would qualify with the namespace.
The big thing still missing is referenced types like you get with C# and java. That would be terrific.
-Steve
On Mon, Oct 7, 2013 at 1:46 PM, CRPence <CRPbottle@xxxxxxxxx> wrote:
On 07 Oct 2013 08:47, Scott Klement wrote:--
IBM has announced support for free format in the H, F, D and P specs
this morning. Check it out https://ibm.biz/BdDMwB
Oh! It's not April Fool's day ;-)
FWiW only; offered for the text [for searching] and the navigation,
should any links end up broken... most likely for someone perusing
the archives in the future:
That "Free-form H F D P announcement" link is available from the
"Welcome to the RPG Cafe wiki" page, where some _additional links_
about RPG may be of interest; short URL first, expanded URL second:
RPG Cafe Community -> RPG Cafe Wiki -> Welcome
https://www.ibm.com/developerworks/ibmi/rpg/welcome
<
https://www.ibm.com/developerworks/community/wikis/home?#!/wiki/We131
1 6a562db_467e_bcd4_882013aec57a/page/Welcome
The navigation and expanded link for the "ibm.biz" link given above:
RPG Cafe Community -> RPG Cafe Wiki -> Welcome -> New with IBM i
7.1 TR 7 - Free-form H, F, D and P statements for RPG <
https://www.ibm.com/developerworks/community/wikis/home?lang=en#!/wik
i
/We13116a562db_467e_bcd4_882013aec57a/page/New%20with%20IBM%20i%207.1
%
20TR%207%20-%20Free-form%20H,%20F,%20D%20and%20P%20statements%20for%2
0
RPG
--
Regards, Chuck
--
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: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx Before posting, please take a
moment to review the archives at http://archive.midrange.com/rpg400-l.
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: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx Before posting, please take a
moment to review the archives at http://archive.midrange.com/rpg400-l.
--
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: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx Before posting, please take a
moment to review the archives at http://archive.midrange.com/rpg400-l.
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2024 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].
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.
midrange.com
