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


  • Subject: RE: Is possible copy an integer to an array ?
  • From: boothm@xxxxxxx
  • Date: Tue, 29 Dec 1998 20:49:50 -0500

I just tried this and it works as you wish (use fixed font to read it):
                                                       
 FMT E  .....E....FromfileTofile++Name++N/rN/tbLenPDSArrnamLenPDSComm
        *************** Beginning of data ***************************
0001.00      E                    AR1         3  1                   
0002.00      I            DS                                         
0003.00      I                                        1   30NUMBER   
0004.00      I                                        1   3 AR1      
0007.00      C                     Z-ADD123       NUMBER             
0008.00      C                     MOVE *ON       *INLR              
        ****************** End of data ******************************


(debug view at LR time:)
  Variable  . . . . . . . . . . . . . . . : AR1          
    Lower/upper bounds  . . . . . . . . . :   (1:3)      
    Type  . . . . . . . . . . . . . . . . :   CHARACTER  
    Length  . . . . . . . . . . . . . . . :   1          
    Element     ----------------------Values-------------
            1  '1'  '2'  '3'                             


Hope this helps.



In <01BE3331.84675090@POVOA>, on 12/29/98 
   at 01:44 PM, Silvio Santos <Silvio.Santos@biw-ag.de> said:

>I will try to explain what I want to do. I need to process an array in
>which each position cointains only one number (not like you said, 3
>number in each positions); in the case of the 123 I want to copy that
>integer to an array an then it will have the 1 in first position, the 2
>in the second position and the 3 in the third position.  And this all
>done with RPG/400 not ILE,

>Silvio.

>----------
>De:  boothm@ibm.net[SMTP:boothm@ibm.net]
>Enviado:  Tuesday, December 29, 1998 12:45 AM
>Para: RPG400-L@midrange.com
>Assunto:  Re: Is possible copy an integer to an array ?

>Can you show us the E lines?  You should be able to move 123 into an
>array where the size of each element is 3.  

>I am wondering if you have somehow defined your array as 3 elements, with
>each element 1 character long?


>In <01BE3260.6B8107A0@COIMBRA>, on 12/28/98 
>   at 12:48 PM, Silvio Santos <Silvio.Santos@biw-ag.de> said:

>>In RPG/400 is possible to copy an integer for instance 123 to an array
>>with 3  positions ? Because when I make a MOVE 123 array the tree
>>positions are occupied with the number 3 (the last integer).... I also
>>tried the MOVEL an MOVEA but they didnt work too.

>>Silvio.  



-- 
-----------------------------------------------------------
boothm@ibm.net
Booth Martin
-----------------------------------------------------------

* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
* This is the RPG/400 Discussion Mailing List!  To submit a new         *
* message, send your mail to "RPG400-L@midrange.com".  To unsubscribe   *
* from this list send email to MAJORDOMO@midrange.com and specify       *
* 'unsubscribe RPG400-L' in the body of your message.  Questions should *
* be directed to the list owner / operator: david@midrange.com          *
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *


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.