Re: differentiate between Enter vs. CHECK(ER)? [was: exampleof READC & SFLNXTCHG]

["JJW" <rpgilejjw@xxxxxxxxxxx>]

Doesn't Montreal have over 20 Stanley Cups???  Now that's
PRICELESS!!!

On Wed, 19 Jun 2002 13:19:44 -0400
  "Dan Bale" <dbale@samsa.com> wrote:
>(Buck, Richard, Thanks for the replies!)
>
>   New question:
>
>Is there a way to differentiate in an RPG-IV program
>whether the Enter key
>was pressed by the user, or "Enter" is returned to the
>program because of
>the CHECK(ER) doing its thing?  I want to position the
>cursor differently
>between the two.
>
>I have an AID constants template that defines all of the
>AID bytes, and I
>see one that I've called $FAES having a constant value of
>x'3F', which is
>documented as "Automatic Enter (Selector Light Pen)".  I
>set up a test
>program to see the AID byte that gets returned from
>CHECK(ER); the AID byte
>comes back as x'F1' (Enter).
>
>TIA.
>
>Dan Bale
>SAMSA, Inc.
>989-790-0507
>DBale@SAMSA.com <mailto:DBale@SAMSA.com>
>   Stanley Cup Finals lower bowl tickets at Joe Louis
>Arena: $500
>   Official Red Wings jersey: $150
>   Octopii to drop splat in front of Irbe: $22 each
>   TEN Lord Stanleys: PRICELESS!
>
>_______________________________________________
>This is the RPG programming on the AS400 / iSeries
>(RPG400-L) mailing list
>To post a message email: RPG400-L@midrange.com
>To subscribe, unsubscribe, or change list options,
>visit:
>http://lists.midrange.com/cgi-bin/listinfo/rpg400-l
>or email: RPG400-L-request@midrange.com
>Before posting, please take a moment to review the
>archives
>at http://archive.midrange.com/rpg400-l.
>

<TEXTAREA NAME="Signature" ROWS="4" COLS="60"><TEXTAREA
NAME="Signature" ROWS="4" COLS="60">