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

ZVAR in two line..


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

New User


Joined: 01 Oct 2010
Posts: 43
Location: Bangalore

PostPosted: Thu Apr 04, 2013 12:44 pm
Reply with quote

Hello

I have around 13 variables in ZVAR command.

Code:
)INIT                                                               
 .ZVARS='(CHK,OSD,ARC,SSD,PCO,VER,FAX,ERR,ERR1,ERR2,ERR3,ERR4,ERR5)'
 .CURSOR = CHK                                                       


Now as per the requirement i need to include more variables in ZVAR and one line won't be enough to include all those variable. I have tried to continue the variable names in two lines and failed.. icon_sad.gif
Is there anyway to continue the variable names in two lines?
Note: I understand the fact that we can give variable in name in panel body itself.
Back to top
View user's profile Send private message
Stefan

Active User


Joined: 12 Jan 2006
Posts: 110
Location: Germany

PostPosted: Thu Apr 04, 2013 1:24 pm
Reply with quote

Code:
)INIT
.ZVARS='(CHK OSD ARC SSD PCO +
         VER FAX +
         ERR ERR1 ERR2 ERR3 ERR4 ERR5)'
.CURSOR = CHK
Back to top
View user's profile Send private message
swathykrishnan

New User


Joined: 01 Oct 2010
Posts: 43
Location: Bangalore

PostPosted: Thu Apr 04, 2013 1:55 pm
Reply with quote

Thanks for the reply Stefan..

But the solution is not working... I have changed the code as below
Code:
.ZVARS ='(CHK,OSD,ARC,SSD,PCO,VER,FAX,ERR,ERR1,ERR2,ERR3,ERR4,+
          ERR5,ERR6,ERR7)'                                     

I have tried after removing the comma also.... then also its not working
Back to top
View user's profile Send private message
enrico-sorichetti

Superior Member


Joined: 14 Mar 2007
Posts: 10873
Location: italy

PostPosted: Thu Apr 04, 2013 2:27 pm
Reply with quote

with spaces

the panel
Code:
000007 )BODY
 000008 %--------------------  TITLE FOR ENTRY PANEL  --------------------------
 000009 %COMMAND ===>_ZCMD
 000010 %
 000011 +                  1         2         3         4         5
 000012 +      12345678901234567890123456789012345678901234567890123456
 000013 +   1 ¨z                                                       +
 000014 +   2 ¨z                                                       +
 000015 +   3 ¨z                                                       +
 000016 +   4 ¨z                                                       +
 000017 + note
 000018 + note .ZVARS = '(var1  - the implied plus is an attr char
 000019 + note var2 var3 var4)'
 000020 + note
 000021 )INIT
 000022    .ZVARS = '(var1  +
 000023    var2 var3 var4)' 
 000024 )REINIT


the display
Code:
--------------------  TITLE FOR ENTRY PANEL  --------------------------
 COMMAND ===>

                   1         2         3         4         5
       12345678901234567890123456789012345678901234567890123456
    1
    2
    3
    4
  note
  note .ZVARS = '(var1  - the implied plus is an attr char
  note var2 var3 var4)'
  note


with commas

the panel
Code:
000007 )BODY
 000008 %--------------------  TITLE FOR ENTRY PANEL  --------------------------
 000009 %COMMAND ===>_ZCMD
 000010 %
 000011 +                  1         2         3         4         5
 000012 +      12345678901234567890123456789012345678901234567890123456
 000013 +   1 ¨z                                                       +
 000014 +   2 ¨z                                                       +
 000015 +   3 ¨z                                                       +
 000016 +   4 ¨z                                                       +
 000017 + note
 000018 + note .ZVARS = '(var1, - the implied plus is an attr char
 000019 + note var2,var3,var4)'
 000020 + note
 000021 )INIT
 000022    .ZVARS = '(var1, +
 000023    var2,var3,var4)'
 000024 )REINIT


the display
Code:
--------------------  TITLE FOR ENTRY PANEL  --------------------------
 COMMAND ===>

                   1         2         3         4         5
       12345678901234567890123456789012345678901234567890123456
    1
    2
    3
    4
  note
  note .ZVARS = '(var1, - the implied plus is an attr char
  note var2,var3,var4)'
  note


