search cancel

How to get the CICS Jobname I am working with?

book

Article ID: 17910

calendar_today

Updated On:

Products

Datacom DATACOM - AD Ideal Database Analyzer (IMS Tools) Mainframe Configuration Manager for IMS for z/OS IMS TOOLS - MISC Compress Data Compression (IMS Tools) Database Analyzer for IMS for z/OS Database Copier for IMS for z/OS Database Organizer for IMS for z/OS Mainframe Extended Terminal Manager (IMS Tools) High Performance Recovery for IMS for z/OS Database Organizer (IMS Tools) Mainframe Program Restart Manager for IMS for z/OS Secondary Index Builder for IMS for z/OS Secondary Index for IMS for z/OS CIS COMMON SERVICES FOR Z/OS 90S SERVICES DATABASE MANAGEMENT SOLUTIONS FOR DB2 FOR Z/OS COMMON PRODUCT SERVICES COMPONENT Common Services CA ECOMETER SERVER COMPONENT FOC EASYTRIEVE REPORT GENERATOR FOR COMMON SERVICES INFOCAI MAINTENANCE IPC UNICENTER JCLCHECK COMMON COMPONENT Mainframe VM Product Manager CHORUS SOFTWARE MANAGER CA ON DEMAND PORTAL CA Service Desk Manager - Unified Self Service PAM CLIENT FOR LINUX ON MAINFRAME MAINFRAME CONNECTOR FOR LINUX ON MAINFRAME GRAPHICAL MANAGEMENT INTERFACE WEB ADMINISTRATOR FOR TOP SECRET Xpertware

Issue/Introduction

Summary:

Is there a command to get the CICS jobname I am working with?

Instructions:

The following CICS command will do it: CECI INQUIRE SYSTEM JOBNAME()

It will display on the top right side of the screen the field: 'NAME=' where you can enter a value.

Enter 'x' and press enter, it will show '&x' then press enter again, all the fields should now be displayed with their values.

You may now press PF8 until you see the field Jobname value and other system field values.

 

For example: 

  inq system jobname()                                                      

 STATUS:  COMMAND EXECUTION COMPLETE                         NAME=         

  EXEC CICS  INQuire SYSTem                                                

+  < ERdsasize( +0027262976 ) >                                            

   < ESdsasize( +0001048576 ) >                                            

   < EUdsasize( +0001048576 ) >                                            

   < Forceqr( +0000001054 ) >                                              

   < GMMTExt( 'CTS 4.1/CICS 6.6 eMAIL/ETC & IDEALr11/IPCr11/DBr1' ... )    

     GMMLength( +00050 ) >                                                 

   < GMMTRanid( 'CSGM' ) >                                                 

   < Initstatus( +0000000628 ) >                                           

   < Jobname( 'DIDACICS' ) >                                           <==== Jobname                                         

   < Logdefer( +0000000005 ) >                                             

   < MAXOpentcbs( +0000000012 ) >                                          

   < MAXTasks( +0000000005 ) >                                             

   < MEmlimit( Nolimit ) >                                                 

   < MQconn( '        ' ) >                                                

   < MRobatch( +0000000001 ) >                                             

   < OPRel( +00021 ) >                                                     

+  < OPSys( 'X' ) >                                                        

                                                                            

  RESPONSE: NORMAL                EIBRESP=+0000000000 EIBRESP2=+0000000000 

PF 1 HELP 2 HEX 3 END 4 EIB 5 VAR 6 USER 7 SBH 8 SFH 9 MSG 10 SB 11 SF     

 

Additional Information: 

CECI: CICS-supplied Command Interpreter transaction. It verifies the syntax of a CICS command and executes the command.

See IBM KnowledgeCenter for more about CECI transaction:

https://www-01.ibm.com/support/knowledgecenter/#!/SSGMCP_5.3.0/com.ibm.cics.ts.systemprogramming.doc/transactions/ceci/dfha71y.html?cp=SSGMCP_5.3.0%2F20-9-1-7

Environment

Release: DATABB00200-14-Datacom/AD
Component: