|
View previous topic :: View next topic
|
| Author |
Message |
sakrat
Active User
Joined: 05 Feb 2014
Posts: 164
Location: India
|
|
|
|
Hi All,
I want to move my corsor position to the place where i keep my mouse pointer and press enter key using rexx code.
I searched in Net but getting syntax that can be used in Panels alone...
I tried my code by just moving my mouse pointer so that it will get that as the cursor position but it dint capture the mouse pointer place line number as the cursor position. Please kindly give me some ideas or syntax help to code this.
Note: This is Not to use in Panel |
|
| Back to top |
|
 |
Nic Clouston
Global Moderator
Joined: 10 May 2007
Posts: 2455
Location: Hampshire, UK
|
|
|
|
| Your biggest problem here is that a mouse is not a thing known to the mainframe. It is known to your terminal emulator. Apart from that it is not 100% clear as to what you are trying to do! (At least, in my mind) |
|
| Back to top |
|
|
sureshpathi10
Active User
Joined: 03 May 2010
Posts: 154
Location: Kuala Lumpur
|
|
|
|
| Swathi Muralidharan wrote: |
Note: This is Not to use in Panel |
Every screen is a Panel in MVS, It will be either IBM's System Panel or User defined Panel.
And as Nic already mentioned, You don't have control over mouse from Mainframe.
I assuming that (from previous post of yours) you want to place cursor in editor and when you press enter, some of your rexx exec should be execute.
if i assumed correctly, it can't be done in IBM's System Panel ( as far as my knowledge). But if you assign your rexx code to particular PFKey, and if you place the cursor and press that "PFkey" then it can be triggered. One more time, you can't assign any of your rexx code to "ENTER" key.
In case of user defined Panel, it can be possible by using Point-and-Shoot concept.
So... Don't let us keep on assuming things... please provide move information or rephrase your question. |
|
| Back to top |
|
|
Pedro
Global Moderator
Joined: 01 Sep 2006
Posts: 2547
Location: Silicon Valley
|
|
|
|
This is almost exactly what you ask for, but totally the opposite:
1. Move your mouse to a position on the panel
2. double click with emulator pressing Enter on double click
3. code your panel to check which field the cursor was on using .CURSOR built in function.
4. IF (.cursor = myfunc1)
&zcmd = 'TSO %myrexx'
| Quote: |
| Every screen is a Panel in MVS, |
Some products do not use ISPF to display information. For example, QMF switches from ISPF display to a GDDM display. Products can also code their own 3270 datastream commands (which is what ISPF does for you) |
|
| Back to top |
|
|
TheMFKid
New User
Joined: 20 Nov 2013
Posts: 91
Location: India
|
|
|
|
| Swathi Muralidharan wrote: |
Hi All,
I want to move my corsor position to the place where i keep my mouse pointer and press enter key using rexx code.
|
Probably you may want to get some information from the line where your cursor is located. If it is your requirement, you can code a Macro for the same and assign to a particular PF KEY using KEYS command. You could place the cursor in any line(of your choice) using mouse and press the PF Key to run your REXX Macro.
Note: You need to be in VIEW/EDIT mode to run/execute EDIT Macros. |
|
| Back to top |
|
|
|
|
