Re: Whole number different question

[Michael_Schutte@xxxxxxxxxxxx]

Same solution as before.

If %Rem(EnteredNumber:6) <> 0
   Error occurred.
EndIf

etc...


Michael Schutte
Dig in! Bob Evans New Knife & Fork Sandwiches - This much homestyle
goodness demands a Knife & Fork!


rpg400-l-bounces@xxxxxxxxxxxx wrote on 09/26/2006 02:44:30 PM:

> HI thanks for the earlier reply's. Now I have to look at what the user is
> entering, and, if it doesn't divide correctly, that is, if the case pack
> is 6, and they change the qty from 36 to 35, this is an error. So I need
> to divide and I guess move the remainder to some field, see if that field
> is not 0, and then display the error.
>
> Thanks,
> Steve
> --
> 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.