We are converting some code in a legacy application and, in its simplest form, want to know that a mouse has been used/clicked rather than ENTER pressed. We are not that familiar with the MOUBTN keyword, which we assume will tell us what we want, and are having trouble getting this to work. Though we've looked through other questions regarding MOUBTN, we obviously haven't found the solution.
In the DSPF, at the file level, MOUBTN has been defined as: MOUBTN(*ULD CF09).
In the corresponding RPG program, the following has been coded:
FFMPKDKAVCF E WORKSTN
F KINFDS IOAREA
I 369 369 @AIDKD
C *INKI IFEQ *ON
We must be missing something since INKI never gets set on when the mouse is used. We have also tried using event indicators (E09), and then comparing @AIDKD to x'79', but failed with this as well.
Would appreciate help in getting this to work.
January 17, 2013 2:58 PM