>From that, BCMDEL itself requires authorization, not just LISTBC.
-- Shmuel (Seymour J.) Metz http://mason.gmu.edu/~smetz3 ________________________________________ From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of Pommier, Rex [rpomm...@sfgmembers.com] Sent: Wednesday, March 30, 2022 3:55 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: AFP confusion Here's the code snippet with the call (LINK), starting at the MODESET that caused the 047 abend. KZ MODESET KEY=ZERO BATCHCNT MVC PSCBUSER(7),NEWID SET USERID TO PARAMETER VALUE LA R8,1(,R8) BUMP REG BACK TO WHERE IT WAS STC R8,PSCBUSRL PUT USERID LENGTH INTO PSCB MVC 0(4,R11),=A(BPARM) MOVE PARM POINTER TO CPPL. LR R1,R11 POINT R1 TO CPPL. LINK EP=LISTBC DO LISTBC COMMAND. MVC PSCBUSER(7),OLDID RESTORE OLD USERID TO PSCB MVC PSCBUSRL(1),OLDPSCBL RESTORE SAVED USERID LENGTH -----Original Message----- From: IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU> On Behalf Of Seymour J Metz Sent: Wednesday, March 30, 2022 2:53 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: [EXTERNAL] Re: AFP confusion How does it call LISTBC? -- Shmuel (Seymour J.) Metz https://secure-web.cisco.com/1vlBNMj33k8Ocddx7M2tZDQI_Mtvqm1IvQlyQ5OO9foQoBqGEhSPi8NsagDmt-Ub5vbqLvv4vuAbKccLImzNWKtCv78I5Gq7-1wD1rEH2eWZZreGe97oVuUTQgSYUT9tFtZhLTg9ham1q17jn-9xuejxtRQ8dBYnSITQgO_rhyBdEWCxwmAh7_Ejyj3FjGjnbA_ZrK9KH6tEaFQwBMjseXfM9wcFmGRwBXdfCbCihQwCVvttm1y-86tkqcZSWF8vrOxCXxk7RKYDsrFToWw81PF2OfzcjnjMOPvIexUreD-_-KxYPqU-aD0wROo8yCKmYxFNwLzBtVa-utgjRJTlKvcajHixzKfV_dNBvliMj7TorAmefyCsuSFkUuJbJgZNa0MyRoPwhgF8qI74vliaDnYCyrxw2pjEEIBQr4gzxS_mjXt89DkxDLClhevl9y7d-rOw6OybTV1OJYLsg38mcTg/https%3A%2F%2Furldefense.com%2Fv3%2F__http%3A%2F%2Fmason.gmu.edu%2F%2Asmetz3__%3Bfg%21%21KjMRP1Ixj6eLE0Fj%2160bZRdMVQPaLWj0zGktKKr0LLnm8_fZ3P3OocoySdJ09B-hSJ5_gpvMWVL9flvKaSg%24 ________________________________________ From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of Pommier, Rex [rpomm...@sfgmembers.com] Sent: Wednesday, March 30, 2022 2:34 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: AFP confusion Thanks, Carmen. I forgot to mention that part. My library is the only one in the STEPLIB. And the LISTBC part of TSO that BCMDEL calls is actually in the AUTHCMD portion of IKJTSOxx. Same on the working LPARs. If I run the LISTBC command by itself it runs fine. Rex -----Original Message----- From: IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU> On Behalf Of Carmen Vitullo Sent: Wednesday, March 30, 2022 1:29 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: [EXTERNAL] Re: AFP confusion if steplib I'd still check and make sure any concatenated libraries are also APF'd IIRC the Broadcast program also requires an entry in the IKJTSOxx member, AUTHPGM section Carmen Vitullo -----Original Message----- From: Rex <rpomm...@sfgmembers.com> To: IBM-MAIN <IBM-MAIN@LISTSERV.UA.EDU> Date: Wednesday, 30 March 2022 1:22 PM CDT Subject: AFP confusion Hello list, I'm stumped on this one. I have a small assembler program (BCMDEL from Sam Golob's Broadcast dataset maintenance CBT package). It's running successfully on 2 of my LPARs but the third is giving me a 047 abend trying to run. The program is linked AC=1 and is residing in 2 APF authorized libraries. One of them is my private library where I initially assembled the code which I added to the APF list and verified it is there. I tried accessing this thru a STEPLIB. The other is a general library where several of our third party products reside, others of which need and have APF authorization through this library. This is accessed through the linklist and I did perform an LLA refresh. The program is a TSO-in-batch program if that matters. Identical JCL running on other LPARs. Here's the line of code it is choking on: KZ MODESET KEY=ZERO I can copy the load module to one of the other LPARs and it runs fine there so the module appears correct. Other APF programs are running fine from the library on this LPAR where I copied the code so the library appears correct. Any thoughts as to what I've overlooked? I have my 2 coworkers stumped as well. It's looking like it has to be something in the environment but we can't determine what. TIA, Rex ---------------------------------------------------------------------- The information contained in this message is confidential, protected from disclosure and may be legally privileged. If the reader of this message is not the intended recipient or an employee or agent responsible for delivering this message to the intended recipient, you are hereby notified that any disclosure, distribution, copying, or any action taken or action omitted in reliance on it, is strictly prohibited and may be unlawful. If you have received this communication in error, please notify us immediately by replying to this message and destroy the material in its entirety, whether in electronic or hard copy format. Thank you. ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN ---------------------------------------------------------------------- The information contained in this message is confidential, protected from disclosure and may be legally privileged. If the reader of this message is not the intended recipient or an employee or agent responsible for delivering this message to the intended recipient, you are hereby notified that any disclosure, distribution, copying, or any action taken or action omitted in reliance on it, is strictly prohibited and may be unlawful. If you have received this communication in error, please notify us immediately by replying to this message and destroy the material in its entirety, whether in electronic or hard copy format. Thank you. ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN ---------------------------------------------------------------------- The information contained in this message is confidential, protected from disclosure and may be legally privileged. If the reader of this message is not the intended recipient or an employee or agent responsible for delivering this message to the intended recipient, you are hereby notified that any disclosure, distribution, copying, or any action taken or action omitted in reliance on it, is strictly prohibited and may be unlawful. If you have received this communication in error, please notify us immediately by replying to this message and destroy the material in its entirety, whether in electronic or hard copy format. Thank you. ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN