Portal | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Forum Index
 
Register
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Profile Log in to check your private messages Log in
 
ISPF program to set SCRNAME

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> TSO/ISPF
View previous topic :: :: View next topic  
Author Message
prino

Senior Member


Joined: 07 Feb 2009
Posts: 1220
Location: Vilnius, Lithuania

PostPosted: Fri Sep 30, 2016 2:18 pm    Post subject: ISPF program to set SCRNAME
Reply with quote

Does anyone know how to set the SCRNAME in a REXX exec?

The obvious "ispexec scrname test" doesn't work, and there isn't anything obvious among the "ISP.SISPLPA(ISP*)" modules...
Any clues?

Why do I need it?

I'm using Doug Nadel's SDSF's ISFPCU41-with-hilite panel, and it would be nice to change the text on the swapbar to indicate the current SDSF panel, so that I can select the right one directly, rather than Alt-Tab (a macro for Tom Brennan's Vista tn3270) to it.
Back to top
View user's profile Send private message

Akatsukami

Global Moderator


Joined: 03 Oct 2009
Posts: 1789
Location: Bloomington, IL

PostPosted: Fri Sep 30, 2016 5:53 pm    Post subject:
Reply with quote

I think the ISPF variable ZSCRNAME is writeable.
Back to top
View user's profile Send private message
prino

Senior Member


Joined: 07 Feb 2009
Posts: 1220
Location: Vilnius, Lithuania

PostPosted: Fri Sep 30, 2016 6:16 pm    Post subject:
Reply with quote

You cannot do an

Code:
"ISPEXEC VPUT ZSCRNAME SHARED"

in Panel REXX. icon_sad.gif
Back to top
View user's profile Send private message
Akatsukami

Global Moderator


Joined: 03 Oct 2009
Posts: 1789
Location: Bloomington, IL

PostPosted: Fri Sep 30, 2016 6:34 pm    Post subject:
Reply with quote

Well, if you had given the complete requirement to begin with... icon_wink.gif

Will passing it between the panel and the driver work?
Back to top
View user's profile Send private message
prino

Senior Member


Joined: 07 Feb 2009
Posts: 1220
Location: Vilnius, Lithuania

PostPosted: Fri Sep 30, 2016 6:50 pm    Post subject:
Reply with quote

Akatsukami wrote:
Well, if you had given the complete requirement to begin with... icon_wink.gif

What more would you have wanted? icon_cry.gif

Akatsukami wrote:
Will passing it between the panel and the driver work?

There is no driver, I need something that works from inside PANEL REXX.
Back to top
View user's profile Send private message
prino

Senior Member


Joined: 07 Feb 2009
Posts: 1220
Location: Vilnius, Lithuania

PostPosted: Sat Oct 01, 2016 4:10 am    Post subject:
Reply with quote

The solution came from the ISPF-L list, and in essence it gives an extensible solution to Pedro's Better use of ISPF screen names in SDSF RFE, although it's going to need a bit of tweaking to make it suitable for general consumption. icon_smile.gif
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> TSO/ISPF All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Call Natural program with rexx shahaf CLIST & REXX 2 Tue Sep 08, 2020 11:22 am
No new posts ISPF Panel commands DDLIST /LISTBOX Wesley TSO/ISPF 11 Thu Aug 06, 2020 11:25 pm
No new posts Am Getting a vertical line in ISPF SC... Himansu22 TSO/ISPF 3 Fri Jul 31, 2020 11:58 pm
No new posts ISPF Edit Macro with profile commands... Lynne Schuler TSO/ISPF 14 Thu Jun 18, 2020 7:25 pm
No new posts In JCL Procedure how we can execute R... Dhananjayulu Neeli CLIST & REXX 7 Sat May 16, 2020 12:01 am

Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us