| IBM MAINFRAME HELP FORUMS for COBOL, JCL, CICS, DB2, IMS etc...
Help & Support Forums for IBM Mainframe computers Applications like COBOL, JCL, CICS, DB2, FileAid, DFSORT, Endevor, Xpediter, CoolGen, CA-7, CA-11, AbendAid, IMS, IDMS, PL/I, MqSeries, SyncSort, Assembler, VSAM, ISPF, ChangeMan, Easytrieve, InterTest, REXX, CLIST etc...
|
| View previous topic :: View next topic |
| Author |
Message |
Ekta Sharma
Joined: 26 Feb 2008
Posts: 32
Location: pune
|
| Posted: Tue Jul 22, 2008 3:34 pm Post subject: How to retain data on ispf panel between different sessions? |
|
|
I need to retain data on ISPF panel between different TSO sessions. Currently the data is lost once I logoff from TSO. I am using VPUT & VGET with PROFILE, still the data is not retained.
I have used VPUT in )PROC section of the panel definition and VGET in the program that invokes the panel. Both are used with PROFILE. |
|
| Back to top |
|
ofer71
Joined: 27 Dec 2005
Posts: 1867
Location: Israel
|
| Posted: Tue Jul 22, 2008 4:21 pm Post subject: |
|
|
Do you have VERASE anywhere?
O. |
|
| Back to top |
|
Ekta Sharma
Joined: 26 Feb 2008
Posts: 32
Location: pune
|
| Posted: Tue Jul 22, 2008 4:39 pm Post subject: |
|
|
| No |
|
| Back to top |
|
premkrishnan
Joined: 07 Sep 2006
Posts: 63
Location: Mars
|
| Posted: Tue Jul 22, 2008 8:33 pm Post subject: |
|
|
Ekta,
Can you please post your panel definition?
So that it can help me and others for a quick correction
Regds,
Prem |
|
| Back to top |
|
Pedro
Joined: 01 Sep 2006
Posts: 301
Location: work
|
| Posted: Tue Jul 22, 2008 9:30 pm Post subject: Reply to: How to retain data on ispf panel between different |
|
|
| Your ISPPROF ddname needs to be allocated to a permanent dataset. |
|
| Back to top |
|
Ekta Sharma
Joined: 26 Feb 2008
Posts: 32
Location: pune
|
| Posted: Fri Jul 25, 2008 11:14 am Post subject: Reply to: How to retain data on ispf panel between different |
|
|
Plz check the panel definition in the attachment.
Apart from this, I have even tried using VGET in the REXX pgm for invoking the panel. |
|
| Back to top |
|
expat
Joined: 14 Mar 2007
Posts: 2910
Location: Brussels once more ...
|
| Posted: Fri Jul 25, 2008 11:43 am Post subject: |
|
|
Please DO NOT post attachments as not everybody can access them, Me for one.
This severely limits the number of people able to read your problem and help resolve it. |
|
| Back to top |
|
Ekta Sharma
Joined: 26 Feb 2008
Posts: 32
Location: pune
|
| Posted: Fri Jul 25, 2008 11:53 am Post subject: |
|
|
Here is the panel definition.
)PANEL KEYLIST(ISRSAB)
)ATTR FORMAT(MIX)
_ TYPE(INPUT) INTENS(HIGH) CAPS(ON)
)BODY
+
+ PDS LIST
+ ********
+
+ 1._DS1 +
+ 2._DS2 +
+ 3._DS3 +
)INIT
.CURSOR = ZCMD
&ZMCD = &Z
)PROC
VGET (DS1 DS2 DS3) PROFILE
VPUT (DS1 DS2 DS3) PROFILE
)END |
|
| Back to top |
|
expat
Joined: 14 Mar 2007
Posts: 2910
Location: Brussels once more ...
|
| Posted: Fri Jul 25, 2008 12:14 pm Post subject: |
|
|
Mmmmmmmmmmm, I usually load values for panels before doing the display, and save them afterwards.
You seem to have your VGET in the )PROC section - should this not be part of the )INIT section ? |
|
| Back to top |
|
Ekta Sharma
Joined: 26 Feb 2008
Posts: 32
Location: pune
|
| Posted: Fri Jul 25, 2008 1:12 pm Post subject: |
|
|
I have tried that too. Infact, initially I had not put any VGET statement in the panel code. I had added VGET statement in my REXX code which is used for invoking the panel. It was as:
ISPEXEC "VGET (DS1 DS2 DS3) PROFILE" |
|
| Back to top |
|
expat
Joined: 14 Mar 2007
Posts: 2910
Location: Brussels once more ...
|
| Posted: Fri Jul 25, 2008 1:16 pm Post subject: |
|
|
| Was the VGET retrieving the correct values for the variables when executed prior to display ? |
|
| Back to top |
|
Ekta Sharma
Joined: 26 Feb 2008
Posts: 32
Location: pune
|
| Posted: Fri Jul 25, 2008 1:33 pm Post subject: |
|
|
| VGET is retrieving the correct values till the current TSO session is active. Once I logoff from TSO, the values are lost. |
|
| Back to top |
|
expat
Joined: 14 Mar 2007
Posts: 2910
Location: Brussels once more ...
|
| Posted: Fri Jul 25, 2008 1:47 pm Post subject: |
|
|
I have just stored 4 variables in PROFILE, logged off, logged on again and retrieved the variables, and they all have the correct values.
Code:
"ISPEXEC VGET (TVR01 TVR02 TVR03 TVR04) PROFILE"
SAY TVR01 TVR02 TVR03 TVR04
|
|
| Back to top |
|
Ekta Sharma
Joined: 26 Feb 2008
Posts: 32
Location: pune
|
| Posted: Fri Jul 25, 2008 2:29 pm Post subject: |
|
|
I have used the command as:
ISPEXEC "VGET (DS1 DS2 DS3) PROFILE"
"ISPEXEC DISPLAY PANEL(PANEL2)"
i.e. VGET just before the panel display statement and VPUT in the panel definition:
)PROC
VPUT (DS1 DS2 DS3) PROFILE
But when I logoff from TSO and login back, the data is not displayed on the panel. Is there any specific command to display the data back on the panel once it is retrieved? |
|
| Back to top |
|
gcicchet
Joined: 28 Jul 2006
Posts: 445
|
| Posted: Fri Jul 25, 2008 2:33 pm Post subject: |
|
|
Hi,
when I use VGET and VPUT in a panel this is what I use and seems to work for me Code: )INIT
VGET (MEMBER)
)PROC
VPUT (MEMBER) PROFILE
Gerry |
|
| Back to top |
|
| |