Re: Subile problem

[Alan Shore <AlanShore@xxxxxxxx>]

Phil - it would be more beneficial if you could post code from your DDS as
well as the program.



Alan Shore

NBTY, Inc
(631) 244-2000 ext. 5019
AShore@xxxxxxxx

rpg400-l-bounces@xxxxxxxxxxxx wrote on 11/30/2006 10:11:38 AM:

> HI -
>
> I have a subfile that is causing a minor irritating situation that I
> would like to correct.
>
>
>
> When it first is filled and the user hits enter, there is an error on
> the second line, and the cursor is positioned there w/ reverse img.
>
>
>
> MODEL#  SKU#              CASE PACK   QTY       CART    UPC       CP.
> WEIGHT
>
>  1             123                    12                   12
> 1   123       20
>
>  2              345                    12                     6
> 456            20
>
>
>
>
>
>
>
>
> Bottom
>
>  INVALID QTY
>
>
>
>
>
> However, if I then make an error on the first line putting 11 for QTY,
> and hit enter, the cursor will still  be positioned on the second line,
> evern tho I am clearing the indicators and reseting the RRN to 1. Whe I
> debuig it, the RRN = 1, and then I Update and EXFMT the subfile If I do
> correct the second line, and hit enter, then it will postion error on
> line 1. But I would want it to always look at the first error on the
> first line etc.
>
>
>
> Any help would be so appreciated,
>
> Phil
>
>
> This message contains information proprietary to our company. It is
> intended to be read only by the individual or entity named above or
> their designee.
> Any distribution of this message or the information contained herein
> without written permission from our company is strictly prohibited.
> If the reader of this message is not the intended recipient or an
> agent responsible for delivering it to the intended recipient, you
> are hereby notified that you have received this document in error
> and that any review, dissemination, distribution, or copying of this
> message is strictly prohibited. If you have received this
> communication in error, please notify us immediately by e-mail, and
> delete the original message.
>
>
> --
> This is the RPG programming on the AS400 / 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.