To use the EXCI interface, the CICS program would have to be re-written to use it. A batch job could be set up to issue a modify command against CICS to invoke the transaction, which would execute on a console. No changes to the CICS program would be needed.
I have a batch program that can issue modify commands via SVC 34 ( as have many others). But the source code is available if wanted - it takes commands either from the parm field or SYSIN dataset. -----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 ________________________________ 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
