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

CLEAR the input fields in ISPF panel


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

New User


Joined: 26 Mar 2007
Posts: 57
Location: Pune

PostPosted: Fri Nov 21, 2008 8:50 pm
Reply with quote

Hi ,

In my ISPF panel I am taking 3 inputs and proceeding with next panels. Next time when I display the panel , the older values which I entered last time is retained, I tried to REFRESH the panel with PF key, but it didnot work,

Can anyone please help me on this ?

here is my code

Code:
"DISPLAY PANEL(MANYIP)"                               
"VGET (ENVR RLSE DATE) PROFILE"                       
"ISPEXEC VGET (ZPFKEY) ASIS"                         
SELECT                                               
  WHEN ZPFKEY ='PF03' THEN   CALL EXIT               
  WHEN ZPFKEY ='PF05' THEN   REFRESH(ENVR RLSE DATE) 
  OTHERWISE NOP                                       
END


Edited: Please use BBcode when You post some code, that's rather readable...Anuj
Back to top
View user's profile Send private message
cpuhawg

Active User


Joined: 14 Jun 2006
Posts: 331
Location: Jacksonville, FL

PostPosted: Fri Nov 21, 2008 9:57 pm
Reply with quote

Prior to displaying the panel, you initialized the fields to blanks (based on their length:


Code:

ENVR = '       '
RLSE = '    '
DATE = '          '
Back to top
View user's profile Send private message
Pedro

Global Moderator


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

PostPosted: Fri Nov 21, 2008 10:09 pm
Reply with quote

Code:
"VGET (ENVR RLSE DATE) PROFILE"

What is that for?

I am guessing: the panel might be saving those variables to the profile, which based on your questions, I do not think it should be doing. If you use the same variable names in your rexx and your panel, then you just share them. Neither your panel nor your rexx should do VPUT or VGET (especially, if you want to blank them out each time).
Back to top
View user's profile Send private message
sparrow

New User


Joined: 26 Mar 2007
Posts: 57
Location: Pune

PostPosted: Fri Nov 21, 2008 10:27 pm
Reply with quote

Thank you , I tried this before displaying the panel. It worked.
Back to top
View user's profile Send private message
sparrow

New User


Joined: 26 Mar 2007
Posts: 57
Location: Pune

PostPosted: Fri Nov 21, 2008 10:29 pm
Reply with quote

Hi Pedro,

I couldnt understand your question. I am new to REXX, please eloborate , so that I can learn more from you


Thanks
Back to top
View user's profile Send private message
gcicchet

Senior Member


Joined: 28 Jul 2006
Posts: 1702
Location: Australia

PostPosted: Sat Nov 22, 2008 3:40 am
Reply with quote

Hi,

what Pedro is asking is, why are you using VGET if you don't want previous retained values.

At some stage or in the current PANEL/REXX a VPUT was used to save those variable names, hence a VGET will retrieve tha saved variables from your PROFILE and populate your panel.


Gerry
Back to top
View user's profile Send private message
Pedro

Global Moderator


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

PostPosted: Sat Nov 22, 2008 7:09 am
Reply with quote

Quote:
a VGET will retrieve tha saved variables from your PROFILE and populate your panel.


Wrong! will not populate the panel.

In the program shown, the DISPLAY is done first, followed by VGET. Any values entered by the user are ignored, unless the panel itself saved the values to the PROFILE.

Except you want to blank out the values... so you should not be saving to the profile.

So, my suggestion is to remove the VPUT from the panel and remove the VGET from the rexx program. It will still work because ISPF and rexx share their variable pool
Back to top
View user's profile Send private message
gcicchet

Senior Member


Joined: 28 Jul 2006
Posts: 1702
Location: Australia

PostPosted: Sat Nov 22, 2008 3:00 pm
Reply with quote

Hi Pedro,

the VGET could easily be done in the PANEL, this would display the values in the panel.


Gerry
Back to top
View user's profile Send private message
Pedro

Global Moderator


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

PostPosted: Sat Nov 22, 2008 9:27 pm
Reply with quote

For the situation described, you do not need any VPUT and VGET. REXX and panel share the same variables without VGET and VPUT, so why call them?
Back to top
View user's profile Send private message
gcicchet

Senior Member


Joined: 28 Jul 2006
Posts: 1702
Location: Australia

PostPosted: Sun Nov 23, 2008 5:52 am
Reply with quote

Hi Pedro,

what I was trying to say is that the OP may have a VGET in the PANEL, I have agreed all along with you that VPUT and VGET is not required.



Gerry
Back to top
View user's profile Send private message
sparrow

New User


Joined: 26 Mar 2007
Posts: 57
Location: Pune

PostPosted: Sun Nov 23, 2008 11:09 am
Reply with quote

Yes, I without VPUT and VGET its working...

Thanks everyone
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 TRIM everything from input, output co... DFSORT/ICETOOL 1
No new posts Extracting Variable decimal numbers f... DFSORT/ICETOOL 17
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
Search our Forums:

Back to Top