You only need a ZSEL statement if your help panel has options to go to other
help panels. For example, if your HELP panel has something like the following
then you need a ZSEL statement to determine which help panel to display when
option 1 or 2 is selected:
Select one of the following options for additional help:
1 - How do I enter optional parameters
2 - How do I change the panel colours
Based on your help panel I don't see any option to go to any other help panels
so a ZSEL is not required.
Q). How can I just redisplay my help panel or terminate my menu display by
pressing ENTER?
If someone presses ENTER on a help panel that doesn't have a ZSEL, ISPF
displays the 'next' tutorial, which is defined using ZCONT. If ZCONT isn't
defined a default tutorial is displayed. A tutorial shouldn't exit when ENTER
is pressed, as this isn't the way tutorials work. If a user wants to exit a
tutorial they should press END.
HTH,
Dave Salt
SimpList(tm) - try it; you'll get it!
http://www.mackinney.com/products/program-development/simplist.html
Date: Mon, 16 May 2011 10:40:51 -0500
From: dave.l.han...@usps.gov
Subject: ISPF Help panel help
To: IBM-MAIN@bama.ua.edu
Group,
We are running z/OS V1R10 (z/OS V1R12). I have been looking through the
ISPF Dialog Developer's Guide and Reference and I am having a problem with my
help panel. My Primary panel has ZPRIM=YES and .HELP=SSBVPSH. From my
primary panel I enter PF1 and I get my help panel. My panel looks like this:
)ATTR
)BODY
%NOTE: MENUMSG
+
%ENTER+- EXIT %PF3+- EXIT
+
)INIT
)PROC
ZSEL=TRANS(TRUNC(ZCMD,'.')
'*','EXIT') /*TERMINATE MENU DISPLAY*/
)END
When I hit PF3 it takes me right out of my HELP panel and returns me back to
my primary panel.
Q). Why when I press Enter from my help screen do I get ISPP100 Panel EXIT
error. Panel not found.
I tried just coding EXIT, END, CANCEL and RETURN instead of the TRANS
statement and I receive the same message about a Panel not found. The TRANS
should be saying whatever ZCMD is, Terminate the menu display. I put a
TRACE in the PROC section and it didn't like that either. I had another
approach:
)PROC
IF (.PFKEY = PF03)
ZCMD = X
IF (.RESP = ENTER)
ZCMD = X
ZSEL=TRANS(TRUNC(ZCMD,'.')
X,EXIT /* or 'X','EXIT' - Terminate Menu Display */
'','' /* Redisplay Panel on Blank */
'*','%') /* or '*','?') - Display Invalid option */
When I use '?' in my help panel and press enter it sends me to the ISPF PDF
tutorial.
*** Use a question mark (?) as the string. This causes the SELECT service to
redisplay the menu with an invalid option message. ***
When I use '%' in my help panel and press enter I get ISPP100 Panel %
error. Panel not found.
I Removed everything from my PROC section. ENTER takes my from my help panel
to the ISPF PDF tutorial. PF3 works great.
Q). How can I just redisplay my help panel or terminate my menu display by
pressing ENTER?
Did I miss any good ISPF books with help panel samples?
Thanks in advance, Dave
Dave Hansen
Eagan Software Systems Branch
651-406-1208
dave.l.han...@usps.gov
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
