| View previous topic :: View next topic |
| Author |
Message |
sabarish Beginner
Joined: 13 Sep 2006 Posts: 7 Topics: 1
|
Posted: Thu Sep 14, 2006 1:43 am Post subject: Profile variables not being stored |
|
|
Hi
I am trying to put some Z variables using the VPUT service , but the values are not being stored .I am able to see the variables but not their values.
Like the panel used in ISPF is as follows:
!Employee Name .... _Z +
!Employee Dept ...... _Z +
!Employee Salary ...._Z +
)INIT
.ZVARS = '(MNAME,MDEP,MSAL)'
)PROC
VPUT ( MNAME MDEP MSAL) PROFILE
)END
In the ispf profile dataset ,there are entries for MNAME,MDEP and MSAL , but values are not stored for these entries which i enter through the above panel.Can anybody help?
Thanks
Sabarish |
|
| Back to top |
|
 |
ofer71 Intermediate
Joined: 12 Feb 2003 Posts: 358 Topics: 4 Location: Israel
|
Posted: Thu Sep 14, 2006 2:16 am Post subject: |
|
|
Can you show us the )ATTR section?
O.
________
Toyota T engine specifications
Last edited by ofer71 on Sat Feb 05, 2011 11:48 am; edited 1 time in total |
|
| Back to top |
|
 |
sabarish Beginner
Joined: 13 Sep 2006 Posts: 7 Topics: 1
|
Posted: Thu Sep 14, 2006 3:54 am Post subject: |
|
|
Hi
The )ATTR section is as follows:
| Code: |
! TYPE(TEXT) INTENS(HIGH) COLOR(GREEN)
#TYPE(TEXT) INTENS(HIGH) COLOR(YELLOW)
`TYPE(OUTPUT) INTENS(HIGH) COLOR(GREEN) CAPS(OFF)
@TYPE(OUTPUT) INTENS(HIGH) COLOR(RED) CAPS(OFF)
~TYPE(OUTPUT) INTENS(HIGH) COLOR(YELLOW)
$TYPE(TEXT) INTENS(HIGH)
|
THANKS
SABARISH |
|
| Back to top |
|
 |
ofer71 Intermediate
Joined: 12 Feb 2003 Posts: 358 Topics: 4 Location: Israel
|
Posted: Thu Sep 14, 2006 5:16 am Post subject: |
|
|
Where is the inderscore that used in your )BODY ? I can't see any INPUT attribute in your )ATTR...
O.
________
Mercedes-Benz OM617 engine
Last edited by ofer71 on Sat Feb 05, 2011 11:48 am; edited 1 time in total |
|
| Back to top |
|
 |
sabarish Beginner
Joined: 13 Sep 2006 Posts: 7 Topics: 1
|
Posted: Thu Sep 14, 2006 5:43 am Post subject: |
|
|
I am trying the ISPF program first time.so i was working based on another code.In that there is no INPUT attribute used and that is working fine.
Thanks
Sabarish |
|
| Back to top |
|
 |
ofer71 Intermediate
Joined: 12 Feb 2003 Posts: 358 Topics: 4 Location: Israel
|
Posted: Thu Sep 14, 2006 5:57 am Post subject: |
|
|
If you want your data to be kept, you probably need to define it first as input. For this you must use the INPUT attribute.
To read more about panel attributes, please refer to the fine manual.
O.
________
buy roor bongs
Last edited by ofer71 on Sat Feb 05, 2011 11:49 am; edited 1 time in total |
|
| Back to top |
|
 |
Mervyn Moderator

Joined: 02 Dec 2002 Posts: 415 Topics: 6 Location: Hove, England
|
Posted: Thu Sep 14, 2006 8:51 am Post subject: |
|
|
Please note this quotation from the fine manual:
| Quote: |
If not specified explicitly with the DEFAULT keyword, the default attribute characters are:
% (percent sign) -- text (protected) field, high intensity
+ (plus sign) -- text (protected) field, low intensity
_ (underscore) -- input (unprotected) field, high intensity
|
If the )ATTR statement doesn't specify a new default, then underscore is a valid input attribute, and values entered should be stored in the profile pool.
Can you show the whole panel? _________________ The day you stop learning the dinosaur becomes extinct |
|
| Back to top |
|
 |
sabarish Beginner
Joined: 13 Sep 2006 Posts: 7 Topics: 1
|
Posted: Fri Sep 15, 2006 3:43 am Post subject: |
|
|
Hi Mervyn
Thanks for the details.I am pasting the entire panel for you below:
| Code: |
)PANEL KEYLIST(ISRSAB,ISR)
)ATTR
! TYPE(TEXT) INTENS(HIGH) COLOR(GREEN)
#TYPE(TEXT) INTENS(HIGH) COLOR(YELLOW)
`TYPE(OUTPUT) INTENS(HIGH) COLOR(GREEN) CAPS(OFF)
@TYPE(OUTPUT) INTENS(HIGH) COLOR(RED) CAPS(OFF)
~TYPE(OUTPUT) INTENS(HIGH) COLOR(YELLOW)
$TYPE(TEXT) INTENS(HIGH)
)BODY
$****#Employee Entry Screen***$
+
+
+
!Employee Name . . . . _Z +
!Employee Dept . . . . _Z +
To exit the application press F3
)INIT
.ZVARS = '(MNAME MDEP)'
)PROC
VER(&MNAME,nb)
VER(&MDEP,nb)
vput( MNAME MDEP) profile
.CURSOR = MNAME
)END
|
Thanks
Sabarish |
|
| Back to top |
|
 |
semigeezer Supermod
Joined: 03 Jan 2003 Posts: 1014 Topics: 13 Location: Atlantis
|
Posted: Fri Sep 15, 2006 10:46 am Post subject: |
|
|
| Something else is going on here. How do you know that the variables are not being saved? Did you check option 7.3 to see if they are there? Are you starting the program from the same appliation id each time? Make sure that you are not displaying the panel with CONTROL ERRORS RETURN so that you will see errors. Also be sure that your program is not initializing them before the panel is displayed. I think you can do an explicit VGET in the INIT section but tha may not be true. |
|
| Back to top |
|
 |
sabarish Beginner
Joined: 13 Sep 2006 Posts: 7 Topics: 1
|
Posted: Mon Sep 18, 2006 4:16 am Post subject: |
|
|
Thanks semigeezer. I checked in 7.3 option also. The variables are not being saved.Not using CONTROL ERRORS RETURN also.Not intializing before the panel.I had also tried using VGET in INIT section but that also not working.
Can you help me? |
|
| Back to top |
|
 |
Mervyn Moderator

Joined: 02 Dec 2002 Posts: 415 Topics: 6 Location: Hove, England
|
Posted: Mon Sep 18, 2006 10:20 am Post subject: |
|
|
Sabarish,
How are you invoking the panel and reading the variables? Are you using NEWAPPL? If so, try without it. _________________ The day you stop learning the dinosaur becomes extinct |
|
| Back to top |
|
 |
sabarish Beginner
Joined: 13 Sep 2006 Posts: 7 Topics: 1
|
Posted: Tue Sep 19, 2006 1:19 am Post subject: |
|
|
Hi Mervyn
Thanks for the suggestion. I am not using NEWAPPL. I am invoking the panel as follows:
'ISPEXEC LIBDEF SYSEXEC DATASET ID('''MYEXEC''')'
'ISPEXEC LIBDEF ISPPLIB DATASET ID('''MYEXEC''')'
'ISPEXEC DISPLAY PANEL(TEST)'
Thanks
Sabarish |
|
| Back to top |
|
 |
|
|
|