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

SDSF and Rexx


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

New User


Joined: 20 Jun 2024
Posts: 8
Location: Netherlands

PostPosted: Tue Jul 23, 2024 5:58 pm
Reply with quote

Here is a little rexx:


/* REXX */
rc=isfcalls('ON')
isfprefix='*'
isfowner='*'
isfsysname='*'
isfdest=' ' || ,
' ' || ,
' ' || ,
' '
Address SDSF "ISFEXEC 'DA' (" verbose ")"



I know from here on I can pick up all kinds of variables.
What I want is to display the corresponding SDSF panel, directly from this rexx.
Does anyone know how to do this?


regards,
Hans Kok
Back to top
View user's profile Send private message
sergeyken

Senior Member


Joined: 29 Apr 2008
Posts: 2126
Location: USA

PostPosted: Wed Jul 24, 2024 1:40 am
Reply with quote

Mandatory Rule #1:
kokido wrote:
Here is a little rexx:
Code:
/* REXX */                             
rc=isfcalls('ON')                       
isfprefix='*'                     
isfowner='*'                           
isfsysname='*'                         
isfdest=' ' || ,                       
        ' ' || ,                       
        ' ' || ,                       
        ' '                             
Address SDSF "ISFEXEC 'DA' (" verbose ")"

I know from here on I can pick up all kinds of variables.
What I want is to display the corresponding SDSF panel, directly from this rexx.
Does anyone know how to do this?

regards,
Hans Kok
Back to top
View user's profile Send private message
Pedro

Global Moderator


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

PostPosted: Wed Jul 24, 2024 2:32 am
Reply with quote

If I recall correctly, the SDSF panels are formatted dynamically from assembler programs. I do not think the rexx API and the SDSF panels interact with each other in the way that you desire.

You can probably take the information returned from rexx and format it to look like the SDSF panels, but it is actually a pretty daunting task.

Separately, you can create a slimmed down panel that is somewhat similar to SDSF. Use an ISPF table and use table processing services. In this way you can have your own line commands.

----
Or you might be able to display the actual SDSF panel:
Code:
Address ISPEXEC "SELECT CMD(sdsf ; da)"

or maybe
Code:
Address TSO "sdsf da"

but you lose control and the user can do whatever they want within SDSF.

Sorry, I am retired and can no longer verify before posting, but it is something like that.
Back to top
View user's profile Send private message
kokido

New User


Joined: 20 Jun 2024
Posts: 8
Location: Netherlands

PostPosted: Wed Jul 24, 2024 12:56 pm
Reply with quote

Thank you for you clarifiing answer.
Sorry I broke the rule, won't do it again.
regards,
Hans Kok
Back to top
View user's profile Send private message
kokido

New User


Joined: 20 Jun 2024
Posts: 8
Location: Netherlands

PostPosted: Wed Jul 24, 2024 2:13 pm
Reply with quote

Made some improvements.

Code:
/* Rexx                                           
 ADDRESS ISPEXEC                                 
 cmd = 'SDSF;DA OTSU;OWNER;PRE 'userid()';SYSID *'
 "DISPLAY PANEL(IPWBPRIM) COMMAND(CMD)"           


The panel is the primary panel. By entering SDSF this way you can stack your commands.
Grateful you put me in the right direction.
kind regards,
Hans Kok
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 REXX/CMS How to place command console... CLIST & REXX 4
No new posts Help needed in automation cics transa... CLIST & REXX 1
No new posts Reroute print output via REXX/SDSF TSO/ISPF 6
No new posts How can I add/create a new INIT(initi... TSO/ISPF 2
No new posts Get RECORD LENGTH, allocated space of... CLIST & REXX 7
Search our Forums:

Back to Top