How to retain data on ispf panel between different sessions?

Ekta Sharma · New User Joined: 26 Feb 2008 Posts: 35 Location: pune

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.

ofer71 · Posted: Tue Jul 22, 2008 4:21 pm

Do you have VERASE anywhere?

O.

Ekta Sharma · New User Joined: 26 Feb 2008 Posts: 35 Location: pune

Pandora-Box · Posted: Tue Jul 22, 2008 8:33 pm

Ekta,

Can you please post your panel definition?
So that it can help me and others for a quick correction

Regds,
Prem

Pedro · Posted: Tue Jul 22, 2008 9:30 pm

Your ISPPROF ddname needs to be allocated to a permanent dataset.

Ekta Sharma · New User Joined: 26 Feb 2008 Posts: 35 Location: pune

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.

expat · Posted: Fri Jul 25, 2008 11:43 am

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.

Ekta Sharma · New User Joined: 26 Feb 2008 Posts: 35 Location: pune

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

expat · Posted: Fri Jul 25, 2008 12:14 pm

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 ?

Ekta Sharma · New User Joined: 26 Feb 2008 Posts: 35 Location: pune

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"

expat · Posted: Fri Jul 25, 2008 1:16 pm

Was the VGET retrieving the correct values for the variables when executed prior to display ?

Ekta Sharma · New User Joined: 26 Feb 2008 Posts: 35 Location: pune

VGET is retrieving the correct values till the current TSO session is active. Once I logoff from TSO, the values are lost.

expat · Posted: Fri Jul 25, 2008 1:47 pm

I have just stored 4 variables in PROFILE, logged off, logged on again and retrieved the variables, and they all have the correct values.

Ekta Sharma · New User Joined: 26 Feb 2008 Posts: 35 Location: pune

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?

gcicchet · Posted: Fri Jul 25, 2008 2:33 pm

Hi,

when I use VGET and VPUT in a panel this is what I use and seems to work for me

Pedro · Posted: Fri Jul 25, 2008 9:37 pm