Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums 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: 1067
Location: Oostende, Belgium

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: 1781
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: 1067
Location: Oostende, Belgium

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: 1781
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: 1067
Location: Oostende, Belgium

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: 1067
Location: Oostende, Belgium

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 Calling IKJEFT01 program from Rexx upendrasri CLIST & REXX 4 Wed Nov 15, 2017 4:27 pm
No new posts How to write Rexx program to size and... sreejeshcs CLIST & REXX 14 Thu Oct 12, 2017 7:26 am
No new posts Accessing CICS tran with map from JCL... navdeepaggarwal CICS 5 Tue Oct 03, 2017 6:15 pm
No new posts MQ command in option 6 of ISPF! Vignesh Sid All Other Mainframe Topics 3 Tue Sep 26, 2017 6:01 pm
No new posts Conditional highlighting of rows in I... packerm CLIST & REXX 2 Thu Sep 21, 2017 6:50 pm

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