Hi Experts,

Thank you so much for all your replies!!!

The WS-PGMA do NOT have INITIAL coded in it.

Compiler listing of WS-PGMA of shows there are only 4 BLL cells used in WS-PGMA

Both WS-PGMA and WS-PGMB are compiled using "IBM Enterprise COBOL for z/OS  
6.2.0".
I compared the compiler options of the both the programs. There is no 
difference.
Below is the compiler options taken from the compiler listing.

Options in effect:          
 NOADATA                    
 NOADV                      
   AFP(NOVOLATILE)          
   APOST                    
   ARCH(12)                 
   ARITH(COMPAT)            
 NOAWO                      
 NOBLOCK0                   
   BUFSIZE(24576)           
 NOCICS                     
   CODEPAGE(1140)           
 NOCOMPILE(S)               
 NOCOPYLOC                  
 NOCOPYRIGHT                
 NOCURRENCY                 
   DATA(31)                 
 NODBCS                     
 NODECK                     
 NODEFINE                   
NODIAGTRUNC         
  DISPSIGN(COMPAT)  
NODLL               
NODUMP              
NODYNAM             
NOEXIT              
NOEXPORTALL         
NOFASTSRT           
  FLAG(W)           
NOFLAGSTD           
  HGPR(PRESERVE)    
NOINITCHECK         
NOINITIAL           
  INLINE            
  INTDATE(ANSI)     
  LANGUAGE(EN)      
  LINECOUNT(60)     
NOLIST              
  MAP(HEX)          
  MAXPCF(100000)  
NOMDECK              
NONAME               
  NSYMBOL(DBCS)      
NONUMBER             
NONUMCHECK           
  NUMPROC(NOPFD)     
  OBJECT             
  OFFSET             
  OPTIMIZE(1)        
  OUTDD(SYSOUT)      
NOPARMCHECK          
  PGMNAME(COMPAT)    
  QUALIFY(COMPAT)    
  RENT               
  RMODE(AUTO)        
NORULES              
NOSERVICE            
NOSEQUENCE           
  SOURCE       
  SPACE(1)                             
NOSQL                                  
  SQLCCSID                             
NOSQLIMS                               
NOSSRANGE                              
NOSTGOPT                               
  SUPPRESS                             
NOTERM                                 
  TEST(NOEJPD,DWARF,SOURCE,NOSEPARATE) 
NOTHREAD                               
  TRUNC(STD)                           
NOVBREF                                
  VLR(COMPAT)                          
  VSAMOPENFS(COMPAT)                   
NOWORD                                 
  XMLPARSE(XMLSS)                      
  XREF(FULL)                           
  ZONEDATA(PFD)                        
  ZWB                                  

As Ralph mentioned I expanded the C08 report. CSECTs IGZ@SCH4, IGZXMCPY from 
IGZXLPKA is invoked during the call to WS-PGMA, but not for WS-PGMB.
  
 C08: CPU Usage Referred Attribution 
-------------------------------------
 
 Name      Description             Percent of CPU Time * 10.00%  ±0.8%          
                                       *....1....2....3....4....5....6....7....8
 Z0XX0XXK  Application Program    12.89                                   
 ± Z0XX0XXK  CSECT in Z0XX0XXK    12.89                                    
   ± 002548    Attribution Offset  9.24   - CALL TO WS-PGMA                     
             
               in Z0XX0XXK                                                      
     ± IGZXLPKA  COBOL Module      9.23                                     
       ± IGZ@SCH4  COBOL Module    6.80                                       
       ± IGZXMCPY  COBOL Module    2.34                                         
       ± IGZXFCA4  COBOL Module    0.08                                         
     ± 00000000_0001Bxxx Unresolv  0.00                                         

   ± 00248C    Attribution Offset  0.11   - CALL TO WS-PGMB                     
                 
               in Z0XX0XXK                                                      
     ± IGZXLPKA  COBOL Module      0.11                                         
       ± IGZXFCA4  COBOL Module    0.06                                         
       ± IGZXFCAL  COBOL Module    0.04                                         

I tried to google IGZ@SCH4 and IGZXMCPY. I could not find any information on 
them

Thanks,
Ravikumar

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Reply via email to