Re: movea in Free Options?

[michaelr_41@xxxxxxxxxxxxxx]

Try putting the array in a data structure and moving the data structure.

On Wed, 16 Jun 2004 16:56:32 -0400, "Bruce Odum" <bodum@xxxxxxxxxxxx>
said:
> I am trying to figure out how to get around the lack of options for
> movea in free format.  I have tried creating arrays the same length as
> the passed in field which was passed its data using movea so each 2500
> filed was constructed in the same fashion as the arrays in this example.
> Does anyone have a good way to load an array in free either from a
> preformatted string or moving the array back into a string?
> 
> PSnd_Mail         B                   Export                   
> D Snd_Mail        PI             5i 0                          
> D  M_CC                       2500a   Value options(*nopass)   
> D  M_BCC                      2500a   Value options(*nopass)   
> D  M_Attachment               2500a   Value options(*nopass)   
> 
> D A_CC            s             50a   dim(50)   
> D A_BCC           s             50a   dim(50)   
> D A_Attachment    s             50a   dim(50)   
> 
> A_CC = M_CC;
> 
> 
> 
> Bruce Odum
> bodum@xxxxxxxxxxxx
> (423) 510-3821
> 
> 4080 Jenkins Rd.
> Chattanooga, TN 37421
> 
> 
> 
> --
> This is the RPG programming on the AS400 / 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.
> 
-- 
  
  michaelr_41@xxxxxxxxxxxxxx