|
ok. I found the problem. It only does that if the program change the value internally. 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' * internally change it to x'F1' (enter key) C eval dfKey = x'F1' C SFRR# chain(e) MYSF * dfKey will be changed back to x'BA' after the above chain. Well RPG is doing too right for me :). thanks for you help Richard.
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.