IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

can Rexx run in TSO issue CICS command?


IBM Mainframe Forums -> CICS
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
fungyufa

New User


Joined: 18 Jun 2005
Posts: 4
Location: china

PostPosted: Fri Mar 19, 2010 8:33 am
Reply with quote

does it possible to do so?
for example, I want to close specific online dataset in 20 different cics region by running a rexx, instead of logon 20 times. icon_biggrin.gif
Back to top
View user's profile Send private message
superk

Global Moderator


Joined: 26 Apr 2004
Posts: 4652
Location: Raleigh, NC, USA

PostPosted: Fri Mar 19, 2010 9:08 am
Reply with quote

If there is a TSO command that you can issue then you SHOULD be able to issue that same command in REXX exec if it's running in the same TSO address space.
Back to top
View user's profile Send private message
MBabu

Active User


Joined: 03 Aug 2008
Posts: 400
Location: Mumbai

PostPosted: Fri Mar 19, 2010 9:37 am
Reply with quote

I think the question is if CEMT commands can be issued from TSO (affecting different CICS regions). Possibly via the CONSOLE command if upi are authorized. (OK, I'm guessing here!)
Back to top
View user's profile Send private message
Earl Haigh

Active User


Joined: 25 Jul 2006
Posts: 475

PostPosted: Sat Mar 20, 2010 12:57 am
Reply with quote

Quote:
does it possible to do so?
for example, I want to close specific online dataset in 20 different cics region by running a rexx, instead of logon 20 times


If your not a CICS Systems programmer, I would suggest you
talk to one before you try closing online datasets in 20 different cics
regions.

There are many software packages out there that can do this
type of thing for you. If your installation is running 20 regions,
then more than likely, you already have such capabilities.

try Use [URL] BBCode for External Links for a possibility.
Back to top
View user's profile Send private message
PeterHolland

Global Moderator


Joined: 27 Oct 2009
Posts: 2481
Location: Netherlands, Amstelveen

PostPosted: Sat Mar 20, 2010 8:02 pm
Reply with quote

With Netview and SA OS/390 CICS commands can be used in Rexx running in SA OS/390.
Back to top
View user's profile Send private message
valyk

Active User


Joined: 16 Apr 2008
Posts: 104
Location: South Carolina

PostPosted: Tue Mar 23, 2010 12:19 am
Reply with quote

Does your shop have CAFC? If so, you can use the CAFC Batch Interface and open/close files in multiple regions with one job (or in a Rexx if you want to simulate a batch job in foreground).
Back to top
View user's profile Send private message
fungyufa

New User


Joined: 18 Jun 2005
Posts: 4
Location: china

PostPosted: Wed Mar 24, 2010 12:03 pm
Reply with quote

thanks all for your replies,
after all write program with exci for that.
tried alot but failed to use rexx on this...
Back to top
View user's profile Send private message
jeevajeeva

New User


Joined: 13 May 2006
Posts: 17

PostPosted: Wed Jun 16, 2010 9:10 pm
Reply with quote

You can do it by activating a console in REXX


ADDRESS TSO
"CONSOLE ACTIVATE NAME(userid)"
"CONSPROF SOLDISPLAY(NO) UNSOLDISPLAY(NO) SOLNUM(100) UNSOLNUM(100)"

ADDRESS CONSOLE
"F CICSREG1,CEMT S FILE(XXXX) CLOSE"

ADDRESS TSO
"CONSOLE DEACTIVATE"
Back to top
View user's profile Send private message
Bill O'Boyle

CICS Moderator


Joined: 14 Jan 2008
Posts: 2501
Location: Atlanta, Georgia, USA

PostPosted: Wed Jun 16, 2010 11:05 pm
Reply with quote

Unfortunately, IBM pulled the "CSF1" free SupportPac (too bad), which supplied the necessary code to Open/Close files from Batch, using EXCI. It was written by Sam Butters. Perhaps someone has it tucked away somewhere and would be willing to share?

IBM left this as a reference -

www-01.ibm.com/support/docview.wss?rs=0&q1=exci&uid=swg21158499&loc=en_US&cs=utf-8&cc=us&lang=en

Bill
Back to top
View user's profile Send private message
enrico-sorichetti

Superior Member


Joined: 14 Mar 2007
Posts: 10872
Location: italy

PostPosted: Wed Jun 16, 2010 11:37 pm
Reply with quote

two interesting supportpacs could be CA1D CA1I two rexx exci interfaces
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> CICS

 


Similar Topics
Topic Forum Replies
No new posts RACF - Rebuild SETROPTS command which... All Other Mainframe Topics 3
No new posts Using API Gateway from CICS program CICS 0
No new posts Running REXX through JOB CLIST & REXX 13
No new posts Error to read log with rexx CLIST & REXX 11
No new posts SFTP Issue - destination file record ... All Other Mainframe Topics 2
Search our Forums:

Back to Top