Oh, you are very fast. Thans Lindy Mayfield and Lizette Koehler, this is what I need (for now).
I will put some more doubts about Top Secret x RACF on z/OS, I hope you can help me. Thanks again. José ADAUTO Ribeiro Em 18/05/2011 09:18, Lindy Mayfield < [email protected] > escreveu: and in Rexx: /* rexx */ CVT=c2d(storage(10,4)); RCVT=c2d(storage(d2x(CVT+x2d('3e0')),4)); /* Get acronym (1st 4 bytes) from the RCVT */ Secacr=storage(d2x(RCVT),4); select when Secacr='RCVT' then Secsys='RACF'; when Secacr='ACF2' then Secsys='ACF2'; when Secacr='RTSS' then Secsys='TopSecret'; otherwise Secsys='Unknown'; end; Say 'Security Software is' Secsys'.' Exit -----Original Message----- From: IBM Mainframe Discussion List [mailto:[email protected]] On Behalf Of Lizette Koehler Sent: Wednesday, May 18, 2011 3:14 PM To: [email protected] Subject: Re: Looking for Control Blocks (Subject Added) > Hi, > > How do I find out, researching control blocks, preferably, if running > Top Secret or RACFon z / OS? > > Thanks in advance. It depends on what you are looking for. Do you want the ACEE, Data Sets? Are you going to use a program (written in Assembler or PL/I) or something like REXX or IPCS to run the chains? Are you looking for the STC information or what a user has? The Data Areas manuals would be a good start. Start with the CVT area and find the Security Product. Then go from there. You can use IPCS on ACTIVE to follow the control blocks. It would be helpful to know what specific function you are trying to research. Lizette ---------------------------------------------------------------------- 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 ---------------------------------------------------------------------- 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
