Re: scanr issue?

I agree. However, I think you can do what you want with

xx = %scanr(' ':name);

dow xx > 1;
xx = %scanr(' ':cpname : 1 : xx-1);
enddo;

Since start:length is specifying a substring, just keep limiting the
substring by changing the length.

Or think of it as the length is now the starting position for %SCANR.

--
*Peter Dow* /
Dow Software Services, Inc.
909 793-9050
petercdow@xxxxxxxxx
pdow@xxxxxxxxxxxxxx /


On 10/20/2022 6:26 AM, eric bothes wrote:

just seems a bit convoluted. if scan goes from left to right, scanr
should go right to left.

i'm actually looking for the first blank space prior to position 30. i
was hoping to do something like this:

xx = %scanr(' ':name);

dow xx > 30
xx = %scanr(' ':cpname:xx-1); assuming it would go right to left
enddo

looks like using for loop downto might be my best option.

On 10/19/2022 8:37 PM, Peter Dow wrote:

D source s 200
D pos s 10 0

source = 'aaaxaaaxaa';
pos = %scanr('x':source); should return 8
pos = %scanr('x':source:6); should return 4
*inlr = *on;

You can still use %SCANR. Just specify the substring (start, length)
you want to scan as

pos = %scanr('x':source:1:7);

Your first %scanr has already scanned positions 8-10.


On 10/19/2022 4:10 PM, eric bothes wrote:

hmmm..

i would have thought it would work like %scan, but in reverse.

So i guess i would need to do a do loop to find what i am looking for.

On 10/19/2022 6:58 PM, Peter Dow wrote:

Hi Eric,

Looks wrong, doesn't it? The problem is, the "start" position is
not what you would expect. From the v7r3 RPGLE reference manual:

"The start position and length specify the substring of the source
string to be searched. The start position
defaults to 1 and the length defaults to the remainder of the
source string. The result is always the
position in the source string even if the starting position is
specified."

The start position does NOT specify where %SCANR starts searching.
The start plus the length defines the substring to be searched.

In your example,

pos = %scanr('x':source:6);

it scans positions 6 - 10, and finds the 'x' at position 8.

It does NOT start scanning at pos.6 and work backwards.

--
*Peter Dow* /
Dow Software Services, Inc.
909 793-9050
petercdow@xxxxxxxxx
pdow@xxxxxxxxxxxxxx

/
On 10/19/2022 3:41 PM, eric bothes wrote:

i have the following code. They both return 8 rather then 8 and 4
respectively.

does anyone else experience this.

D source s 200
D pos s 10 0

source = 'aaaxaaaxaa';
pos = %scanr('x':source); should return 8
pos = %scanr('x':source:6); should return 4
*inlr = *on;

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

Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription related
questions.

Help support midrange.com by shopping at amazon.com with our affiliate
link: https://amazon.midrange.com