Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

How to open/close CICS files using a JCL

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM
View previous topic :: :: View next topic  
Author Message
kitts

New User


Joined: 29 Jan 2006
Posts: 19

PostPosted: Mon May 22, 2006 12:30 pm    Post subject: How to open/close CICS files using a JCL
Reply with quote

Hi,

Can anybody throw some light on closing the CICS files using the batch option?

I mean the equivalent of 'CEMT SET FILE(XXXX) OPE/DIS ENA/DIS'..
in the batch mode.

Which is the tool/utility to be used.

Thanks in anticipation of a quick reply,

Kitts
Back to top
View user's profile Send private message

Bharanidharan

New User


Joined: 20 Jun 2005
Posts: 86
Location: Chennai, India

PostPosted: Mon May 22, 2006 5:38 pm    Post subject: Re: How to open/close CICS files using a JCL
Reply with quote

There may be other utilities available as well, but in my shop we use CAFC (CICS application file control), marketed by NETEC Inc. This will facilitate user listings or of files & applications defined in CICS in batch mode; in addition, it would also facilitate initiation of CICS txns from batch stream, sending them as JES2 commands.
Back to top
View user's profile Send private message
kitts

New User


Joined: 29 Jan 2006
Posts: 19

PostPosted: Tue May 23, 2006 10:32 am    Post subject: Re: How to open/close CICS files using a JCL
Reply with quote

Hi Bharanidharan,

Thanks so much for the information i would like to have a sample jcl using CAFC utility so tht i can try it and see.

Thanks,
Kitts.
Back to top
View user's profile Send private message
Bharanidharan

New User


Joined: 20 Jun 2005
Posts: 86
Location: Chennai, India

PostPosted: Tue May 23, 2006 3:54 pm    Post subject: Re: How to open/close CICS files using a JCL
Reply with quote

If you CAFC installed in your system, you must have a PDS CICS.CAFC.INFO (or a similar one). You may find sample JCLs for obtaining list of applications or files mapped in CICS, manipulating files in online via batch jobs, and so on.

If you can't find them, here is a sample JCL for displaying the list of applications defined in the CICS region.
Code:

//JS020    EXEC PGM=AFCP2021,PARM='TRACE=N'               
//* PLUG IN THE APPROPRIATE LOADLIB                       
//STEPLIB  DD   DISP=SHR,                                 
//         DSN=ACSNS.CAFC.AGUT.LOADLIB                     
//* PLUG IN THE APPROPRIATE CONTROL FILE OF THE CICS REGION
//INCAFC   DD   DISP=SHR,                                 
//         DSN=X99VS.AGUC.AGUCICSI.AFCF4000               
//SYSPRINT DD   SYSOUT=*,                                 
//         DCB=(RECFM=FBA,LRECL=133,BLKSIZE=133)           
//REPORT   DD   SYSOUT=A,                                 
//         DCB=(RECFM=FBA,LRECL=133,BLKSIZE=133)           
//CAFCTRAC DD   SYSOUT=*                                   
//SYSUDUMP DD   SYSOUT=*                                   
//SYSIN    DD   *                                         
   A                                                       
/*                                                         


You may have to find out the STEPLIB location since the one in the above job is not a standard one (you may start with the datasets CICS.CAFC.*; it may contain the steplib, may be separately for prod and test regions). INCAFC contains what is called 'CAFC control file' where we specify the CICS reqion and separate control files would be available for each CICS reqion you may have. The 'A' in SYSIN represents application; you can change it to 'DS' to list all the DDnames mapped in online.

Sample JCL for, say closing a file:

Code:

//PS01     EXEC  PGM=AFCP2016,                     
//             PARM='CICSPRD4,C,D,DEICFO07'       
//SYSPRINT DD  SYSOUT=*                           
//STEPLIB  DD  DSN=ACSNS.CAFC.AGUP.PRODLIB,       
//             DISP=SHR                           
//CICSPRD4 DD  DSN=X99VS.AGUC.CICSAGUD.AFCF4000,   
//             DISP=SHR                           


In the parm to AFCP2016, CICSPRD4 is the CICS region name; 'C' represents close ('O' for open, 'D' for disable, 'OE' for open enable etc.); 'D' for DDname ('A' for application); DEICFO07 is the FCT entry (DDname) in the CICS region.
Again, the DDs STEPLIB and 'CICSPRD4' given here are my installation specific.

Sorry if you can't find any of these, in which case, you may need to go to your system guys.

Regards,
Bharani.
Back to top
View user's profile Send private message
Earl Haigh

Active User


Joined: 25 Jul 2006
Posts: 475

PostPosted: Wed Jul 26, 2006 12:35 am    Post subject: Re: How to open/close CICS files using a JCL
Reply with quote

You should consider looking at new software product from HostBridge Tecnology. Allows you to write your own BATCH COBOL programs to logically process any CICS resource, including transactions like CEMT. Product comes with working sample that closes/opens files from batch.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts CICS to Webservices safexc CICS 0 Sun Jan 22, 2017 5:49 pm
No new posts CICS transaction slow response time vasanthz All Other Mainframe Topics 2 Thu Jan 19, 2017 1:31 am
No new posts INDEPENDENT CICS TS 4.1 MRO REGION UP... Kyle Carroll CICS 0 Wed Dec 14, 2016 6:55 pm
No new posts CICS START AND CANCEL blayek CICS 1 Wed Dec 07, 2016 3:27 am
No new posts High CPU consumption Job using IAM fi... aswinir JCL & VSAM 15 Thu Dec 01, 2016 8:28 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us