S0C4 when running Collect on HALDB

Version 1
    Share:|

    This document contains official content from the BMC Software Knowledge Base. It is automatically updated when the knowledge article is modified.


    PRODUCT:

    MAXM Database Advisor for IMS



    PROBLEM:

    There is a chance of a S0C4 ABEND occurring in an Advisor COLLECT job running against a HALDB when processing EPS data


    SOLUTION:

    This solution requires the following PTF(s):
    BQQ3147
        
    The PTF(s) is available via E-fix or from our web site via FTP. Below is sample jcl to retrieve the receive file and unterse it. You may also call BMC Support at 1-800-537-1813 and request that it be sent to you.

    The following changes must be made to this sample jcl (Please maintain the case sensitivity):
    1. Add a JOBCARD
    2. Change the high level "HILVLQ" to your standards
    3. Change "mine@bmc.com" to your email address in the FTPGET1 step.

    //DLET     EXEC PGM=IDCAMS                                  
    //SYSPRINT DD   SYSOUT=*                                    
    //SYSIN    DD   *                                           
      DELETE HILVLQ.KA145844.PTF.TRS      PURGE                 
      DELETE HILVLQ.KA145844.PTF     PURGE                      
      SET MAXCC = 0                                             
      /* ----------------------------------------- */           
    //FTPGET1  EXEC PGM=FTP                                     
    //SYSPRINT DD SYSOUT=*                                      
    //OUTPUT   DD SYSOUT=*                                      
    //* -----------------------------------------------------*  
    //*   Case-sensitive! Directory names in CAPs ...        *  
    //* -----------------------------------------------------*  
    //INPUT    DD *                                             
     ftp.bmc.com                                                
     anonymous                                                  
     mine@bmc.com                                          
     binary                                                        
     cd pub/imsutil                                                
     binary                                                        
     locsite lr=1024 rec=fb blk=10240 pri=1 sec=1  tr              
     get KA145844.PTF.TRS.BIN 'HILVLQ.KA145844.PTF.TRS' (replace   
     quit                                                         
    //UNPACK1  EXEC PGM=TRSMAIN,PARM=UNPACK                        
    //SYSPRINT DD SYSOUT=*                                         
    //INFILE   DD DISP=SHR,DSN=HILVLQ.KA145844.PTF.TRS             
    //OUTFILE  DD DISP=(,CATLG,CATLG),UNIT=SYSDA,                  
    //            SPACE=(TRK,(1,1),RLSE),                        
    //            DSN=HILVLQ.KA145844.PTF                          
    //DLET     EXEC PGM=IDCAMS                                     
    //SYSPRINT DD   SYSOUT=*                                       
    //SYSIN    DD   *                                              
      DELETE HILVLQ.KA145844.PTF.TRS      PURGE                    
    /*
    //


    Article Number:

    000145844


    Article Type:

    Solutions to a Product Problem



      Looking for additional information?    Search BMC Support  or  Browse Knowledge Articles