This example shows how to identify the data set from which a particular instance of a program originated.
From the current view, issue the command PROGRAMD PRGPAYR1 CICSPA01. This command tells CICSPlex® SM that you want to see detailed information about program PRGPAYR1 in CICS system CICSPA01. (Notice that the CICS system CICSPA01 is in the current scope, but that this command doesn’t change the current scope.) The PROGRAMD view is displayed:
27FEB2005 20:28:00 ----------- INFORMATION DISPLAY --------------------------- COMMAND ===> SCROLL ===> PAGE CURR WIN ===> 1 ALT WIN ===> W1 =PROGRAM==PROGRAMD=EYUPLX01=EYUPLX01=27FEB2005==20:25:05====CPSM============1 Program Name. DFHACP CICS System... EYUMAS1A Curr Use Cnt 1 Load Address. 043E5000 Exec Key...... CICSEXECKEY Tot Use Cnt. 1 Entry Point.. 843E5020 Execution Set. FULLAPI Use In Intvl 1 Length....... 7328 Mirror Tranid. AFF Newcopy Cnt. 0 Enable Status ENABLED Shared Status. PRIVATE Removed Cnt. 1 COBOL Type... NOTAPPLIC Current Loc... ECDSA RPL Number.. 1 Usage........ PROGRAM Held Status... NOHOLD Remote Name. CEDF Option.. NOCEDF Fetch Time.... 00:00:00.00 Remote Sysid Data Location ANY Avg Fetch Time 00:00:00.00 Copy Required NOTREQUIRED Dynam Status.NOTDYNAMIC Concurrency... THREADSAFE Runtime...... JVM JVM Class.... JVM Debug..... DEBUG
For a more complete description of the PROGRAMD view, see PROGRAMD - Program details.
Note that the RPL Number value in the PROGRAMD view is 1. Move the cursor to the RPL Number field and press Enter. The RPLLISTD view, showing the Relocatable Program Library (DFHRPL) dataset concatenation for CICSPA01 is displayed:
26MAR1999 17:25:11 ----------- INFORMATION DISPLAY --------------------------- COMMAND ===> SCROLL ===> PAGE CURR WIN ===> 1 ALT WIN ===> W1 =RPLLISTD==========PLXPROD1=PLXPROD1=26MAR1999==17:25:11====CPSM==========5 CMD RPL CICS Dataset --- Num System-- Name------------------------------------ 0 CICSPA01 PP.CICS330.SDFHLOAD 1 CICSPA01 PP.PAYROLL.NEWAPPL.VERSION.LOADLIB 2 CICSPA01 PP.PAYROLL.APPL.LOADLIB 3 CICSPA01 PP.PLI.V230.PLILINK 4 CICSPA01 PP.PLI.V230.SIBMLINK
For a more complete description of the RPLLISTD view, see RPLLISTD - DFHRPL data set details.
From this RPLLISTD view, you can see that RPL Number 1 relates to data set PP.PAYROLL.NEWAPPL.VERSION.LOADLIB. This type of information is useful in determining which version of a program is running in any particular CICS system.