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

How to run CICS commands from JCL batch job


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

New User


Joined: 01 Sep 2005
Posts: 41

PostPosted: Sun Oct 15, 2006 4:25 pm
Reply with quote

how to run CICS commands (Cemt & Ceda) from JCL batch job???
Back to top
View user's profile Send private message
meetreks

New User


Joined: 28 Sep 2006
Posts: 26
Location: Edinburgh

PostPosted: Mon Oct 16, 2006 2:52 pm
Reply with quote

Hi,

There will be shop specfic utlities which can perform opreations that you have mentioned in your query.
Back to top
View user's profile Send private message
amfarrag

New User


Joined: 01 Sep 2005
Posts: 41

PostPosted: Mon Oct 16, 2006 3:57 pm
Reply with quote

Yes, i know this require specific utilities,
could please specify these utilities & a sample JCL that can use it.
Back to top
View user's profile Send private message
Bitneuker

CICS Moderator


Joined: 07 Nov 2005
Posts: 1104
Location: The Netherlands at Hole 19

PostPosted: Wed Oct 25, 2006 3:25 pm
Reply with quote

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'
Back to top
View user's profile Send private message
leo_viky

New User


Joined: 28 Oct 2006
Posts: 9

PostPosted: Mon Nov 06, 2006 6:48 pm
Reply with quote

How to specify the cics region inthe above JCL?
Back to top
View user's profile Send private message
UmeySan

Active Member


Joined: 22 Aug 2006
Posts: 771
Location: Germany

PostPosted: Tue Nov 07, 2006 4:09 pm
Reply with quote

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
Back to top
View user's profile Send private message
Bitneuker

CICS Moderator


Joined: 07 Nov 2005
Posts: 1104
Location: The Netherlands at Hole 19

PostPosted: Tue Nov 07, 2006 4:33 pm
Reply with quote

UmeySan: yes & yes icon_wink.gif
Back to top
View user's profile Send private message
UmeySan

Active Member


Joined: 22 Aug 2006
Posts: 771
Location: Germany

PostPosted: Tue Nov 07, 2006 4:47 pm
Reply with quote

@ George:

Thanks & Greetings from Germany to Netherlands !
UmeySan
Back to top
View user's profile Send private message
Bitneuker

CICS Moderator


Joined: 07 Nov 2005
Posts: 1104
Location: The Netherlands at Hole 19

PostPosted: Tue Nov 07, 2006 4:57 pm
Reply with quote

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 icon_wink.gif )

And greetings from Holland to Germany too icon_exclaim.gif
Back to top
View user's profile Send private message
leo_viky

New User


Joined: 28 Oct 2006
Posts: 9

PostPosted: Tue Nov 07, 2006 5:37 pm
Reply with quote

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
Back to top
View user's profile Send private message
Bitneuker

CICS Moderator


Joined: 07 Nov 2005
Posts: 1104
Location: The Netherlands at Hole 19

PostPosted: Tue Nov 07, 2006 7:15 pm
Reply with quote

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.
Back to top
View user's profile Send private message
rakeshreddy
Warnings : 1

New User


Joined: 21 Mar 2007
Posts: 28
Location: Bangalore

PostPosted: Mon Mar 26, 2007 6:25 pm
Reply with quote

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]
Back to top
View user's profile Send private message
dick scherrer

Moderator Emeritus


Joined: 23 Nov 2006
Posts: 19244
Location: Inside the Matrix

PostPosted: Mon Mar 26, 2007 9:08 pm
Reply with quote

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).
Back to top
View user's profile Send private message
leo_viky

New User


Joined: 28 Oct 2006
Posts: 9

PostPosted: Fri Aug 03, 2007 2:50 pm
Reply with quote

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
Back to top
View user's profile Send private message
dick scherrer

Moderator Emeritus


Joined: 23 Nov 2006
Posts: 19244
Location: Inside the Matrix

PostPosted: Fri Aug 03, 2007 5:57 pm
Reply with quote

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.
Back to top
View user's profile Send private message
Earl

Active User


Joined: 17 Jun 2007
Posts: 148
Location: oklahoma

PostPosted: Mon Aug 06, 2007 7:16 am
Reply with quote

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.
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 Using API Gateway from CICS program CICS 0
No new posts How to get a stack trace on a looping... ABENDS & Debugging 5
No new posts Calling Java method from batch COBOL ... COBOL Programming 5
No new posts Calling an Open C library function in... CICS 1
No new posts How to 'Ping' a CICS region in JCL CICS 2
Search our Forums:

Back to Top