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

ISPF program to set SCRNAME


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

Senior Member


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

PostPosted: Fri Sep 30, 2016 2:18 pm
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: 1788
Location: Bloomington, IL

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

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

Senior Member


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

PostPosted: Fri Sep 30, 2016 6:16 pm
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: 1788
Location: Bloomington, IL

PostPosted: Fri Sep 30, 2016 6:34 pm
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
Warnings : 1

Senior Member


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

PostPosted: Fri Sep 30, 2016 6:50 pm
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
Warnings : 1

Senior Member


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

PostPosted: Sat Oct 01, 2016 4:10 am
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 View Bookmarks
All times are GMT + 6 Hours
Forum Index -> TSO/ISPF

 


Similar Topics
Topic Forum Replies
This topic is locked: you cannot edit posts or make replies. Passing a field name to COBOL program COBOL Programming 10
This topic is locked: you cannot edit posts or make replies. Sample CICS Webservices Program CICS 1
No new posts Calling Rexx program from Cobol CLIST & REXX 12
No new posts How to define transaction that trigge... CICS 2
No new posts Call Natural program with rexx CLIST & REXX 2
Search our Forums:

Back to Top