Re: CHECK(ER) and Field Validation

[fkany@xxxxxxxxxxxxxxxxxx]

Thanks Booth.  I was hoping that maybe when CHECK(ER) is hit that an
indicator or something is triggered so that when control is returned to the
program it will validate the field and then redisplay the screen.  Well, I
know now what I have to work with to get what I need.  Thanks again.

Frank





"Booth Martin" <Booth@xxxxxxxxxxxx>@midrange.com on 08/06/2003 02:50:47 PM

Please respond to RPG programming on the AS400 / iSeries
       <rpg400-l@xxxxxxxxxxxx>

Sent by:    rpg400-l-bounces@xxxxxxxxxxxx


To:    <rpg400-l@xxxxxxxxxxxx>
cc:

Subject:    Re: CHECK(ER) and Field Validation



EXFMT DISPLAY

*Validate XFIELD because there is a display attribute of CHECK(ER)
on the field and the user has entered data into the field
C      if  Xfield <> SavedXField
C      exsr validate XField
C      else
*NORMAL PROCESSING
C      endif
=============================
================================



---------------------------------------------------------
Booth Martin http://www.MartinVT.com
Booth@xxxxxxxxxxxx
---------------------------------------------------------

-------Original Message-------

From: RPG programming on the AS400 / iSeries
Date: Wednesday, August 06, 2003 1:47:07 PM
To: rpg400-l@xxxxxxxxxxxx
Subject: CHECK(ER) and Field Validation

How can I let my program know that CHECK(ER) is being used and to run a
validation routine on the field that has CHECK(ER). I'm using CHECK(ER) on
a field I want validated as soon as the user enters in the last position of
the field. Is there a way to have a validation routine run only when
CHECK(ER) is being used. The program is an RPGIII program. I'm open to
easier/alternative suggestions of accomplishing this same task.

I would like something similar to:

EXFMT DISPLAY

*Validate XFIELD because there is a display attribute of CHECK(ER)
on the field and the user has entered data into the field
================================

================================

*NORMAL PROCESSING
=============================


=============================

If there are other ideas on how I can accomplish this, please let me know.

Thanks,

Frank


_______________________________________________
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.