Re: Concat an entire array

[Charles Wilt <charles.wilt@xxxxxxxxx>]

Is that a typo in your %SUBARR line?

Shouldn't it be
Field = %Trim(Field) + %Subarr(Array:1) ;

Charles

On Thu, Mar 10, 2016 at 2:43 PM, Jeff Crosby <jlcrosby@xxxxxxxxxxxxxxxx>
wrote:

> I have a field and an array defined:
>
> dcl-s Field Char(500) ;
> dcl-s Array Char(1) Dim(37) Inz(';') ;
>
> I want to concat the entire array onto the end of the field.  I've tried it
> 3 ways:
>
> Field = %Trim(Field) + Array(*) ;
> Field = %Trim(Field) + Array ;
> Field = %Trim(Field) + %Subarr(Array:(1)) ;
>
> All give me this compile error:
>
> RNF5343 Array has too many omitted indexes; specification is ignored.
>
> How do I do this?
>
> Thanks.
>
>
>
> --
>
>
> Jeff Crosby
> VP Information Systems
> UniPro FoodService/Dilgard
> P.O. Box 13369
> Ft. Wayne, IN 46868-3369
> 260-422-7531
> www.dilgardfoods.com
>
> The opinions expressed are my own and not necessarily the opinion of my
> company.  Unless I say so.
> --
> 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.
>
> Please contact support@xxxxxxxxxxxx for any subscription related
> questions.