RE: Defining a function key...

Oh great!!! Just when my therapist almost had me over my CCP experience
someone like you brings it up again!!

<vbg>

Mark Allen
I.S. Manager
Wilkes Telephone & Electric
A Dycom Company
Phone: (706) 678-9565
Email: allenmark@nu-z.net
http://www.nu-z.net




:-----Original Message-----
:From: rpg400-l-admin@midrange.com
:[mailto:rpg400-l-admin@midrange.com] On Behalf Of Buck Calabro
:Sent: Tuesday, March 19, 2002 9:36 AM
:To: rpg400-l@midrange.com
:Subject: RE: Defining a function key...
:
:
:Just a quick note from a geezer, er, someone in their late
:youth; the S/3 did not use the 5250 data stream, it was 3270.
:There weren't Kx indicators because there weren't command
:keys.  There were several PA keys and several more PF keys.
:With CCP we had to check the AID byte, and it was included in
:the I/O buffer.
:
:I therefore find using the AID byte intuitive because that's
:what I started with, although we were much closer to the
:datastream back in the day.  The S/32 Kx indicators always
:seemed exotic to me.  Not that they were hard to read, but
:they weren't familiar.  I haven't used either in many moons,
:because I've been working with mostly S/38 code and nobody
:around me is comfortable with Kx or the AID bytes.
:
:For what it's worth, I have to teach new RPGers all the
:indicator techniques, because they'll encounter them all
:working here.  Many of our clients have their own staff and
:will make changes to our code in their own style...  In my
:experience, the S/38 'define it in the DDS and share the
:indicator with thr RPG' is the easiest for them to grasp
:because of the one to one correspondence.
:
:  --buck
:_______________________________________________
: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.
:
: