PM29356: incorrect data retrieved for Get Next on MQ record

IBM UrbanCode Deploy 6.0.1

APAR status

• Closed as program error.

Error description

• User's EGL program writes a large MQ record to Q1, then reads a
  small record from Q2. Q2 is populated by another application.
  
  It is found that on read from Q2, the record has the message
  from Q2 followed by the part of the message from Q1 that was
  written earlier.
  
  On get, the code is not taking into account the actual length of
  the message on the queue.
  
  The problem ins seen in RBD 7.5.x and RBD 8.0.1
  

Local fix

Problem summary

• ****************************************************************
  * USERS AFFECTED:                                              *
  ****************************************************************
  * PROBLEM DESCRIPTION:                                         *
  ****************************************************************
  * RECOMMENDATION:                                              *
  ****************************************************************
  The problem is this: a longer length record is added to the
  MQ series queue and it uses a buffer associated with the
  record. The EGL record is moved to this buffer and the write
  occurs. Then a short length record is tried to be read from
  the same EGL record, but with a different queue. The buffer
  associated with the record contains the shorter record, but
  also the residual data from the previous usage. That is
  fine, but the problem is that the move of the buffer data to
  the EGL record does not use the queue read's returned length
  as a reference modification. This causes short records to
  move residual data as well, which is not correct.
  

Problem conclusion

• Code generation has been changed to reference modify the
  move statement on move sets.
  

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:

Fix information

• Fixed component name

  RATL BUS DEV

• Fixed component ID

  5724S5000

Applicable component levels

• R751 PSN

     UP