RE: Text wrapping question

["Wills, Mike N. (TC)" <MNWills@xxxxxxxxxxxxxx>]

Does this return the position so then I can do a %SubSt on the string?

-----Original Message-----
From: Dan Bale [mailto:dbale@samsa.com]
Sent: Thursday, May 23, 2002 11:13 AM
To: rpg400-l@midrange.com
Subject: RE: Text wrapping question


Um, I think CHECKR will look, from right to left, for the first character
that does NOT match anything found in factor 1.  So, in order to find the
last non-blank character in a string, you'd use (C-spec spacing not correct,
but you get the idea)
     C          ' '        CHECKR   STRING         DataLen

Don't know about a BIF for CHECKR, still stuck in the v3 world.

- Dan Bale
(I am *NOT* "Dale"
http://archive.midrange.com/midrange-l/200105/msg00281.html )
SAMSA, Inc.
989-790-0507
DBale@SAMSA.com <mailto:DBale@SAMSA.com>
  Quiquid latine dictum sit altum viditur.
  (Whatever is said in Latin seems profound.)

-----Original Message-----
From: rpg400-l-admin@midrange.com [mailto:rpg400-l-admin@midrange.com]On
Behalf Of Feador, Jerry
Sent: Thursday, May 23, 2002 12:01 PM
To: 'rpg400-l@midrange.com'
Subject: RE: Text wrapping question


How about using a CHECKR op code, by creating a $String of all possible
characters, except for a blank, and using that as the factor1 comparison
value. Should work but I don't have time to test...
Cj

-----Original Message-----
From: Wills, Mike N. (TC) [mailto:MNWills@taylorcorp.com]
Sent: Thursday, May 23, 2002 8:49 AM
To: Midrange - RPG (E-mail)
Subject: Text wrapping question


I need to do some text wrapping and am trying to figure out how to locate
the last space in the text. We are on V4R5. I know I can do it in a loop, I
was just wondering if there is already a bif that can do it.

Mike Wills
IT Corporate Support
Taylor Corporation
mnwills@taylorcorp.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.