Re: Address fields

["Booth Martin" <Booth@xxxxxxxxxxxx>]

What do I do wrong on submitting e-mails?  Any time I type an  equal sign it
disappears along with all of the text after it.  for example "Eval  Inx
equal  Inx - 1"  printed only the first 8 characters.


---------------------------------------------------------
Booth Martin http://www.MartinVT.com
Booth@MartinVT.com
---------------------------------------------------------

-------Original Message-------

From: rpg400-l@midrange.com
Date: Tuesday, May 21, 2002 05:49:17 PM
To: rpg400-l@midrange.com
Subject: Re: Address fields

Create an array of 7 lines:
Eval Inx
If Field7 <> *blanks
Eval NewLine(Inx)
Eval Inx End
If Field6 <> *blanks
Eval NewLine(Inx)
Eval Inx End
If Field5 <> *blanks
Eval NewLine(Inx)
Eval Inx End
....

-----------------------------------------------
Booth Martin ResoDirect, ext. 528
BMartin@ResoDirect.com
Booth@MartinVT.com
http://www.MartinVT.com
-----------------------------------------------
-------Original Message-------

From: rpg400-l@midrange.com
Date: Tuesday, May 21, 2002 17:35:53
To: Midrange - RPG (E-mail)
Subject: Address fields

I am creating a PO and need the users would like me to scrunch the address
together. I am not sure how to best do this. There is to 7 lines for the
address most of the time it will only be 4.

Example:
(this is what I have now)
Mike Wills
123 Wills St.


Somewhere, MN 56000


(this is what I want)
Mike Wills
123 Wills St.
Somewhere, MN 56000

This is in my print file header record.

Any ideas would be helpful.

Mike Wills
IT Corporate Support
Taylor Corporation
mnwills@taylorcorp.com
Phone: (507) 386-3187


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