× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.



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


As an Amazon Associate we earn from qualifying purchases.

This thread ...

Replies:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.