Thank you for the tip!
-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of TheBorg
Sent: Wednesday, October 30, 2013 1:00 PM
To: rpg400-l@xxxxxxxxxxxx
Subject: Re: clueless in SORTA
I always use INZ(*HIVAL) on the array so that the unused elements will sort to the end of the array...
-sjl
"Gary Thompson" wrote in message
news:mailman.12259.1383159453.9013.rpg400-l@xxxxxxxxxxxx...
Good point and definitely a mistake I could/would make, but this time I double/triple checked and . . .
well I can hardly believe what I saw . . .
Just now running in Debug after removing SORTA and the array ASCEND . . .
Thank you.
-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx]
On Behalf Of Alan Campin
Sent: Wednesday, October 30, 2013 12:53 PM
To: RPG programming on the IBM i (AS/400 and iSeries)
Subject: Re: clueless in SORTA
Is this one of those deals where the array is defined as some huge number to only use a few elements? When you do the sort the blanks will be in the low order. Any chance you are looking at in debug and only see the first few which are blank?
On Wed, Oct 30, 2013 at 12:43 PM, Gary Thompson
<gthompson@xxxxxxxxxxx>wrote:
RPGLE pgm in production for about a year; used daily on V7R1
Today a report that pgm reports errors on valid values . . .
Debug shows LOOKUP on empty DS array,
hence the error
Debug shows DS array loaded from file correctly, then SORTA on DS
array, then DS array elements all empty
operations mgr reports no recent PTFs
Any help for the clueless ?
--
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.
--
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.
--
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.
midrange.com
