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


  1.  Home
  2. RPG400-L
  3. November 2010

Re: Moving a field and removing blanks

Something like this may work for you?


Field50 = %subst(Field50: (50 - %len(%trimr(Field30): 1)
+ %trimr(Field30)



On 11/30/2010 5:12 PM, Pete Helgren wrote:
An easy one that I can't seem to wrap my head around:

I have a 30 character field where the data is left justified. I want to
move it into a 50 character field but want to move it to the far right
omitting any trailing blanks.

So something like this:
MYbDATAbHEREbbbbbbbbbbbbbbbbbb
moved so it is like this:
EXISTINGbDATAbHEREbbbbbbbbbbbbbbbbbbbbMYbDATAbHERE

I have been moving between too many languages lately...this seem simple
but I can't seem to come up with a simple solution. I *want* to %TRIMR
and MOVE at the same time but know that I can't....(can I?)

This box is at V5R4M0


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.