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

auto execution of rexx program at login session


IBM Mainframe Forums -> CLIST & REXX
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
sandpas

New User


Joined: 15 Aug 2006
Posts: 4
Location: uk

PostPosted: Tue Aug 15, 2006 8:39 pm
Reply with quote

Hi Everyone,

I have written a rexx program. I need this program to be triggered automatically once I login into the session.

I stored the rexx library in SYSEXEC, but not sure how to issue an instruction to run a prgm from this library by itself.

I hope, I conveyed what I need.

Thanks in advance
Regards
sandeep
Back to top
View user's profile Send private message
cpuhawg

Active User


Joined: 14 Jun 2006
Posts: 331
Location: Jacksonville, FL

PostPosted: Tue Aug 15, 2006 8:58 pm
Reply with quote

You could create your own TSO proc and add a batch REXX step (IJKEFT01) to execute prior to your TSO session startup.
Back to top
View user's profile Send private message
sandpas

New User


Joined: 15 Aug 2006
Posts: 4
Location: uk

PostPosted: Wed Aug 16, 2006 2:56 pm
Reply with quote

Thanks for your response.

I am not sure how to add the job to execute before tso session.

could you please throw some light on this part.

My doubt is that the rexx program should execute the moment we enter into TSO session.

Running a batch job to execute the prgm prior to tso session, how can this help.

I feel like, if we can add the program to the clist, that should take care.
correct me if i am wrong. If correct, please advise me the with clist library.


Thanks in advance
Sandeep
Back to top
View user's profile Send private message
cpuhawg

Active User


Joined: 14 Jun 2006
Posts: 331
Location: Jacksonville, FL

PostPosted: Wed Aug 16, 2006 6:14 pm
Reply with quote

On the command line you can enter:

Code:

TSO LU YOURID TSO


At the bottom of the display, you will see something like:
Code:

TSO INFORMATION       
---------------       
ACCTNUM= AB123         
HOLDCLASS= R           
JOBCLASS= I           
MSGCLASS= R           
PROC= $TSOPROC



This indicates that $TSOPROC is the TSO proc that you are executing. You must be able to locate the PDS library this proc exists in and you must be able to update this PDS. The TSO proc executes the IKJEFT01 program.

This 1st part of the TSO proc will look something like:

Code:

//$TSOPROC   PROC   
//$TSOPROC  EXEC PGM=IKJEFT01,DYNAMNBR=199,PARM='%ALLMAIN'               
//STEPLIB  DD DSN=CEE.ABCLIB,DISP=SHR                                 
//*------- REXX EXECS -----------------------------------------------**
//*                                                                     
//SYSEXEC  DD  DSN=SYSTEM.COMMON.EXEC,                  REXX EXECS     
//             DISP=SHR                                                 
//         DD  DSN=SYS1.SISEXEC,                        ISPF           
//             DISP=SHR                                                 
//*        DD  DSN=SYS1.ALLVTAM,                       VTAM IPCS   
//* alot more libraries follow   


You would insert your batch REXX step just prior to the the PGM=IKJEFT01 card. You are not running a batch job, merely executing a job step prior to starting up your TSO. That REXX step will finish before your TSO sessions is activated.

Because you share your TSO PROC with others, you must create a separate proc from $TSOPROC so as not to impact others. Then you must point your TSO session to use the new proc:

At Login:

Code:

Enter LOGON parameters below:                   RACF LOGON parameters:
                                                                     
Userid    ===> YOURID                                                 
                                                                     
Password  ===>                                  New Password ===>     
                                                                     
Procedure ===> $TSOPROC                   Group Ident  ===>     
                                                                     
Acct Nmbr ===> AB123                                                 
                                                                     
Size      ===> 8192                                                   
                                                                     
Perform   ===>                                                       
                                                                     
Command   ===> logoff


You must update your Procedure to the proc you want to use

The REXX step could look like:
Code:

