|
View previous topic :: View next topic
|
| Author |
Message |
manojkumar.sesuraj
New User
Joined: 15 Apr 2009
Posts: 43
Location: Mumbai
|
|
|
|
Hi,
I have an ISPF panel which contains four fields. I used VER statement to verify those fields. I used the panel in rexx. When I hit enter key, it asks me to fill the fields. Again, I gave END on command line. It doesn't close the panel. My panel looks like,
CMD ===> _ZCMD
A = _A
B = _B
C = _C
D = _D
VER(&A,NB)
VER(&B,NB)
VER(&C,NB)
VER(&D,NB)
IF (.RESP = END)
&YANS = X
Anybody, help me how to exit the program without executing any commands in rexx. |
|
| Back to top |
|
 |
expat
Global Moderator
Joined: 14 Mar 2007
Posts: 8797
Location: Welsh Wales
|
|
|
|
It may be that it is the REXX logic that redisplays the panel after a sucessful exit. Have you looked at that ?
| Quote: |
| Anybody, help me how to exit the program without executing any commands in rexx. |
I think that you need to explain very clearly what it is that you want, and why the restriction of any REXX code execution. |
|
| Back to top |
|
|
superk
Global Moderator
Joined: 26 Apr 2004
Posts: 4652
Location: Raleigh, NC, USA
|
|
|
|
| When you enter END on the command line, what return-code do you see from the DISPLAY servicee? Does your program code properly react to that return-code? |
|
| Back to top |
|
|
PeterHolland
Global Moderator
Joined: 27 Oct 2009
Posts: 2481
Location: Netherlands, Amstelveen
|
|
|
|
| superk wrote: |
| When you enter END on the command line, what return-code do you see from the DISPLAY servicee? Does your program code properly react to that return-code? |
As far as i see it the TS doesnt want to execute any code after displaying
the panel. Thats ok with me, but dont ask why the hell the panel is not going away. |
|
| Back to top |
|
|
Pedro
Global Moderator
Joined: 01 Sep 2006
Posts: 2547
Location: Silicon Valley
|
|
|
|
| Try changing your panel so that the .RESP is checked before the VER statements. And only do the VER statements if the user did not END |
|
| Back to top |
|
|
|
|
