Re: RPG IV value as var

Yep, there are some things that WDSC just doesn't catch - part of what keeps me from completely saying it replaces SEU - the latter follows all the rules.

One thing that bugs me - if I convert RPGLE code to free from using the right-click option in WDSC, it makes comments into free-form comments - double -slash at the start. If these comments are outside of a free-form section, they start in column 7 - so you can turn you D-spec comments into free-form ones - I like that. But the problem is, that positioning of the // is invalid inSIDE a free-form section - there it puts the comments at least at column 8 - I wish it'd put them at column 8 everywhere - have not had enough trouble to submit a change request - not enough time.

// comments are valid anywhere - don't have to be inside a free-form section. Makes me wish the new procedure wizard would use them, instead of P* and D* comments for the headers.

Later
Vern

Jerry Adams wrote:

I remember the /Title, /Eject and /Space from decades of RPG II, Vern. They were very useful when the only thing one had to look at was a card deck (!) and a listing.
I would have thought /Copy was your favorite since you listed it twice.
Anyway, I just wanted to remind the OP of the necessity of starting in column 7; you'll get the error he listed if you start /free in column 6 - but not (in WDSc, anyway) if you start in column 8 - but the compiler won't like it one bit.

Jerry C. Adams
IBM System i Programmer/Analyst
--
B&W Wholesale
office: 615-995-7024
email: jerry@xxxxxxxxxxxxxxx


-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Vern Hamberg
Sent: Tuesday, June 23, 2009 10:50 AM
To: RPG programming on the IBM i / System i
Subject: Re: RPG IV value as var

Jerry

Very picky but not a new thing - same as all the other compiler "slash" directives, like /copy, /title, /eject, /space, /copy, /include, and our favorite, /exec-sql

Anyone have a blast from the past looking at that list?

All the conditional directives also start in column 7.

Vern

Jerry Adams wrote:

Also, the /Free must start in column 7, not 6, not 8. Very picky.

Jerry C. Adams
IBM System i Programmer/Analyst
--
B&W Wholesale
office: 615-995-7024
email: jerry@xxxxxxxxxxxxxxx


-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Michael Ryan
Sent: Tuesday, June 23, 2009 9:24 AM
To: RPG programming on the IBM i / System i
Subject: Re: RPG IV value as var

RPGLE source type, right?

On Tue, Jun 23, 2009 at 9:58 AM, PEPITOVADECURT <pepitovadecurt@xxxxxxxxx>wrote:

Hi, when I introduce a line D, message appears, not permited line D (The
type isn't E,F...).
Not permited /FREE

What I need to install?



Pete Hall escribió:

PEPITOVADECURT wrote:

Is posible to assign a content from variable to a variable name?

It's not what you asked for, but this is about as close as you can get
with RPG. Of course the variable name is not "variable", but you can
assign a previously defined name to a storage location:

D MyVar S 10 Inz('MyValue')
D Pointer S * Inz(*NULL)
D MyNewVar S 10 Based(Pointer)
/FREE
// Here variable MyNewVar exists, but is undefined.
// any attempt to use it will produce an error.
Pointer = %Addr(MyVar);
// Here MyNewVar contains the value 'MyValue', and can be used
// just like any other variable.
/END-FREE

--
This is the RPG programming on the IBM i / System i (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.