we get around the console authority issue by invoking an automation clist to issue the modify commands. The users invoke the clist via a batch program that uses the svc34 interface to issue a *clist command.
Originally, the authority only needed to be given to the NETVIEW userid the clist was running under, but then IBM changed the default and started requiring that the id invoking the clist have authority. so we had to set up a special RACF USERID with this authority to run the batch job that invokes the clist. -----Original Message----- From: IBM Mainframe Discussion List [mailto:[email protected]] On Behalf Of Brenton, Ren Sent: Monday, March 21, 2016 1:14 PM To: [email protected] Subject: Re: CICS (from Batch) Thank you all who replied. Not being real CICS savvy, I elected to go with an MVS Console Modify command: F region,tran_id tran_data. I'm using the a REXX Exec, that uses CONSOLE ACTIVATE, etc., to issue the command and return the result back into an ISPF Edit session, where, using an Edit MACRO, I will parse out the desired information. The only problem with this that my typical user (application developers and Business Analysts) do not have Console Authority. However, with the help of Console Automation, we are going to write a rule, that if the submitter does not have Console Authority, but the command issued is a modify with a specific Tran_Id, then allow it to process. Still waiting on the Automation team to write the rule, but it theory, this should work. Again, thanks for your suggestions. Ren Ext 1448 -----Original Message----- From: IBM Mainframe Discussion List [mailto:[email protected]] On Behalf Of Leopold Strauss Sent: Thursday, March 17, 2016 8:52 AM To: [email protected] Subject: Re: CICS (from Batch) There exists an external CICS-interface ( EXCI). infos in 'External Interfaces Guide' of the CICS-TS-version, which you are using. On 17.03.2016 12:39, Brenton, Ren wrote: > CICS Gurus, > > I have a requirement to determine, from batch, if a program has been "NEW > COPIED" in a specific CICS region. We have a CICS Tran that will display the > information, (i.e. date/time stamp), which is what I need to compare to the > link date/time of the first (matching) module in the LOADLIB concatenation. > Our CICS Tran actually calls: > > EXEC CICS INQUIRE PROGRAM(PRGNM) LOADPOINT(R3) ENTRYPOINT(R4) > LANGDEDUCED(LANGCVDA) LENGTH(PGMSIZE) > PROGTYPE(PGMTYPE) USECOUNT(USECNT) RESCOUNT(RESCNT) > STATUS(PPTCVDA) COBOLTYPE(COBTYPE) > RESP (RESPONE) RESP2 (RESPTWO) > > Then it loads the address from LOADPT into register 1 and bumps off of it > X'88' (136 bytes) and moves 20 bytes. > > > CKCOBLNG CLI LANGCVDA+3,151 COBOL ? (97) > BNE CKPLI NO > MVC LANGO,=C'COB' > CLI LOADSW,255 IS THERE A LOAD MODULE? (FF) > BE NOLOAD > CLI ENTRYPT,255 VALID ADDRESS? > BE CKCOB3 NO > L R1,LOADPT PLUG IN COMPILE DATE/TIME > CLI COBTYPE+3,151 VS COBOL? (97) > BNE CKCOB2 NO > MVC CCDO(20),X'88'(R1) > > Giving me the date/time stamp. But this, of course, only works in the CICS > Region. > > Does anyone have any thoughts on how to accomplish this from batch? > > TIA, > > PS, Go easy on me, as I have a tough time even spelling C I C S, let alone > doing much in it. And if there is a different list server on which I should > be asking this question (like CICS), I apologize and ask for their address. > Thanks again, > > Ren Brenton > MSP Optimization > Black Knight Financial Services > 601 Riverside Ave., > Jacksonville, FL 32204 > __________________________________________________ > O: 904.357.1448 | M: 404.438.3868 | F: 904.357.1807 > [email protected]<mailto:[email protected]> || > www.BKFS.com<http://www.bkfs.com/> > > > The information contained in this message is proprietary and/or confidential. > If you are not the intended recipient, please: (i) delete the message and all > copies; (ii) do not disclose, distribute or use the message in any manner; > and (iii) notify the sender immediately. In addition, please be aware that > any message addressed to our domain is subject to archiving and review by > persons other than the intended recipient. Thank you. > > ---------------------------------------------------------------------- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to [email protected] with the message: INFO IBM-MAIN > > -- Mit freundlichen Gruessen / Kind Regards, Leopold Strauss, Team DEV-zOS, T: +43-2236-27551-331 ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN The information contained in this message is proprietary and/or confidential. If you are not the intended recipient, please: (i) delete the message and all copies; (ii) do not disclose, distribute or use the message in any manner; and (iii) notify the sender immediately. In addition, please be aware that any message addressed to our domain is subject to archiving and review by persons other than the intended recipient. Thank you. ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN ________________________________ This e-mail, including any attachments, may be confidential, privileged or otherwise legally protected. It is intended only for the addressee. If you received this e-mail in error or from someone who was not authorized to send it to you, do not disseminate, copy or otherwise use this e-mail or its attachments. Please notify the sender immediately by replying to this e-mail and delete the e-mail from your system. ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN
