RE: How do you move a text 30 char long to a field?

[Peter_Vidal@xxxxxxxx]

You can define a table:
E                    DSC     1   1 30

Then, at the bottom of the program:
**
INITIAL BALANCE - EURO MIGRATION

The calculation is:
C                     MOVELDSC,1     IETEXT 30

Regards,
Peter Vidal





                    Oscar Barberà
                    <barberao@yahoo.e        To:     <rpg400-l@midrange.com>
                    s>                       cc:
                    Sent by:                 Subject:     RE: How do you move a 
text 30 char
                    rpg400-l-admin@mi        long to a field?
                    drange.com


                    12/11/01 11:50 AM
                    Please respond to
                    rpg400-l






I'm sorry but it is RPG III.

TYIA

----- Original Message -----
From: <MWalter@hanoverwire.com>
To: <rpg400-l@midrange.com>
Sent: Tuesday, December 11, 2001 5:41 PM
Subject: Re: How do you move a text 30 char long to a field?



Oscar,

eval        iEText = "Initial Balance - Euro Migration"


Mark


Mark Walter
Sr. Programmer/Analyst
Hanover Wire Cloth a div of CCX, Inc.
mwalter@hanoverwire.com
http://www.hanoverwire.com
717.637.3795 Ext.3040



                    Oscar Barberà
                    <barberao@yahoo.e        To:     <rpg400-l@midrange.com>
                    s>                       cc:
                    Sent by:                 Subject:     How do you move a
text 30 char long to a field?
                    rpg400-l-admin@mi
                    drange.com


                    12/11/01 11:33 AM
                    Please respond to
                    rpg400-l






Althought I think the subject is quite clear, what I want to know is next
topic:  How to move the text "Initial Balance - Euro Migration" to the
field
IETEXT?


_________________________________________________________
Do You Yahoo!?
Get your free @yahoo.com address at http://mail.yahoo.com

_______________________________________________
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
To post a message email: RPG400-L@midrange.com
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/cgi-bin/listinfo/rpg400-l
or email: RPG400-L-request@midrange.com
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.





_______________________________________________
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
To post a message email: RPG400-L@midrange.com
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/cgi-bin/listinfo/rpg400-l
or email: RPG400-L-request@midrange.com
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.


_________________________________________________________
Do You Yahoo!?
Get your free @yahoo.com address at http://mail.yahoo.com

_______________________________________________
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
To post a message email: RPG400-L@midrange.com
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/cgi-bin/listinfo/rpg400-l
or email: RPG400-L-request@midrange.com
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.