How to run CICS commands from JCL batch job

amfarrag · New User Joined: 01 Sep 2005 Posts: 41

how to run CICS commands (Cemt & Ceda) from JCL batch job???

meetreks · New User Joined: 28 Sep 2006 Posts: 26 Location: Edinburgh

Hi,

There will be shop specfic utlities which can perform opreations that you have mentioned in your query.

amfarrag · New User Joined: 01 Sep 2005 Posts: 41

Yes, i know this require specific utilities,
could please specify these utilities & a sample JCL that can use it.

Bitneuker · Posted: Wed Oct 25, 2006 3:25 pm

Hi,

Like this............

//STEP1 EXEC PGM=IEBGENER
//SYSIN DD DUMMY
//SYSPRINT DD SYSOUT=*
//SYSUT2 DD SYSOUT=(*,INTRDR),DCB=I
//SYSUT1 DD DATA,DLM=$$
/*$VS,'F NTCIC0E,CEMT SET PROG(UTIL5610) NEW'

leo_viky · New User Joined: 28 Oct 2006 Posts: 9

How to specify the cics region inthe above JCL?

UmeySan · Posted: Tue Nov 07, 2006 4:09 pm

Hi George !

Am I right in thinking that you are using MVS MODIFY Command here in
your example to pass a command to the CICS subsystem ?

If yes, NTCIC0E will be the CICS Subsystem ???

Regards, UmeySan

Bitneuker · Posted: Tue Nov 07, 2006 4:33 pm

UmeySan: yes & yes

UmeySan · Posted: Tue Nov 07, 2006 4:47 pm

@ George:

Thanks & Greetings from Germany to Netherlands !
UmeySan

Bitneuker · Posted: Tue Nov 07, 2006 4:57 pm

This would do too:

//NPCICCMD JOB (NAUDM000),'SWITCH',MSGCLASS=X,
// MSGLEVEL=(1,1),CLASS=3,NOTIFY=$$NL11
//STEP1 EXEC PGM=IEFBR14
// F NTCIC0A,'CEMT S DUMPDS SWI AUT'
//

In this case NTCIC0A is the CICS-region. The command is between quotes. Class has to be the same as the one of the cicsregion.
(this one comes from my collegue Rob

)

And greetings from Holland to Germany too

leo_viky · New User Joined: 28 Oct 2006 Posts: 9

Hi Bitneuker,

Im trying to issue the CICS command CECI REL PROG(pgm_name) to release the program from xpeditor in a particular region(XTCSHRYY).Im trying to use the following JCL.

//JOBCARD JOB (B,X,IACE00),'ADB DEV',
// MSGCLASS=V,
// MSGLEVEL=(1,1),
// NOTIFY=&SYSUID
//*+JBS BIND XTDDBB1.ONLINE
//*********************************************
//STEP1 EXEC PGM=IEBGENER
//SYSIN DD DUMMY
//SYSPRINT DD SYSOUT=*
//SYSUT2 DD SYSOUT=(*,INTRDR)
//SYSUT1 DD DATA,DLM=$$
//*$VS,'F XTCSHRYY,CECI REL PROG(UTDAPE05)'

The JCL works fine with MAXCC=0 but the program doesnt get released.

FYI.

My CICS subsystem DBB1 has more than 1 CISC region associated with it,Where do I specify the region name in the above JCL.Please let me know if this JCL needs to be modified

Thanks in advance

Bitneuker · Posted: Tue Nov 07, 2006 7:15 pm

We think you can't execute CECI (= command level interpreter) in batch, CEMT (= cics COMMAND) should work. Ofcourse this would need a console to be defined in CICS. May be the moderator can help out further.

rakeshreddy · New User Joined: 21 Mar 2007 Posts: 28 Location: Bangalore

Hi all,

I got MAXCC=00 for all above jcls. But I don't where I will get the output for the job.
One more thing is, even my cics region is down, am getting MAXCC=00 for the jcls.
can u make me clear in that please.
Can any body give the code for this and say where i will get output. wether in cics reagion or in job spool.[/code]

dick scherrer · Posted: Mon Mar 26, 2007 9:08 pm

Hello,

Your batch job completed successfully - this is why the MAXCC=0.

When the GENER "sends" the command thru the internal reader, it "successfully" completes.

If the command makes it to CICS and is successfully issued there, there are usually footprints in the CICS sysout(s).

leo_viky · New User Joined: 28 Oct 2006 Posts: 9

Hi All,

Im trying to issue the CICS command CECI REL PROG(pgm_name) to release the program from xpeditor in a particular region(XTCSHRYY).Im trying to use the following JCL.

//JOBCARD JOB (B,X,IACE00),'ADB DEV',
// MSGCLASS=V,
// MSGLEVEL=(1,1),
// NOTIFY=&SYSUID
//*+JBS BIND XTDDBB1.ONLINE
//*********************************************
//STEP1 EXEC PGM=IEBGENER
//SYSIN DD DUMMY
//SYSPRINT DD SYSOUT=*
//SYSUT2 DD SYSOUT=(*,INTRDR)
//SYSUT1 DD DATA,DLM=$$
//*$VS,'F XTCSHRYY,CECI REL PROG(UTDAPE05)'

The JCL works fine with MAXCC=0 but the program doesnt get released.

Can someone help me out.

Thanks in advance

dick scherrer · Posted: Fri Aug 03, 2007 5:57 pm

Hello,

Please re-read my previous response. Your gener ran fine, but that does not mean that the CICS command did.

You need to look in the CICS region for what happened to your command.

As you have posted no info, my guess is that the program was "in use" and not released.

Earl · Posted: Mon Aug 06, 2007 7:16 am

First of all, not sure you can sucessfully run CECI command from the console, CECI is multi' interaction transaction.

just try it 3270 greenscreen, you will see what I mean.
FIRST RESPONSE IS
REL PROG(UTDAPE05)
STATUS: ,ABOUT TO EXECUTE COMMAND
,EXEC CICS ,RELease
,Program(,'UTDAPE05',)

THEN YOU RESPOND WITH ENTER KEY.
THEN YOU NEED TO CHECK IF THE COMMAND WAS SUCCESSFUL.
THEN YOU NEED TO END THE TRANSACTION.

If you really need flexibility in running cics transactions from batch,
take a look at BatchCICS-Connect software. (www.batchcics.com).

to accomplish your cics release using a BatchCICS-Connect COBOL program, its as simple as:

MOVE 'REL PROG(UTDAPE05)' TO WS-COMMAND-STRING.

EXEC HBI RUN ('CECI')
INBOUND (WS-COMMAND-STRING)
OUTBOUND (WS-RETURN-3270)
END-EXEC.

EXEC HBI REPLY AID ('ENTER')
OUTBOUND FIELDS (R23-C14)
END-EXEC.

EXEC HBI REPLY AID ('PF3') QUIT END-EXEC.
IF 'NORMAL' = R23-C14
PERFORM RELEASE-OK
ELSE
DISPLAY 'WE GOT A PROBLEM>>' R23-C14.