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.