this works for me
)ABC DESC(Exit)
pdc desc('Exit')
ACTION RUN(END)
)ABCINIT
.ZVARS = 'EXITX'
.RESP = ENTER
~~~~~~~~~~~~ Andy Robertson telephone mobile 0777 214 9545 home 01308 420797
-----IBM Mainframe Discussion List <[email protected]> wrote: -----
To: [email protected]
From: Dan D <[email protected]>
Sent by: IBM Mainframe Discussion List <[email protected]>
Date: 01/06/2011 08:24PM
Subject: ISPF Action Bar "Button"
I was wondering if anyone knows how to create a "button" on the action bar
line.
I don't want a pull-down but simply something to click and an action will be
taken.
I've tried the following but it appears that .RESP is not honored
in )ABCPROC.
)ABC
DESC('Button')
PDC DESC('Button')
ACTION RUN(ISRROUTE) PARM('SELECT PGM(BUTTON) PARM(A)')
)ABCINIT
.ZVARS=ZPDC
&ZPDC = '1'
)ABCPROC
.RESP=ENTER
Thanks,
Dan
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
**********************************************************************
This email is confidential and may contain copyright material of the John Lewis
Partnership.
If you are not the intended recipient, please notify us immediately and delete
all copies of this message.
(Please note that it is your responsibility to scan this message for viruses).
Email to and from the
John Lewis Partnership is automatically monitored for operational and lawful
business reasons.
**********************************************************************
John Lewis plc
Registered in England 233462
Registered office 171 Victoria Street London SW1E 5NN
Websites: http://www.johnlewis.com
http://www.waitrose.com
http://www.johnlewis.com/insurance
http://www.johnlewispartnership.co.uk
**********************************************************************
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
