Creating the debugging profiles data sets

Use the IDCAMS utility to create and initialize the following VSAM data sets:

DFHDPFMB
The debugging profiles base data set.
DFHDPFMP
The debugging profiles path data set.
DFHDPFMX
The debugging profiles alternate index data set.

Use the JCL in Figure 29.

Figure 29. Sample JCL to create the debugging profiles data sets
//DPFM  JOB  'accounting information',name,MSGCLASS=A        
//DEFINE EXEC PGM=IDCAMS                                     
//SYSPRINT DD SYSOUT=A                                       
//SYSIN  DD  *                                               
    DELETE CICSTS31.CICS.DFHDPFMB                            
                                                             
    DEFINE CLUSTER (RECORDS(1000)-                           
     NAME (CICSTS31.CICS.DFHDPFMB) -                         
     SHAREOPTIONS(2 3) -                                     
     LOG(NONE) -                                             
     VOLUME (&DSVOL)  -                                      
     IXD)             -                                      
    DATA -                                                   
     (RECSZ(2560,2560) -                                     
     CONTROLINTERVALSIZE(3072) -                             
     NAME (CICSTS31.CICS.DFHDPFMB.DATA) -                    
     KEYS(17 1) -                                            
     FREESPACE(10 10) -                                      
     BUFFERSPACE (8192)) -                                   
   INDEX -                                                   
     (NAME(CICSTS31.CICS.DFHDPFMB.INDX))                     
//INITDP EXEC PGM=IDCAMS,REGION=512K                         
//SYSPRINT DD SYSOUT=A                                       
//SYSIN    DD *                                              
     REPRO INFILE ( SYS01 ) -                                
           OUTDATASET(CICSTS31.CICS.DFHDPFMB)                
//SYS01     DD *                                             
 DDUMMY   RECORD                      !! DO NOT ALTER !!     
 EEXAMPLE RECORD   REMOVE THIS LINE IF SAMPLES NOT REQUIRED  
/*                                                           
//DEFALT   EXEC PGM=IDCAMS                                   
//SYSPRINT DD SYSOUT=A                                       
//SYSIN  DD  *                                               
    DEFINE ALTERNATEINDEX -                                  
     ( NAME(CICSTS31.CICS.DFHDPFMX ) -                       
     RECORDS(1000) -                                         
     VOLUME(&DSVOL) -                                        
     KEYS(12 20) -                                            
     RELATE(CICSTS31.CICS.DFHDPFMB) -                        
     RECORDSIZE(200 200) -                                   
     SHAREOPTIONS(2 3) -                                     
     UPGRADE ) -                                             
    DATA -                                                   
     ( NAME(CICSTS31.CICS.DFHDPFMX.DATA) ) -                 
    INDEX -                                                  
     ( NAME(CICSTS31.CICS.DFHDPFMX.INDEX) )                  
    DEFINE PATH -                                            
     ( NAME(CICSTS31.CICS.DFHDPFMP) -                        
     PATHENTRY(CICSTS31.CICS.DFHDPFMX) )                     
/*                                                           
//BLDDP EXEC PGM=IDCAMS                                      
//BDSET1 DD DSN=CICSTS31.CICS.DFHDPFMB,DISP=SHR              
//ADSET1 DD DSN=CICSTS31.CICS.DFHDPFMX,DISP=SHR              
//SYSPRINT DD SYSOUT=A                                       
//SYSIN    DD *                                              
     BLDINDEX -                                              
            INFILE(BDSET1) -                                 
            OUTFILE(ADSET1)                                  
/*                                                           
//*                                                        

The sample JCL creates data sets which contain example debugging profiles. To create empty data sets, remove the following line:

 EEXAMPLE RECORD   REMOVE THIS LINE IF SAMPLES NOT REQUIRED  

Alternatively, you can run the CICS-supplied job DFHDEFDS (in CICSTS31.XDFHINST), to create the data sets for a CICS® region. For information about the DFHDEFDS job, see the CICS Transaction Server for z/OS® Installation Guide.

Related tasks
Setting up the debugging profiles data sets
Defining the debugging profiles data sets as VSAM RLS files
Defining the debugging profiles data sets as VSAM non-RLS files
Defining the debugging profiles data sets as remote files
[[ Contents Previous Page | Next Page Index ]]