RE: Sqlrpgle problem

I believe the sorted list is only needed when you are doing a %lookupgt/ge
or %lookuplt/le



Paul

-----Original Message-----
From: RPG400-L [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Mark S
Waterbury
Sent: Saturday, February 25, 2017 2:36 PM
To: RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>
Subject: Re: Sqlrpgle problem

Marco:

This will never work because, from what I can see in the "dump", those
values in that array are not "sorted" ? =-O

In ILE RPG IV, %lookup requires the entries in the lookup array to be
sorted, because it uses a binary search algorithm "under the covers."

HTH,

Mark S. Waterbury

:> On 2/25/2017 1:59 PM, Marco Facchinetti wrote:

Hi, I'm receiving an MCH1210 at line 15733:

15733 ld = %lookup(*blanks:fieldord)-1;

the dumpl clearly state that the %lookup should return 0 so LD
supposed to be -1.

DUMP ILE RPG
FIELDORD CHAR(10) DIM(9)
(1) 'TFCDPROPAE'
(2) 'TFCDCOMUNE'
(3) 'ABCDPAESE '
(4) 'ARCDCABINA'
(5) 'FTCDUTENTE'
(6) 'ARCDQUTOF1'
(7) 'ARCDQUTOF2'
(8) 'ARCDQUTOF3'
(9) 'W9PERIODO '

LD INT(10) 0 '00000000'X

We are at 7.2.

Any idea? I cannot extend the array, the only way is moving it in a
longer one but it should work even with 9 elements.

TIA
--
Marco Facchinetti

Mr S.r.l.

Tel. 035 962885
Cel. 393 9620498

Skype: facchinettimarco

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

Please contact support@xxxxxxxxxxxx for any subscription related questions.

Help support midrange.com by shopping at amazon.com with our affiliate link:
http://amzn.to/2dEadiD