//REXX    EXEC PGM=IKJEFT01,DYNAMNBR=10,TIME=1   
//SYSTSPRT DD  SYSOUT=*                           
//SYSEXEC  DD  DSN=REXX.LIBRARY.NAME,DISP=SHR     
//SYSPROC  DD  DSN=REXX.LIBRARY.NAME,DISP=SHR     
//SYSPRINT DD  SYSOUT=*                           
//SORTMSG  DD  SYSOUT=*                           
//SYSOUT   DD  SYSOUT=*                           
//OUTPUT   DD  SYSOUT=*                           
//LISTOUT  DD  SYSOUT=*                           
//SYSTSIN  DD  *                                 
PROFILE NOPREFIX                                 
REXXPGMNAME
Back to top
View user's profile Send private message
sandpas

New User


Joined: 15 Aug 2006
Posts: 4
Location: uk

PostPosted: Mon Aug 21, 2006 6:39 pm
Reply with quote

Hi,
when i entered TSO LU MY-ID TSO, I got the following TSO information in my login session.

TSO INFORMATION
---------------
SIZE= 00004096
MAXSIZE= 00004096
UNIT= SYSALLDA
USERDATA= 0000

Still, I searched for the library where the TSOPROC is available. I didnot get any clue.

Can you please advise.

Regards
sandeep
Back to top
View user's profile Send private message
cpuhawg

Active User


Joined: 14 Jun 2006
Posts: 331
Location: Jacksonville, FL

PostPosted: Mon Aug 21, 2006 6:48 pm
Reply with quote

You could try:

Go into SDSF.
Do a prefix for your USERID: (PRE USERID*)
Enter DA (to show what is executing).
Find your TSO sessions active.
Do a SJ command next to your TSO session to see the JCL.
It should indicate the PROC.

Code:

//USERID  JOB 'AB123',REGION=8192K   
//$TSPROC  EXEC $TSOPROC               



Also.
When you log in:
Code:

Code:

Enter LOGON parameters below:                   RACF LOGON parameters:
                                                                     
Userid    ===> YOURID                                                 
                                                                     
Password  ===>                                  New Password ===>     
                                                                     
Procedure ===> $TSOPROC                   Group Ident  ===>     
                                                                     
Acct Nmbr ===> AB123                                                 
                                                                     
Size      ===> 8192                                                   
                                                                     
Perform   ===>                                                       
                                                                     
Command   ===> logoff


Your Proc should be indicated here as well.
Code:
Back to top
View user's profile Send private message
changeurlife2003
Currently Banned

New User


Joined: 22 May 2006
Posts: 15

PostPosted: Mon Aug 21, 2006 8:16 pm
Reply with quote

When i enter TSO LU MY-ID TSO
I got this message
" IRR418I RACF PRODUCT DISABLED: COMMAND ENDED."

What is the resaon.
Back to top
View user's profile Send private message
superk

Global Moderator


Joined: 26 Apr 2004
Posts: 4652
Location: Raleigh, NC, USA

PostPosted: Mon Aug 21, 2006 8:29 pm
Reply with quote

From MVS/Quickref:
Quote:

Explanation: This system is running z/OS Version 1 Release 2 or
higher. The RACF initialization process made a registration check
based on the IFAPRDxx member in SYS1.PARMLIB. This message implies
that:

o The RACF product was not enabled

o RACF initialization did not continue

o Control was given to a RACF command processor, RACF utility,
or that initialization was attempted for the RACF subsystem
(IRRSSM00 or IRRSSI00) or for RACF's dynamic parse (IRRDPI00)


Sounds like RACF is not available.
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 -> CLIST & REXX

 


Similar Topics
Topic Forum Replies
No new posts Compile Several JCL JOB Through one r... CLIST & REXX 4
No new posts Using API Gateway from CICS program CICS 0
No new posts Running REXX through JOB CLIST & REXX 13
No new posts Error to read log with rexx CLIST & REXX 11
No new posts isfline didnt work in rexx at z/OS ve... CLIST & REXX 7
Search our Forums:

Back to Top