In EXCI there is a special interface for using 3270-terminal-oriented
transactions.
On 17.03.2016 14:25, Barkow, Eileen wrote:
F CICSjob,PGMD pgmname
PGMD program would have to be modified to accept pgmname on the input line.
the console name that transaction PGMD runs on has to be determined from the
CICS logs and a TCT entry needs to be made for
it via CEDA DEFINE TERMINAL command with the CONSOLE name specified in the
CONSNAME parm.
If security is needed to run the transaction, you can optionally supply a
preset USERID in the USERID field under which the transaction will run under.
Or another Modify command can be used to invoke the CESN sign-on transaction
before invoking the PGMD transaction.
Both the CONSNAME (via RACF console class) and USERID will have to be defined
to RACF or whatever security package is being used and the USERID will need
specific access to use the console.
If no security is needed to run the transaction, then you can just issue the
modify commands without a sign on or preset USERID.
-----Original Message-----
From: IBM Mainframe Discussion List [mailto:[email protected]] On Behalf
Of Brenton, Ren
Sent: Thursday, March 17, 2016 9:11 AM
To: [email protected]
Subject: Re: CICS (from Batch)
Cool, thank you.
I know how to fire up a console in REXX, but I'm not sure what the command
would be to start the transaction.
In CICS, I just issue PGMD and from the resultant screen, I can enter the
program name, (or the TRAN), and it pops back the date/time of the module.
Presumable, the program that gets invoked from the PGMD transaction, would need
to be modified to accept the program name upon invocation, but other than
that...
What would the console command look like?
Thanks again,
Now to investigate EXCI thanks for the leads.
Ren
Ext 1448
-----Original Message-----
From: IBM Mainframe Discussion List [mailto:[email protected]] On Behalf
Of Barkow, Eileen
Sent: Thursday, March 17, 2016 8:40 AM
To: [email protected]
Subject: Re: CICS (from Batch)
You can invoke the CICS transaction from the MVS console, either manually or by
automation or other means.
The console running the transaction would have to be defined to CICS and
appropriate authority given.
Check the log msgs to find out which console is being used.
If the program output goes to a terminal, then the output will go back to the
console.
-----Original Message-----
From: IBM Mainframe Discussion List [mailto:[email protected]] On Behalf
Of Brenton, Ren
Sent: Thursday, March 17, 2016 7:40 AM
To: [email protected]
Subject: CICS (from Batch)
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
________________________________
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
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
----------------------------------------------------------------------
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
