PI41786: IMS/DLI PROGRAMS ARE ABENDING FOR SC04. THIS OCCURS WHEN THERE ARE NO FIELDS DEFINED WITHIN SEGMENTS IN THE DBD DEFINITIONS.

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• PMR 50609,999,000: DLI SC04 in FSYGDBD0
  
  Severity: High
  
  Users Affected:
  All IMU users of MU V4.1
  
  Problem Description:
  IMS/DLI programs are ABENDing for SC04.
  This occurs when there are no fields defined within segments in
  the DBD definitions.
  
  Problem Summation
  The program FSYGDBD0 walks thru the DBD definitions in attempt
  to build a qualified SSA string. The qualified SSA string is
  defined of the segment name and the key for that segment. The
  key is the 1st defined field in the DBD for the specified
  segment.
  
  The problem is that when there are no fields available, the
  field displacement generated in the DBD is x'ffffffff' (i.e -1).
  
  The logic in FSYGDBD0 does not check for 'no fields', therefore
  it ABENDs due to x'ffffffff' in the displacement field.
  
  
  Note: A qualified SSA is built for all Parent segments used in
        the RETRIEVE statement. The key must be defined as IMU
        uses it to build the  qualified SSA string.
  
  Problem Conclusion:
  The FSYGDBD0 logic was changed to construct an unqualified SSA
  when key is not present (no defined fields exist).
  
  Impact on existing programs
  There is no impact on existing programs that work properly.
  IMS/DLI programs that are getting SC04  must be re-compiled
  and linked after the APAR is applied.
  
  Changed modules:
  FSOFT01.V4R1M0.SFSYLOAD
    FSYGDBD0 - existing module
  
  Note: This problem was reported by Excellus on 05/07/2015 and
         it's related to PMRs 18169,082,000 and PMR 50027,999,000.
  

Local fix

• N/A
  

Problem summary

• ****************************************************************
  * USERS AFFECTED: All IMU users of MU V4.1                     *
  ****************************************************************
  * PROBLEM DESCRIPTION: IMS/DLI programs are ABENDing for SC04. *
  *                      This occurs when there are no fields    *
  *                      defined within segments in the DBD      *
  *                      definitions.                            *
  ****************************************************************
  * RECOMMENDATION: Apply the PTF.                               *
  ****************************************************************
  The program FSYGDBD0 walks thru the DBD definitions in
  attempt to build a qualified SSA string. The qualified
  SSA string is defined of the segment name and the key
  for that segment. The key is the 1st defined field in
  the DBD for the specified segment.
  
  The problem is that when there are no fields
  available, the field displacement generated in the
  DBD is x'ffffffff' (i.e -1).
  
  The logic in FSYGDBD0 does not check for 'no fields',
  therefore it ABENDs due to x'ffffffff' in the
  displacement field.
  
  Note: A qualified SSA is built for all Parent
        segments used in the RETRIEVE statement.
        The key must be defined as IMU uses it to
        build the  qualified SSA string.
  

Problem conclusion

• The FSYGDBD0 logic was changed to construct an
  unqualified SSA when key is not present (no defined
  fields exist).
  
  Impact on existing programs:
  There is no impact on existing programs that work
  properly. IMS/DLI programs that are getting SC04
  must be re-compiled and linked after the APAR is applied.
  

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:

Modules/Macros

•    FSYGDBD0
  

Fix information

• Fixed component name

  MIGRATION UTILI

• Fixed component ID

  5697N4400

Applicable component levels

• R410 PSY UI30225

     UP15/08/19 P F508

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.