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

SDSF like solution in EJES (store command result in Dataset)


IBM Mainframe Forums -> All Other Mainframe Topics
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
aarnold#mvs

New User


Joined: 04 Dec 2022
Posts: 8
Location: Hungary

PostPosted: Wed Feb 15, 2023 8:21 pm
Reply with quote

Dear All, because of any reason, I need to know what is the equivalent of PGM=SDSF in case the EJES is the available too only (so SDSF totally not available).

The problem, that how we can issue any command (like D R,L, etc.) and get the result to a Dataset what we can process further.

Do you know any solution for that?
Or is there any working way how to issue a command, and store the result in a Dataset.

Many thanks
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 8696
Location: Dubuque, Iowa, USA

PostPosted: Wed Feb 15, 2023 8:56 pm
Reply with quote

What did the vendor say when you asked them?
Back to top
View user's profile Send private message
Joerg.Findeisen

Senior Member


Joined: 15 Aug 2015
Posts: 1247
Location: Bamberg, Germany

PostPosted: Wed Feb 15, 2023 10:06 pm
Reply with quote

Basically I have my doubts that there is no SDSF at all. To my knowledge, EJES should work exactly like SDSF does.
Back to top
View user's profile Send private message
aarnold#mvs

New User


Joined: 04 Dec 2022
Posts: 8
Location: Hungary

PostPosted: Mon Feb 20, 2023 2:20 pm
Reply with quote

Hello
I found PGM=EJESLNK and some link what we will test:

EJESLINK NOT WORKING...
ibmmainframes.com/about40357.html

Copying JOB JCL from EJES to PS
ibmmainframes.com/about28061.html

Capturing STC SYSOUT when the STC is shut down
bit.listserv.ibm-main.narkive.com/g8OPhpKq/capturing-stc-sysout-when-the-stc-is-shut-down

Regards,
Back to top
View user's profile Send private message
aarnold#mvs

New User


Joined: 04 Dec 2022
Posts: 8
Location: Hungary

PostPosted: Thu Jun 08, 2023 7:10 pm
Reply with quote

Hello,
I also found a working solutions in the following link:
bit.listserv.ibm-main.narkive.com/oOBS3BIw/tso-rexx-sdsf-rexx

JCL:
//EJES EXEC PGM=EJESLNK
//EJESOUT DD DUMMY,RECFM=VB,LRECL=84,BLKSIZE=88
//EJESEXT DD SYSOUT=*
//EJESIN DD *
PRESET;JNAME $*;STATUS;SHOW JNAME JID OWNER PRTDEST;UPDATE
EXTRACT FIRST LAST
//

and rexx:
/* REXX */
rc=ejesrexx("EXECAPI * 'PRESET;JNAME $*;STATUS' (prefix _ term")
say "JobName JobId Owner PrtDest"
do i=1 to _Lines
say LEFT(_TCData.__JNAME.i,8) LEFT(_TCData.__JID.i,8) ,
LEFT(_TCData.__OWNER.i,8) _TCData.__PRTDEST.i
end

I just modified the $* to my requirement, and it works well.
Regards,
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 -> All Other Mainframe Topics

 


Similar Topics
Topic Forum Replies
No new posts Store the data for fixed length COBOL Programming 1
No new posts RACF - Rebuild SETROPTS command which... All Other Mainframe Topics 3
No new posts Execute secondary panel of sdsf with ... CLIST & REXX 1
No new posts FINDREP - Only first record from give... DFSORT/ICETOOL 3
No new posts Routing command Address SDSF to other... TSO/ISPF 2
Search our Forums:

Back to Top