Re: Editting a numeric entry field in DDS

Thanks Cameron,

I had just found and tested it.

Sorry Dennis, I had checked the RPG list and come up empty. At your
suggestion, I checked all the lists and finally found VALNUM in the
midrange-l list archive.

Thanks,

Robert Rogerson


On Fri, Oct 29, 2010 at 12:38 PM, Cameron Ross <c.ross.work@xxxxxxxxx>wrote:

Try the VALNUM keyword.

On Fri, Oct 29, 2010 at 11:58 AM, Robert Rogerson <rogersonra@xxxxxxxxx

wrote:

Hi All,

I have an entry screen with a numeric entry field (15, 2). The user
accidentally entered 8_____452 (underscore represent blanks) and when the
field exit key was pressed the field was converted to 8000004.52.

I have tried changing the keyboard shift values and added CHECK(FE) but
this
did not invalidate the entry.

What I'm trying to accomplish is that only the right most numbers are
valid,
if a number, followed by a blank and then another number is entered, it

is

invalid.
For example:
8___452 is invalid as a blank separates the numbers.
452____ is valid as no numbers follow the blank.

This is probably pretty basic but I can't think of it right now. I hope
someone knows off the top of their head.

Thanks,

Robert Rogerson
--
This is the RPG programming on the IBM i / System i (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 / System i (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.