All, Thanks for the help. I am going to try the RACF macros initially. I looked at Mark's rexx code and its great also. Having written Rexx since 1984, it's a big favorite buts that's a different story.
Scott Ford Senior Systems Engineer [p] 678.266.3399 x304 [m] 609-346-0399 identityforge.com This message is for the designated recipient only and may contain privileged, proprietary, or otherwise private information. If you have received it in error, please notify the sender immediately or let us know at [EMAIL PROTECTED] or [EMAIL PROTECTED], and then delete the original. Any other use of the email by you is prohibited. -----Original Message----- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of George Fogg Sent: Tuesday, October 14, 2008 8:15 PM To: [email protected] Subject: Re: A Security SubSystem question -----Original Message----- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Mark Zelden Sent: Tuesday, October 14, 2008 3:42 PM To: [email protected] Subject: Re: A Security SubSystem question On Tue, 14 Oct 2008 18:34:59 -0400, Scott Ford <[EMAIL PROTECTED]> wrote: >All, > >I am in the process of writing an Assembler routine to see if RACF, >ACF2 or Top-Secret are > >running on z/OS. I am confused about where I should find the >information. I have tried looking at > >the RCVT ( desct = ichprcvt ) because I have noticed that on RACF the >1st four bytes are set to RCVT and > >on ACF2 and Top-Secret it is different. Shouldn't I be able to do the >following: > > > >--- snippet ------ > > > > USING RCVT, R9 > > L R4,RCVTID > > CLC 0(4,R4),=C'RCVT' > > BE FOUND > > > > > >Thanks for the help as always.I am in bring meltdown right now. > > >Mark Zeldon said: >That is where I look in IPLINFO (rexx). >RCVT = RACF >RTSS = Top Secret >ACF2 = ACF2 If you want details on RACF status then use the RACROUTE REQUEST=STAT macro call. I believe that other security products have the same macro call that give you details like it does for RACF. I will soon find out since we will have ACF2 in our shop next year. George Fogg ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
