search cancel

Procedure to send a Detector for Db2 for z/OS datastore to technical support if requested.

book

Article ID: 54283

calendar_today

Updated On:

Products

Detector for DB2 for z/OS Database Management for DB2 for z/OS - SQL Performance Suite

Issue/Introduction

If a Detector for Db2 for z/OS (PDT) datastore is requested by technical support for analysis,
what JCL should be used to copy the datastore VSAM datasets into sequential files to be sent via FTP?

This document contains sample JCL that can be used to copy a PDT datastore (3 VSAM files) into 3 sequential files.

Environment

Release: r20
Component: PDT

Resolution

The following sample JCL contains the correct block size and record length parameters for the sequential output datasets.
Once the sequential files have been created they can be sent via FTP in binary tersed format for analysis.

            
//jobcard                                                        
//STEP010  EXEC PGM=IDCAMS
//*                                                            
//INFILE1  DD DSN=YOUR.DS.NAME.DTR0001.SSID,DISP=SHR           
//INFILE2  DD DSN=YOUR.DS.NAME.DTR0002.SSID,DISP=SHR           
//INFILE3  DD DSN=YOUR.DS.NAME.DTR0003.SSID,DISP=SHR           
//*                                                            
//OUTFILE1 DD DSN=Your.Output.File1,                           
//            UNIT=SYSDA,                                      
//            DISP=(NEW,CATLG,DELETE),                         
//            SPACE=(CYL,(25,10),RLSE),                        
//            DCB=(RECFM=FB,LRECL=24576,BLKSIZE=24576)         
//*                                                            
//OUTFILE2 DD DSN=Your.Output.File2,                       
//            UNIT=SYSDA,                                
//            DISP=(NEW,CATLG,DELETE),                   
//            SPACE=(CYL,(25,10),RLSE),                  
//            DCB=(RECFM=FB,LRECL=8192,BLKSIZE=8192)     
//*                                                      
//OUTFILE3 DD DSN=Your.Output.File3,                       
//            UNIT=SYSDA,                                
//            DISP=(NEW,CATLG,DELETE),                   
//            SPACE=(CYL,(25,10),RLSE),                  
//            DCB=(RECFM=FB,LRECL=24576,BLKSIZE=24576)   
//*                                                      
//SYSPRINT DD SYSOUT=*                                   
//SYSUDUMP DD SYSOUT=*                                   
//AMSDUMP  DD SYSOUT=*                                   
//SYSOUT   DD SYSOUT=*                                   
//*                                                      
//SYSIN    DD *                                          
 REPRO INFILE (INFILE1) OUTFILE (OUTFILE1)               
 REPRO INFILE (INFILE2) OUTFILE (OUTFILE2)
 REPRO INFILE (INFILE3) OUTFILE (OUTFILE3)
/*
//

Additional Information

The datasets of a Datastore are explained in:
Create a Data Store