MXO 4.9 S0C1 in DLISFREN and DLIGENTR during BLDINDEX phase

Version 2
    Share This:

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


    PRODUCT:

    MAXM Reorg/EP for IMS


    APPLIES TO:

    MAXM Reorg/EP for IMS



    PROBLEM:

     

    LP: MAXM Reorg/EP for IMS 4.9.00
    A called S0C1 occurs in DLISFREN and DLIGENTR during database reload.

      

    Details: During the second step of a two step database LOAD where the steps are:
    1. They use the load API to load a HALDB
    2. They use SIU to build the index
    In the step 2 when attempting to build a subset of PSINDEX partitions using INDD(DFSURWF1) and the SECINDEX keyword may result in a S0C1 abend. This abend occurs only when supplying partition names in the SECINDEX keyword, not when building all partitions of the secondary index.     

      

    Issue Summary: S0C1 in DLISFREN and DLIGENTR


     

     


    SOLUTION:

     

    Legacy ID:KA421503

      

    Cause:                                                                 
    Defect QM001871377 SIU: S0C1 BUILDING PSINDEX PARTITIONS FROM WF1 INPUT
                                                                           
    Solution:                                                              
    Apply fixing PTF BQQ0526 for FMID ZDLI490                              
                                                                           
    Additional Information:                                                
    Until the PTF is available via eFix or from our web site via FTP.      
    Below is sample JCLto 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     
                                                                           
    //jobname JOB ...                                                      
                                                                           
    //DLET     EXEC PGM=IDCAMS                                             
    //SYSPRINT DD   SYSOUT=*                                               
    //SYSIN    DD   *                                                      
      DELETE HILVLQ.KA421503.PTF.TRS      PURGE                            
      DELETE HILVLQ.KA421503.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 KA421503.PTF.TRS.BIN 'HILVLQ.KA421503.PTF.TRS' (replace         
       quit                                                                
    //UNPACK   EXEC PGM=AMATERSE,PARM=UNPACK                               
    //SYSPRINT DD SYSOUT=*                                                 
    //SYSUT1   DD DISP=SHR,DSN=HILVLQ.KA421503.PTF.TRS                     
    //            DISP=(OLD,DELETE,KEEP)                                   
    //SYSUT2   DD DISP=(,CATLG,CATLG),UNIT=SYSDA,                          
    //            SPACE=(TRK,(1,1),RLSE),                                  
    //            DSN=HILVLQ.KA421503.PTF                                  
    //SYSUT3   DD DISP=(,PASS),UNIT=SYSALLDA,SPACE=(CYL,(2000,500))        
    //*                                                                    
    //*                                                                    
    //DLET     EXEC PGM=IDCAMS                                             
    //SYSPRINT DD   SYSOUT=*                                               
    //SYSIN    DD   *                                                      
      DELETE HILVLQ.KA421503.PTF.TRS      PURGE                            
    /*                                       
    //* eoj                                  

      
    Related Products:  
       
    1. MAXM Reorg/EP for IMS

     


    Article Number:

    000096801


    Article Type:

    Solutions to a Product Problem



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