PM24349: VSE ABEND 4094 during call between EGL TUI

APAR status

• Closed as program error.

Error description

• User has generated Cobol from RBD 7.5.1.5 to run on VSE CICS.
  
  The main program T01, converses a form and after return
  transfers to program T02. T02 converses
  two forms and then transfers to T01. T01 converses a form, and
  immediately gets abend 4094.
  
  Trace shows that the failure is happening when module ELASSM
  is trying to execute FREALL function, freeing a memory location.
  
  T01 does not have any string data, and therefore does not ELASSM
  normally. T02 does have String data and uses ELASSM.
  

Local fix

Problem summary

• ****************************************************************
  * USERS AFFECTED:                                              *
  ****************************************************************
  * PROBLEM DESCRIPTION:                                         *
  ****************************************************************
  * RECOMMENDATION:                                              *
  ****************************************************************
  The problem occurred when there were two different main
  programs, both doing segmented converses. These two programs
  transferred to one another. With the performance logic that
  was added in a previous release, the logic would determine
  whether the program had anything in it to prevent it from
  using the faster runtime logic to store the values, such as
  strings. In this case, one of the programs was able to use
  the runtime and the other had a string, so it had to use the
  SSM module. The problem was that the transfer statement
  caused the other program to get loaded, and it was expecting
  either the runtime technique or the SSM technique to have
  been used but because it came from the other program, it was
  the wrong one.
  The fix also checks to see if there are any transfers in the
  program, and if there are, then it always forces the SSM
  technique to be used. This keeps them in sync.
  

Problem conclusion

• Software updated. Fixtest available.
  

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

  RBD EGL FOR COB

• Fixed component ID

  5724S5001

Applicable component levels

• R751 PSN

     UP