PK63113: ABENDS0C4 WHEN THE ICEIN CONTROL STATEMENT IS MORE THAN 253 LINES. OCCURS AFTER APPLYING PK45121.

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• ABENDS0C4 occurred after applying PK45121.  This happens when
  the ICEIN control statement is more than 253 lines.
  

Local fix

Problem summary

• ****************************************************************
  * USERS AFFECTED: All IMS High Performance Image Copy for z/OS *
  *                 Version 4 Release 1 users ( FMID=H1J0410 )   *
  ****************************************************************
  * PROBLEM DESCRIPTION: After applying APAR PK45121, HPIC Image *
  *                      Copy function terminates with ABEND     *
  *                      S0C4 ( ABEND0C4 ) at FABJMAIN CSECT     *
  *                      FABJPARM + X'6554', if specified        *
  *                      control statements on ICEIN DD are more *
  *                      than 230 lines.                         *
  ****************************************************************
  * RECOMMENDATION: Apply the maintenance for this APAR.         *
  ****************************************************************
  After applying APAR PK45121, HPIC Image Copy function terminates
  with ABEND S0C4 ( ABEND0C4 ) at FABJMAIN CSECT FABJPARM +
  X'6554', if specified control statements on ICEIN DD are more
  than 230 lines.
  
  By APAR PK45121, HPIC getmain buffer storage in which HPIC keeps
  the ICEIN control statements for ITKB report. But the storage
  estimation is not large enough to keeping 230 lines of control
  statements. Therefore HPIC overwrites data into other HPIC's
  control blocks and terminates with ABEND.
  

Problem conclusion

• FABURPTH has been modified to getmain a new storage if the line
  counter is over the max number of lines.
  
  FABJPARM, FABJPRM2, FABJRPT1 and FABJGLRP have been modified to
  initialize the header record of the ITKB buffer for keeping the
  report lines.
  
  FABJMAIN, FABJINT1 and FABJCRC0 have been modified to call ITKB
  FUNC=WRITE until the line counter is zero.
  
  FABURHT has been modified to generate the DSECT which is used
  for the header record of the ITKB buffer.
  
  The following modules have been reassembled.
    FABJRPTH FABJDDIM FABJPRM3 FABJRETC
    FABJRETM FABJRPT0 FABJTGEN
  

Temporary fix

Comments

APAR Information

• APAR is sysrouted FROM one or more of the following:

• APAR is sysrouted TO one or more of the following:

  UK35115

Modules/Macros

• FABJCRC0 FABJDDIM FABJGLRP FABJINT1 FABJMAIN
  FABJPARM FABJPRM2 FABJPRM3 FABJRETC FABJRETM FABJRPTH FABJRPT0
  FABJRPT1 FABJTGEN FABURHT  FABURPTH
  

Fix information

• Fixed component name

  IMS HP IMAGE CO

• Fixed component ID

  5655K9600

Applicable component levels

• R410 PSY UK35115

     UP08/04/02 P F804 Ø

Fix is available

• Select the PTF appropriate for your component level. You will be required to sign in. Distribution on physical media is not available in all countries.