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

Reply via email to