|
|
| Author |
Message |
mail2ram1983
New User
Joined: 11 Jun 2008
Posts: 2
Location: bangalore
|
|
|
|
In my panel it's accepting 2 inputs from the user for eg. name and pin
and its validating. I've included the logic that if user doesn't enter anything it will populate as default value eg..if user doesn't enter pin panel will give as 1234..but infuture I felt that I have no need of this default value so I removed the vget and vput which I have used for this logic. The problem now is still while displaying the panel its showing eg pin = 1234 or whatever I have entered last I guess it's in temporay storage area. I don't have any idea to clear up this What do I need to do?
| Code: |
)panel
vget(name,pin)
if &pin=''
&pin=1234
)proc
vput(name,pin)
|
Can we use vdel? If yes how?
Regards,
Ram.G |
|
| Back to top |
|
 |
References
|
 Posted: Sat Jun 28, 2008 8:12 pm Post subject: Re: Clearing a panel field |
|
|
|
|
| Splitted: Sat Jun 28, 2008 9:10 pm by superk From Topic Creating ISPF Panel and wrote a rexx program to display it (TSO/ISPF) |
expat
Global Moderator
Joined: 14 Mar 2007
Posts: 2913
Location: Brussels once more ...
|
|
|
|
| Set the field to blank and remove any processing of the field from the panel. |
|
| Back to top |
|
|
mail2ram1983
New User
Joined: 11 Jun 2008
Posts: 2
Location: bangalore
|
|
|
|
thx for your response
but i have found VERASE can able to solve my problem
eg: "VERASE (variable-name)"
Can any one share the panel code which has scrol + PF keys function + browsing or editing the datasets through panels
any help will be greatly appreciated...
thx in advance
Ram.G |
|
| Back to top |
|
|
Pedro
Senior Member
Joined: 01 Sep 2006
Posts: 302
Location: work
|
|
|
|
Is this related to 'clearing the panel field'?
| Quote: |
Can any one share the panel code which has scrol + PF keys function + browsing or editing the datasets through panels |
If not, please start a new thread.
For clearing a field, I think you need an assignment statement in your panel:
| Code: |
)INIT
&PIN = ' '
&NAME = ' ' |
|
|
| Back to top |
|
|
Marso
Active User
Joined: 13 Mar 2006
Posts: 288
Location: Israel
|
|
|
|
| Code: |
)panel
vget(name,pin)
if &pin=''
&pin=1234
)proc
vput(name,pin) |
Without relation to your question, there is something missing in your example.
Please, use COPY-PASTE and give us valid code or valid examples, we don't want to guess.
By the way, if you're displaying a panel from REXX, you don't need vget and vput, values are passed automagically.
If you use COBOL, you must use vget and vput. |
|
| Back to top |
|
|
|
|
