Re: Position 369 (contains hex value of functionkeypressed)inINFDSworkstation file - Should it changewithprogramchainto subfile?

i am at V5R2, the test are made in the same PGM (no procedure)

----- Original Message -----
From: "Lim Hock-Chai" <Lim.Hock-Chai@xxxxxxxxxxxxxxx>
To: "RPG programming on the AS400 / iSeries" <rpg400-l@xxxxxxxxxxxx>
Sent: Thursday, January 27, 2005 4:18 PM
Subject: RE: Position 369 (contains hex value of
functionkeypressed)inINFDSworkstation file - Should it
changewithprogramchainto subfile?


> that's interesting.  What OS are you on.  Do you mind test you chain in a
sub-procedure?
>
> -----Original Message-----
> From: rpg400-l-bounces@xxxxxxxxxxxx
> [mailto:rpg400-l-bounces@xxxxxxxxxxxx]On Behalf Of Richard ECUYER
> Sent: Thursday, January 27, 2005 9:05 AM
> To: RPG programming on the AS400 / iSeries
> Subject: Re: Position 369 (contains hex value of function
> keypressed)inINFDSworkstation file - Should it change withprogramchainto
> subfile?
>
>
> same after a chain...
>
> ----- Original Message -----
> From: "Lim Hock-Chai" <Lim.Hock-Chai@xxxxxxxxxxxxxxx>
> To: "RPG programming on the AS400 / iSeries" <rpg400-l@xxxxxxxxxxxx>
> Sent: Thursday, January 27, 2005 3:41 PM
> Subject: RE: Position 369 (contains hex value of function key
> pressed)inINFDSworkstation file - Should it change with programchainto
> subfile?
>
>
> > That is correct.  My question is more about after the read or exfmt, if
> the program do a chain to a subfile, should the value change?  For
example:
> >
> > FMYDSPF    CF   E             WORKSTN INFDS(infdsMYDSPF)
> > F                                     SFILE(MYSF :SFRR#)
> > D infdsMYDSPF     DS
> > D  dfkey                369    369
> >
> > C                   exfmt     MYSFCTL
> >  * let said user pressed F22 ==> dfKey is now x'BA'
> > C     SFRR#         chain(e)  MYSF
> >  * Should above chain to subfile change the value of dfKey?
> >
> > -----
> > My testing is showing that the value of dfKey got changed to x'00' after
> the chain to subfile.  I've been using this method to check command key
for
> quite a while now and can't recall that ever happen before.
> >
> >
> >
> > -----Original Message-----
> > From: rpg400-l-bounces@xxxxxxxxxxxx
> > [mailto:rpg400-l-bounces@xxxxxxxxxxxx]On Behalf Of Richard ECUYER
> > Sent: Thursday, January 27, 2005 2:54 AM
> > To: RPG programming on the AS400 / iSeries
> > Subject: Re: Position 369 (contains hex value of function key pressed)
> > inINFDSworkstation file - Should it change with program chainto subfile?
> >
> >
> > the hex value is in the ds (associated with your dspf) and is only
changed
> > after a read or exfmt.
> > ----- Original Message -----
> > From: "Lim Hock-Chai" <Lim.Hock-Chai@xxxxxxxxxxxxxxx>
> > To: <rpg400-l@xxxxxxxxxxxx>
> > Sent: Wednesday, January 26, 2005 11:15 PM
> > Subject: Position 369 (contains hex value of function key pressed) in
> > INFDSworkstation file - Should it change with program chain to subfile?
> >
> >
> > Just want to make sure:
> >
> > When program gets control back after user pressed a function key, should
> the
> > hex values that represent the function key pressed changed when some way
> in
> > the program it does a chain to a subfile record format?
> >
> > --
> > 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.
> >
> >
>
> --
> 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.
>
>
> --
> 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.
>
>