Re: RPG IV value as var

[Vern Hamberg <vhamberg@xxxxxxxxxxx>]

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