Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

Executing RACF callable services from COBOL & CICS progr

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM
View previous topic :: :: View next topic  
Author Message
sureshjebakani

New User


Joined: 11 Apr 2006
Posts: 2

PostPosted: Tue Apr 11, 2006 1:30 pm    Post subject: Executing RACF callable services from COBOL & CICS progr
Reply with quote

Hi All,

We are looking for a way to execute the RACF TSO command RLIST from the CICS program. We have understood that this can be done using the RACF callable services for Z/os.

The callable service we are interested is R_admin (IRRSEQ00): RACF Administration API. We would be interested to know if it is possible to initiate and capture the output of this service from a CICS program in the first place. If it is possible then we would like to know the means of calling this service using a COBOL CICS program. A sample program would of great help

Thanks,
Sureshkumar
Back to top
View user's profile Send private message

martin9

Active User


Joined: 01 Mar 2006
Posts: 287
Location: Basel, Switzerland

PostPosted: Tue Apr 11, 2006 2:52 pm    Post subject:
Reply with quote

hy sureshjebakani,

there is probably any API for executables.
check the doku for such an exit, there will
be one for sure. with that exit you will be able
to call it either in batch or in an online program.
the exit is probably written in assembler,
therefore, you will be able to call it in any
program language on the mainframe.

unfortunatly we are still on CA-TopSecret,
after changed to RACF, i could give you more
specific details. but refer to the doku, this will
help for sure.

martin9
Back to top
View user's profile Send private message
sureshjebakani

New User


Joined: 11 Apr 2006
Posts: 2

PostPosted: Tue Apr 11, 2006 4:13 pm    Post subject:
Reply with quote

Martin,

In the manual Security Server RACF Callable Services, I could see the below command (R_admin) to execute the RACF commands.

Code:
CALL IRRSEQ00  (Work_area,
      ALET, SAF_return_code,
      ALET,
      RACF_return_code,
      ALET,
      RACF_reason_code,
      Function_code,
      Parm_list,
      RACF_userID,
      ACEE_ptr,
      Out_message_subpool,
      Out_message_strings )

Work_area The name of a 1024-byte work area for SAF and RACF usage. The work area must be in the primary address space.

ALET The name of a word containing the ALET for the following parameter. Each parameter must have an ALET specified. Each ALET can be different. The words containing the ALETs must be in the primary address space.

What I want here is how to code (Parameters) this in the cobol program. Which is the stub I need use to get this linkedited. It has mentioned in the manual that the parameters should be defined in the Primary address space. What does that mean ?
Back to top
View user's profile Send private message
martin9

Active User


Joined: 01 Mar 2006
Posts: 287
Location: Basel, Switzerland

PostPosted: Tue Apr 11, 2006 4:22 pm    Post subject:
Reply with quote

hy sureshjebakani,

note: as i already mentioned, i cannot
give you any example, because we don't use
RACF on our site. just code your parameters
into your working-storage.
but ask your security manager, who is the
product responsible for RACF, he might
help you, or maybe someone else can help you
further (moderator...?)...

sorry for that...

martin9
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Date and time format in CICS Chandru3183 CICS 2 Sat Mar 18, 2017 12:46 pm
No new posts Asynchronous CICS Processing Question moezbud CICS 0 Mon Mar 06, 2017 6:13 pm
No new posts CICS Question RE: Browse, Readnext an... moezbud CICS 7 Sun Mar 05, 2017 5:45 am
No new posts how to send just 10 rows in a CICS sc... Megha Gupta CICS 5 Thu Feb 23, 2017 6:57 pm
No new posts SQL query not working in Cobol program. CuriousMainframer COBOL Programming 14 Wed Feb 22, 2017 5:56 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us