|
View previous topic :: View next topic
|
| Author |
Message |
genesis786
Active User
Joined: 28 Sep 2005
Posts: 210
Location: St Katherine's Dock London
|
|
|
|
Hi,
If a file is allocated to the CICS online i.e.
| Code: |
| CEMT INQ FILE(EXMFILE) |
returns that the DSN is OPEN and ENABLED, then I cannot edit it using a JCL.
Is it possible using a JCL, to instruct CICS to CLOSE DISABLE the DD in CICS online? i.e. to kick following instruction using a JCL..
| Code: |
| CEMT SET FILE(EXMFILE) CL DI |
Thanks in advance.
Regards
Rahul.[/code] |
|
| Back to top |
|
 |
Srinivasa Rao
New User
Joined: 21 Jun 2005
Posts: 75
|
|
|
|
Hi Rahul,
files can be opened and closed using IPCPBTCH utility. Try this JCL for CEMT command and let us know the result.
JCL for closing file
//IPCPBTCH EXEC PGM=IPCPBTCH
//STEPLIB DD DSN=XXXX.IPCP.LOAD,DISP=SHR
//IPCPCDS DD DSN=XXXX.IPCP.CICS.IPCPCNTL,DISP=SHR
//AUDIT DD SYSOUT=*
//SYSIN DD *
CICS CC ONLY=CICS00
CLOS DB F0116
DEALLOC DDNAME=F0116
and for opening file
//IPCPBTCH EXEC PGM=IPCPBTCH
//STEPLIB DD DSN=XXXX.IPCP.LOAD,DISP=SHR
//IPCPCDS DD DSN=XXXX.IPCP.CICS.IPCPCNTL,DISP=SHR
//AUDIT DD SYSOUT=*
//SYSIN DD *
CICS CC ONLY=CICS00
ALLOC DDNAME=F0116,DSN=ABDCV.PERMBAK.F0116,DISP=SHR
OPEN DB F0116 |
|
| Back to top |
|
|
genesis786
Active User
Joined: 28 Sep 2005
Posts: 210
Location: St Katherine's Dock London
|
|
|
|
| hi Srinivas, my shop doesn't seem to have IPCPBTCH utility. I think we are using SYNCOMM (SYNCHRO) here. |
|
| Back to top |
|
|
|
|
