Re: ERRMSG doesn't display

[Alan Shore <AlanShore@xxxxxxxx>]

Ah CRAP - Sorry Booth, I COMPLETELY misinterpreted what you were asking.
If you haven't done so already, please ignore my previous reply



Alan Shore
Programmer/Analyst, Distribution
E:AShore@xxxxxxxxxxx
P:(631) 200-5019
C:(631) 880-8640
"If you're going through Hell, keep going" - Winston Churchill

rpg400-l-bounces@xxxxxxxxxxxx wrote on 12/15/2008 03:01:09 PM:

> Yes.   What is nagging in my brain is that when I type 131313 and have
> an error I expect the field to be redisplayed exactly as I typed it, not
> as 13/13/13.
>
> Erick G wrote:
> > This sounds familar... Is your display file set for RSTDSP(*YES)
> >
> >
> >
> > ----- Original Message ----
> > From: Booth Martin <booth@xxxxxxxxxxxx>
> > To: RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>
> > Sent: Monday, December 15, 2008 10:46:51 AM
> > Subject: ERRMSG doesn't display
> >
> > This has me stumped.  I have this code:
> >
> >         S1DATE    6Y 0  10 50EDTCDE(Y)
> >   42                          ERRMSG('Date is invalid ' 42)
> >
> > I key  131313 into the field and and press Enter.  My validation
routine
> > tests the field, finds it in error, and turns on *in42.  I then EXFMT
> > the record again and expect to see the error message, but instead I see

> > the field as 13/13/13.
> >
> > I ran debug and it shows *in42 as being on.
> >
> > I believe I do this same thing routinely and never have a problem, so
> > obviously I am doing something differently but I can not imagine what.
> >
> > Any ideas out there?
------------------------------------------------------------------------
> > No virus found in this incoming message.
> > Checked by AVG - http://www.avg.com
> > Version: 8.0.176 / Virus Database: 270.9.18/1849 - Release Date:
> 12/15/2008 9:01 AM
> >
>
> --
> ---------------------------------
> Booth Martin
> http://www.Martinvt.com
> ---------------------------------
>
> --
> 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.