How to convert my REXX member into a TSO command



IBM's Command List programming language & Restructured Extended Executor

How to convert my REXX member into a TSO command

Postby jkk2020 » Tue Jan 20, 2009 5:52 pm

Hi,

I would like to run my rexx member name as command: 'TSO membername' from ISPF main screen.
Example:
If I have a member in 'ABC.test.rexx(BOB)'

I want to execute this by typing 'TSO BOB' on ISPF main screen.

Could some one please suggest how would I do it (I already know how to exexute this using EXEC command in command prompt).

Thanks,
JKK
jkk2020
 
Posts: 5
Joined: Tue Jan 20, 2009 5:41 pm
Has thanked: 0 time
Been thanked: 0 time

Re: How to convert my REXX member into a TSO command

Postby MrSpock » Tue Jan 20, 2009 6:31 pm

Move the member "BOB" into an authorized PDS or PDS/E allocated to either SYSPROC or SYSEXEC as dictated by your site's standards. Or, contact your site's System Programming team to see if there is a standard method that allows you to place your PDS 'ABC.TEST.REXX' into the SYSPROC or SYSEXEC library concatenation permanently for your TSO/E logon session.

If neither option is possible, then I direct your attention to the TSO/E ALTLIB command.
User avatar
MrSpock
Global moderator
 
Posts: 807
Joined: Wed Jun 06, 2007 9:37 pm
Location: Raleigh NC USA
Has thanked: 0 time
Been thanked: 4 times

Re: How to convert my REXX member into a TSO command

Postby jkk2020 » Tue Jan 20, 2009 7:19 pm

Thanks MrSpock.

I have done LISTALC STATUS command and found the allocated SYSPROC and SYSEXEC librarues

1. I tried to move the member 'BOB' to either of them but I don't have authorization.
2. I have to see if I can contact my system admin to concatenate my date set to SYSPROC or SYSEXEC.
3.But I tried usng following ALTLIB command and executed this before trying TSO BOB command. But didn't work. Could you please suggest what is wrong with the below ALTLIB and how execute TSO BOB.

/***************************** REXX *******************************/
trace off
"altlib reset"
"altlib activate application(exec) dataset('ABC.TEST.REXX')"
exit
jkk2020
 
Posts: 5
Joined: Tue Jan 20, 2009 5:41 pm
Has thanked: 0 time
Been thanked: 0 time

Re: How to convert my REXX member into a TSO command

Postby dick scherrer » Wed Jan 21, 2009 1:22 am

Hello,

But didn't work
Provides nothing for us to use to help you. . .

What happened? Some error? Some abend? Unexpected/undesired result?

Might an altlib deactivate be needed?
Hope this helps,
d.sch.
User avatar
dick scherrer
Global moderator
 
Posts: 6268
Joined: Sat Jun 09, 2007 8:58 am
Has thanked: 3 times
Been thanked: 93 times

Re: How to convert my REXX member into a TSO command

Postby jkk2020 » Wed Jan 21, 2009 1:25 pm

What I meant to say is: I tried to execute the following ALTLIB commands.
/***************************** REXX *******************************/
trace off
"altlib reset"
"altlib activate application(exec) dataset('ABC.TEST.REXX')"
exit
/********************************************************************/

But I am still getting the error 'Command BOB not found', when I was trying to execute it as 'TSO BOB'.
jkk2020
 
Posts: 5
Joined: Tue Jan 20, 2009 5:41 pm
Has thanked: 0 time
Been thanked: 0 time

Re: How to convert my REXX member into a TSO command

Postby jkk2020 » Wed Jan 21, 2009 2:43 pm

So Could some one please suggest how to get any rexx member executed as TSO command (example 'TSO membername')
Using ALTLIB.?
Thanks for your help.
jkk2020
 
Posts: 5
Joined: Tue Jan 20, 2009 5:41 pm
Has thanked: 0 time
Been thanked: 0 time

Re: How to convert my REXX member into a TSO command

Postby MrSpock » Thu Jan 22, 2009 12:43 am

I tried your exec for the ALTLIB concatenation, and it worked for me.

There's one other thing you can try. I use this to completely place my PDS at the front of the entire SYSPROC allocation for the current session:

/* REXX */
dsname = "'MRSPOCK.REXX'"
ddname = "SYSPROC"
"ISPEXEC QBASELIB "ddname" ID(dslist)"
"ALLOC F("ddname") DA("dsname","dslist") SHR REU"
Exit 0
User avatar
MrSpock
Global moderator
 
Posts: 807
Joined: Wed Jun 06, 2007 9:37 pm
Location: Raleigh NC USA
Has thanked: 0 time
Been thanked: 4 times


Return to CLIST & REXX

 


  • Related topics
    Replies
    Views
    Last post