ICP batch image copies recorded as CONCUR when using SMARTIC(Y)

Version 1
    Share This:

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


    PRODUCT:

    IMAGE COPY PLUS


    COMPONENT:

    IMAGE COPY PLUS


    APPLIES TO:

    IMAGE COPY PLUS v5.0.00 IMAGE COPY PLUS V5.1.00



    PROBLEM:

    When using SMARTIC(Y) and FALLBACK(Y) keywords, image copies recorded in DBRC do not match the requested image copy type.

    For example, the previous image copy was unable to obtain authorization. 

    BMC8300I <jobname>,<dbdname>,<ddn> CONCURRENT IMAGE COPY WILL BE CREATED (ICP)

    Since the FALLBACK(Y) keyword was used, the ICP utility switches to OIC or AOIC functions to create a concurrent image copy, even though BATCH has was requested (IC or AIC functions).  A concurrent image copy is recorded in DBRC as CONCUR, and will require IMS log data if a recovery is needed. 

    When the image copy job runs again, and requests a batch image copy, once authorization is obtained, a batch image copy is successful, however the image copy is recorded in DBRC as CONCUR.
                        

              


    CAUSE:

    SMARTIC code incorrectly using the last IC type recorded in DBRC


    SOLUTION:

    Until such time as the PTF can be made available on eFix PTF Distribution Services or BMC Internet Service Retrieval, use the following sample JCL to download the fix.

    <jobcard>
    //* 1. TSO EDIT; CAPS OFF
    //* 2. Add a JOBCARD
    //* 3. Change the high level "HILVLQ" to your standards
    //* 4. Change "email@company.com" to your email address in the FTPGET step.
    //* 5. This is an SMP/E solution. Use the resulting file to RECEIVE & APPLY
    //*
    //*      BQQ4663.ZBRI510.PTFS FMID(ZBRI510)
    //*      BQQ4664.ZBRI500.PTFS FMID(ZBRI500)
    //*
    //*    Assumes RSL1907 maintenance
    //*
    //DLET1    EXEC PGM=IDCAMS
    //SYSPRINT DD   SYSOUT=*
    //SYSIN    DD   *
      DELETE HILVLQ.BQQ4663.ZBRI510.PTFS.TRS PURGE
      DELETE HILVLQ.BQQ4663.ZBRI510.PTFS PURGE
      DELETE HILVLQ.BQQ4664.ZBRI500.PTFS.TRS PURGE
      DELETE HILVLQ.BQQ4664.ZBRI500.PTFS PURGE
      SET MAXCC = 0
    /*
    //*
    //FTPGET   EXEC PGM=FTP
    //SYSPRINT DD   SYSOUT=*
    //OUTPUT   DD   SYSOUT=*
    //* -----------------------------------------------------*
    //*   Case-sensitive!                                    *
    //* -----------------------------------------------------*
    //INPUT    DD   *
     ftp.bmc.com
     anonymous
     email@company.com
     binary
     cd pub/imsbrs
     locsite lr=1024 rec=fb blk=27648 pri=10 sec=10 unit=sysda cyl
     get BQQ4663.ZBRI510.PTFS.TRS  +
        'HILVLQ.BQQ4663.ZBRI510.PTFS.TRS' (replace
     get BQQ4664.ZBRI500.PTFS.TRS  +
        'HILVLQ.BQQ4664.ZBRI500.PTFS.TRS' (replace
     quit
    /*
    //*
    //UNPACK1  EXEC PGM=AMATERSE,PARM=UNPACK
    //SYSPRINT DD   SYSOUT=*
    //SYSUT1   DD   DISP=SHR,DSN=HILVLQ.BQQ4663.ZBRI510.PTFS.TRS
    //SYSUT2   DD   DISP=(,CATLG,CATLG),UNIT=SYSDA,
    //            SPACE=(CYL,(10,10),RLSE),
    //            DSN=HILVLQ.BQQ4663.ZBRI510.PTFS
    //*
    //UNPACK2  EXEC PGM=AMATERSE,PARM=UNPACK
    //SYSPRINT DD   SYSOUT=*
    //SYSUT1   DD   DISP=SHR,DSN=HILVLQ.BQQ4664.ZBRI500.PTFS.TRS
    //SYSUT2   DD   DISP=(,CATLG,CATLG),UNIT=SYSDA,
    //            SPACE=(CYL,(10,10),RLSE),
    //            DSN=HILVLQ.BQQ4664.ZBRI500.PTFS
    //*
    //DLET2    EXEC PGM=IDCAMS
    //SYSPRINT DD   SYSOUT=*
    //SYSIN    DD   *
      DELETE HILVLQ.BQQ4663.ZBRI510.PTFS.TRS      PURGE
      DELETE HILVLQ.BQQ4664.ZBRI500.PTFS.TRS      PURGE
    /*
    //

     


    Article Number:

    000180314


    Article Type:

    Solutions to a Product Problem



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