View previous topic :: View next topic
|
Author |
Message |
kbmkris
Active User
Joined: 24 Jun 2006 Posts: 101
|
|
|
|
hi,
I created a panel and using REXX I executed the panel. after some time, i made changes to the panel, but while i am executing, the same is not updated in the panel displayed by REXX routine.
Code: |
[u]Panel:[/u]
)ATTR
_ TYPE(INPUT) INTENS(HIGH) JUST(LEFT) CAPS(ON)
% SKIP(ON) TYPE(TEXT) INTENS(HIGH)
+ SKIP(ON) TYPE(TEXT) INTENS(LOW)
)BODY
+PANEL1-----------------------------------------------------------------
+ %PERSONAL DETAILS
+
+ ENTER THE NAME: %_Z%
+ ENTER THE CITY: %_Z%
+
+ ENTER FEATURE1: %_Z%
+ ENTER FEATURE2: %_Z%
+
+ DISPLAY : %&HI
+
)INIT
.ZVARS=(NAME,CITY,FEA1,FEA2)
&CITY=' '
)PROC
VER (&NAME,NONBLANK)
VER (&CITY,NONBLANK)
IF (&CITY = 'CAN')
&HI = 'BALA'
)END
[u]REXX:[/u]
/*REXX*/
ADDRESS ISPEXEC
"LIBDEF ISPPLIB DATASET ID('XYZ.MY.PANELS') STACK"
"DISPLAY PANEL(PANEL1)" |
And please let me know how to set the length of the dialog variables. I can enter only 4 character to the maximum.
Thanks,
Bala |
|
Back to top |
|
|
saiprasadh
Active User
Joined: 20 Sep 2006 Posts: 154 Location: US
|
|
|
|
Hi Bala,
I made some slight modification in your Panel definition and REXX code.I got the output
Code: |
)ATTR
_ TYPE(INPUT) INTENS(HIGH) JUST(LEFT) CAPS(ON) PAD(_)
% SKIP(ON) TYPE(TEXT) INTENS(HIGH)
+ SKIP(ON) TYPE(TEXT) INTENS(LOW)
@ TYPE(OUTPUT) COLOR(RED) INTENS(HIGH) JUST(ASIS) CAPS(OFF)
)BODY
+PANEL1-----------------------------------------------------------------
+ %PERSONAL DETAILS
+
+ ENTER THE NAME: %_Z%
+ ENTER THE CITY: %_Z%
+
+ ENTER FEATURE1: %_Z%
+ ENTER FEATURE2: %_Z%
+
+ DISPLAY : %@HI
+
)INIT
.ZVARS=(NAME,CITY,FEA1,FEA2)
&CITY=' '
)PROC
VER (&NAME,NB)
VER (&CITY,NB)
IF (&CITY = 'CAN')
&HI = 'BALA'
)END
/*REXX*/
ADDRESS ISPEXEC
"LIBDEF ISPPLIB DATASET ID(''XYZ.MY.PANELS') STACK"
"DISPLAY PANEL(PANEL1)"
SAY 'HI' HI
"DISPLAY PANEL(PANEL1)" |
Input
Code: |
PANEL1-----------------------------------------------------------------
PERSONAL DETAILS
ENTER THE NAME: sai_
ENTER THE CITY: can_
ENTER FEATURE1: fea1
ENTER FEATURE2: fea2
DISPLAY : |
Output
Code: |
PANEL1-----------------------------------------------------------------
PERSONAL DETAILS
ENTER THE NAME: SAI_
ENTER THE CITY: ____
ENTER FEATURE1: FEA1
ENTER FEATURE2: FEA2
DISPLAY : BALA
|
Correct Me if i am wrong
Thanks
Sai |
|
Back to top |
|
|
ofer71
Global Moderator
Joined: 27 Dec 2005 Posts: 2358 Location: Israel
|
|
|
|
This is a quote from the fine manual:
Quote: |
Panel and message definitions are fetched again from the panel and message files when a panel name or message ID is specified in an ISPF service. In normal mode, the most recently accessed panel definitions are retained in virtual storage. If you have modified the panel or message file, use of TEST mode ensures that the latest version of each panel or message is accessed during a test run. |
So, in order to see the newer version of your panel, you must first invoke it in TEST mode (option 7.2 from my main menu).
O. |
|
Back to top |
|
|
Aaru
Senior Member
Joined: 03 Jul 2007 Posts: 1287 Location: Chennai, India
|
|
|
|
I had faced the same problem once while updating the panel.
I used to logoff from the session and execute the REXX exec again after logging in. It used to work. Also the expl given by offer makes sense. |
|
Back to top |
|
|
ofer71
Global Moderator
Joined: 27 Dec 2005 Posts: 2358 Location: Israel
|
|
|
|
Aaru -
This is not a "problem". This is the exact way that ISPF designers wanted it to work.
O. |
|
Back to top |
|
|
dbzTHEdinosauer
Global Moderator
Joined: 20 Oct 2006 Posts: 6966 Location: porcelain throne
|
|
|
|
It is only a 'problem' for those who do not read the documentation. |
|
Back to top |
|
|
jz1b0c
Active User
Joined: 25 Jan 2004 Posts: 160 Location: Toronto, Canada
|
|
|
|
kbmkris,
One solution is exit from all the panels and delete " Log Data Set"
you get something like this when you exit from all the panels
type 2 here and then under ready type ispf... this will perform refresh
Process Option . . . . 1. Print data set and delete
2. Delete data set without printing
3. Keep data set - Same
(allocate same data set in next session)
4. Keep data set - New
(allocate new data set in next session) |
|
Back to top |
|
|
ofer71
Global Moderator
Joined: 27 Dec 2005 Posts: 2358 Location: Israel
|
|
|
|
jz1b0c -
Quote: |
you get something like this when you exit from all the panels
type 2 here and then under ready type ispf... this will perform refresh |
This not a refresh. This is simply logging off ISPF and logging on back to ISPF.
O. |
|
Back to top |
|
|
jz1b0c
Active User
Joined: 25 Jan 2004 Posts: 160 Location: Toronto, Canada
|
|
|
|
yeah that's right..
but you dont need to enter the userid and password for TSO
its not a recommended one but for a newbee, it would help |
|
Back to top |
|
|
|