mixed commas and spaces
the panel
Code:
000007 )BODY
 000008 %--------------------  TITLE FOR ENTRY PANEL  --------------------------
 000009 %COMMAND ===>_ZCMD
 000010 %
 000011 +                  1         2         3         4         5
 000012 +      12345678901234567890123456789012345678901234567890123456
 000013 +   1 ¨z                                                       +
 000014 +   2 ¨z                                                       +
 000015 +   3 ¨z                                                       +
 000016 +   4 ¨z                                                       +
 000017 + note
 000018 + note .ZVARS = '(var1  - the implied plus is an attr char
 000019 + note var2 var3,var4)'
 000020 + note
 000021 )INIT
 000022    .ZVARS = '(var1  +
 000023    var2 var3,var4)'
 000024 )REINIT


the display
Code:
--------------------  TITLE FOR ENTRY PANEL  --------------------------
 COMMAND ===>

                   1         2         3         4         5
       12345678901234567890123456789012345678901234567890123456
    1
    2
    3
    4
  note
  note .ZVARS = '(var1  - the implied plus is an attr char
  note var2 var3,var4)'
  note



Quote:
I have around 13 variables in ZVAR command.


unfortunately ISPF is a bit fussy about approximations
so ISPF does not care <about 13>
it wants exactly the same number of names as <z> things

Quote:
I have tried to continue the variable names in two lines and failed..

it would have been nice if You had posted the error You received

most probably it is something related to Your approximation

You should have received something like
Code:

 ******************************************************************************
 * ISPP241                                                                    *
 *                                                                            *
 * Panel 'TEST1R' error                                                       *
 * Number of .ZVARS field names does not equal number of "Z" in/out fields.   *
 *                                                                            *
Back to top
View user's profile Send private message
swathykrishnan

New User


Joined: 01 Oct 2010
Posts: 43
Location: Bangalore

PostPosted: Thu Apr 04, 2013 3:05 pm
Reply with quote

Its working now... Thanks Enrico, Thanks Stefan...

Quote:
it wants exactly the same number of names as <z> things
I have mentioned the number to avoid questions like "why do u want to write it in two line? Do u want me to guess how many variables you use?"... I am sorry if the number was a redundant info... [/i]
Back to top
View user's profile Send private message
enrico-sorichetti

Superior Member


Joined: 14 Mar 2007
Posts: 10873
Location: italy

PostPosted: Thu Apr 04, 2013 3:06 pm
Reply with quote

Quote:
Its working now... Thanks Enrico, Thanks Stefan...

it would be nice to know the error !
Back to top
View user's profile Send private message
swathykrishnan

New User


Joined: 01 Oct 2010
Posts: 43
Location: Bangalore

PostPosted: Thu Apr 04, 2013 3:13 pm
Reply with quote

Hello Enrico

Actually the issue was due to screen size exceeded the limit... While adding new fields the panel has exceeded the size limit...
Since "CONTROL ERRORS RETURN" was active I couldn't see the error message...
Thanks a lot for your guidance.
Back to top
View user's profile Send private message
Pedro

Global Moderator


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

PostPosted: Thu Apr 04, 2013 6:47 pm
Reply with quote

Quote:
Actually the issue was due to screen size exceeded the limit

Learn how to define and use a scrollable area in your panel. It should not have screen size issues.
Back to top
View user's profile Send private message
enrico-sorichetti

Superior Member


Joined: 14 Mar 2007
Posts: 10873
Location: italy

PostPosted: Thu Apr 04, 2013 6:55 pm
Reply with quote

and also how to carry on the proper problem determination icon_cool.gif
Back to top
View user's profile Send private message
don.leahy

Active Member


Joined: 06 Jul 2010
Posts: 765
Location: Whitby, ON, Canada

PostPosted: Sat Apr 06, 2013 2:23 am
Reply with quote

Quote:

Learn how to define and use a scrollable area in your panel. It should not have screen size issues.
YES!! Otherwise, even a naiive user who likes "PFSHOW ON" might disable your panel.
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 Write line by line from two files DFSORT/ICETOOL 7
No new posts Reading dataset in Python - New Line ... All Other Mainframe Topics 22
No new posts rewrite same SAY line CLIST & REXX 8
No new posts Merge files with a key and insert a b... DFSORT/ICETOOL 6
No new posts Repeat a DD line- comment and insert ... CA Products 3
Search our Forums:

Back to Top