RE: Blank data entry that are really numeric

D' didn't work. The field is character. 'Y' isn't accepted because there is no 
decimal (not numeric).
> -----Original Message-----
> From: Rick.Chevalier@xxxxxxxxxxxxxxx [mailto:Rick.Chevalier@xxxxxxxxxxxxxxx]
> Sent: Wednesday, March 03, 2004, 2:09 PM
> To: rpg400-l@xxxxxxxxxxxx
> Subject: RE: Blank data entry that are really numeric
> 
> Try entering a keyboard shift attribute of 'Y' or 'D'.  These should force
> numbers.  The 'D' entry only works on fields without decimal positions.  'Y'
> will also allow decimal points and commas if this is an issue.
> 
> Rick
> 
> > -----Original Message-----
> > From: rpg400-l-bounces@xxxxxxxxxxxx
> > [mailto:rpg400-l-bounces@xxxxxxxxxxxx]On Behalf Of simafrog
> > Sent: Wednesday, March 03, 2004 2:35 PM
> > To: RPG programming on the AS400 / iSeries
> > Subject: Blank data entry that are really numeric
> > 
> > 
> > HI -I have a screen that displays a dates from and to, to the 
> > user. It is defined as a date type 'M',w/ Mand. Entry. Zeros 
> > are allowed to be entered as a lower and/or upper limit. The 
> > problem is that when the user just hits enter, it was 
> > generating a data decimal error, as the field is rearranged 
> > in a data structure including making it numeric, and then 
> > processed. I would like such an occurrence to be handled by 
> > the DSPF, or earlier in the program What I did was check the 
> > fields prior to their being processed and if both are blank I 
> > exit the subroutine. I am sure there is a much cleaner and 
> > better way to do this. Please let me in on this.
> > Thanks,
> > Rob 
> 
> _______________________________________________
> 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.
>