Re: DSPF alpha field question

["Albert York" <albertyork@xxxxxxxxx>]

I may be missing the point but why not simply define the field as numeric in the display file. 

You have to move the field from the db file to the display file and back again anyway, so there's no extra work involved.

Albert

> ----- Original Message -----
> From: "Scott Klement" <rpg400-l@xxxxxxxxxxxxxxxx>
> To: "RPG programming on the AS400 / iSeries" <rpg400-l@xxxxxxxxxxxx>
> Subject: Re: DSPF alpha field question
> Date: Thu, 04 Sep 2008 14:44:51 -0500
>
>
>
>
> Booth Martin wrote:
> > Could you let them enter 5 & blank and then when you read the 
> > screen, do an  evalr ScrField = %trimr(ScrField) ?
>
> Or better yet, do:
>
>        monitor;
>           evalr ScrField = %editc(%dec(ScrField:2:0):'X');
>        on-error;
>           // ScrField isn't a valid number,
>           //  take appropriate action.
>        endmon;
>
> This converts it to a numeric field, then converts it back to a
> character field.  If they typed '5 ' it'd return '05'.  If they typed
> '55' it'd return 55.  If they type 'AB' it'd detect that the field isn't
> a number.
> --
> 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.

>