IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

ISPF Panel related questions


IBM Mainframe Forums -> TSO/ISPF
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
saurabh39
Warnings : 1

Active User


Joined: 11 Apr 2008
Posts: 144
Location: Jamshedpur

PostPosted: Wed Mar 26, 2014 4:43 pm
Reply with quote

All - I am trying to create ISPF panels and calling it through REXX module. I am facing some issues in the process. Please help me in resolving the issues -

1. the description of VGET/VPUT mentions function pool, application pool & shared pool. Where can I find information regarding these. Also, is it possible to see whats stored in these pools. Secondly, is the value stored across mainframe session. IE, if I have coded as mentioned below -
Code:
VGET (SLIB,LLIB) PROFILE


I entered a value, and then logged off. Then logged into my mainframe session again. The value of SLIB was populated from pervious session.

2. as per manual, I should use TEST to test panel and messages. I coded ISPSTART TEST & ISPF TEST as mentioned in manual. Then executed the routine from ISPF. I got the following error -
Quote:
ISPI007 ISPF command not allowed. You are already under ISPF


Which is correct, since I am already in ISPF. Then I logged into my TSO session. Allocated my REXX lib to SYSEXEC and executed the rexx module. Now I got the error as NO VALID ISPF ENVIRONMENT. How do I use the TEST facility so that everytime a panel is displayed, the panel is picked from the library.

3. Error Message member name - ERMSG00.
The messages are -

Code:

ERMSG001 'INVALID SOURCE LIBRARY' .W = R .N = W                         
'the source library doesnt exist'                                       
                                                                       
ERMSG002 'INVALID Load  LIBRARY' .W = R .N = W                         
'the source library doesnt exist'                                       


Following is the way message is being called -
Code:

"ISPEXEC LIBDEF ISPMLIB DATASET ID('USERID.REXX.MESSAGES')"
ADDRESS ISPEXEC "SETMSG MSG(ERMSG001)" 


This throws
Quote:
ERMSG001 - contains invalid format syntax in first record.


I checked my member after 72 bytes, there are no numbers printed. Also, I compared my messages with ISPF messages in ISPF library, I couldnt find any difference. How do I resolve it.

Please let me know, if additional information is required.
Back to top
View user's profile Send private message
Marso

REXX Moderator


Joined: 13 Mar 2006
Posts: 1353
Location: Israel

PostPosted: Wed Mar 26, 2014 6:30 pm
Reply with quote

1. Option 7.3 (7=Dialog Test 3=Variables)
You will get the Variable, the Pool, the Attribute and the Value.
Use PF1 (Help) to get additional help.

2. I've never used TEST so I can't help.
I DISPLAY the panel, if there is an error I correct until it works.

3. What is the .N parameter ?
Back to top
View user's profile Send private message
vasanthz

Global Moderator


Joined: 28 Aug 2007
Posts: 1742
Location: Tirupur, India

PostPosted: Wed Mar 26, 2014 6:54 pm
Reply with quote

Marso, you are wro... ALL GLORY TO THE HYPNOTOAD!
Back to top
View user's profile Send private message
Pedro

Global Moderator


Joined: 01 Sep 2006
Posts: 2545
Location: Silicon Valley

PostPosted: Wed Mar 26, 2014 7:48 pm
Reply with quote

1. You need to use VPUT to save a variable to the profile pool. Use VGET to retrieve the variable from the profile pool.

2. You should use only ISPF TEST to start ISPF in test mode. Or you can go to ISPF option 7 to also get into test mode.

Quote:
Then I logged into my TSO session.
It is not clear what order you tried, but logging on should be first.

a. logon
b. add to SYSEXEC. (perhaps add to ISPPLIB also)
c. ISPF TEST
d. execute your rexx program.
Back to top
View user's profile Send private message
Nic Clouston

Global Moderator


Joined: 10 May 2007
Posts: 2455
Location: Hampshire, UK

PostPosted: Wed Mar 26, 2014 7:52 pm
Reply with quote

I use 7.2 to display the panel whilst developing. (actually 6.2 in this place!)
Back to top
View user's profile Send private message
Pedro

Global Moderator


Joined: 01 Sep 2006
Posts: 2545
Location: Silicon Valley

PostPosted: Thu Mar 27, 2014 2:05 am
Reply with quote

Quote:
, since I am already in ISPF. Then I logged into my TSO session. Allocated my REXX lib to SYSEXEC and executed the rexx module. Now I got the error as NO VALID ISPF ENVIRONMENT.


You imply that you expect the setup will persist across logons. It does not. You have to do your setup each time you logon.

Typically, there is a COMMAND field in the logon panel, or a predetermined name is called automatically when you first logon. You need to add your setup there so that it is executed every time you log on.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> TSO/ISPF

 


Similar Topics
Topic Forum Replies
No new posts Execute secondary panel of sdsf with ... CLIST & REXX 1
No new posts Looking for a little history of ISPF ... TSO/ISPF 5
No new posts Adding QMF and SPUFI to the ISPF menu DB2 20
No new posts Issue after ISPF copy to Linklist Lib... TSO/ISPF 1
No new posts Call program, directly from panel CLIST & REXX 9
Search our Forums:

Back to Top