RE: How to access to an Array of String

Barbara,

Leaving the name blank isn't an option with how I put together the DS. I think what you're saying is only possible if you provide explicit definitions like this:

D stringDS DS
D 4a Inz( 'toto' )
D 4a Inz( 'tutu' )
D 4a Inz( 'tata' )
D lStringArray 4a Varying Dim( 3 ) Overlay(stringDS:1)


Whoops, now that I look at the code samples I provided earlier, I don't think they are correct.
lStringArray needs the "Pos( 1 )" keyword in freeform and the "Overlay(stringDS:1)" keyword in fixed form.

Kurt Anderson
Sr. Programmer/Analyst - Application Development, Service Delivery Platform

-----Original Message-----
From: RPG400-L [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Barbara Morris
Sent: Wednesday, August 05, 2015 6:18 PM
To: rpg400-l@xxxxxxxxxxxx
Subject: Re: How to access to an Array of String

On 8/5/2015 9:26 AM, Kurt Anderson wrote:

D stringDS DS
D *n Like( lStringArray ) Inz( 'toto' )
D *n Like( lStringArray ) Inz( 'tutu' )
D *n Like( lStringArray ) Inz( 'tata' )
D lStringArray 100a Varying Dim( 3 )

return lStringArray;

I wasn't aware of *n until the new freeform came out, so I don't know if that's available in fixed format on older versions or not. If not, simply replace with a name. I also went with a random size for your string array.

In fixed form, you just leave the name blank. *n is only available in free-form; it's used in the cases where fixed-form allows the name entry to be blank.

--
Barbara

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