Example 2: Marking a PTF that is in error

When IBM® discovers errors in PTFs it has already shipped, it provides information about these program error PTFs (PE-PTFs) in RETAIN®. To make sure these PTFs are held, you can use the RETAIN information to build ++HOLD statements for the PTFs.

Note: In this example, because only ++HOLD statements are being shown, none of them are underlined.
++HOLD     (UZ12345)        /* Hold this PTF            */
           FMID(FXY1040)    /* for this function        */
           ERROR            /* for APAR fix.            */
           REASON(AZ00001)  /* APAR is AZ00001.         */
           COMMENT(this APAR causes loop)  /*           */.
++HOLD     (UZ12345)        /* Hold this PTF            */
           FMID(FXY1040)    /* for this function        */
           ERROR            /* for APAR fix.            */
           REASON(AZ00002)  /* APAR is AZ00002.         */
           COMMENT(this APAR causes 0C4)   /*           */.
++HOLD     (UZ12346)        /* Hold this PTF            */
           FMID(FXY1040)    /* for this function        */
           ERROR            /* for APAR fix.            */
           REASON(AZ00003)  /* APAR is AZ00003.         */
           COMMENT(incorrect output on console)  /*     */.
++HOLD     (UZ12347)        /* Hold this PTF            */
           FMID(FXY1040)    /* for this function        */
           ERROR            /* for APAR fix.            */
           REASON(AZ00004)  /* APAR is AZ00004.         */
                            /* Integrity - no comment.  */.