There are a number of programs and even REXX execs that have been
written to do this but the first one that I find handy is Roland's
STCCHECK in CBT Tape file 321.

File # 321 COBOL Analyzer from Roland Schiradin & post processor 

http://www.cbttape.org/ftp/cbt/CBT321.zip

http://www.cbttape.org

 STCCHECK  This program check if a started Task is already 
          active. This avoid abend U1800 if a operator     
          start the same CICS again. Please note this works
          only on the same MVS-image, I'll add sometimes    
          code to check the SYSPLEX.                       
                                                           
          //*******************  EXECUTE CICS              
          //*****************************************      
          //STCCHECK EXEC PGM=STCCHECK,PARM='DCCA201'      
          //SYSPRINT  DD SYSOUT=*                          
          //SYSUDUMP  DD SYSOUT=D                          
          //*****************************************      
          //DCCSTRT IF (STCCHECK.RC = 0) THEN              
          //DCCA201 EXEC PROC=DCICSA                       
          //EDCCSTRT ENDIF                                 
                                         
 rc = 0   DCCA201 is not active           
 rc not 0 DCCA201 is active  

        Best Regards, 

                Sam Knutson, GEICO 
                Performance and Availability Management 
                mailto:[EMAIL PROTECTED] 
                (office)  301.986.3574 

Agnes' Law: Almost everything in life is easier to get into than out of.

                                           

-----Original Message-----
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
Behalf Of Carl Edwards
Sent: Thursday, May 25, 2006 2:32 PM
To: [email protected]
Subject: Determine what is running on system

Is anyone aware of a means by which I can determine if a specific
'process' is running. For example, I would like to determine, in a
program,  if DB2 is active, or any other process for that matter. 
TIA
====================
This email/fax message is for the sole use of the intended
recipient(s) and may contain confidential and privileged information.
Any unauthorized review, use, disclosure or distribution of this
email/fax is prohibited. If you are not the intended recipient, please
destroy all paper and electronic copies of the original message.

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Reply via email to