PM43425: While debugging EGL function, the default parameter should be treated as 'inout' but in 8.0.1.1 it is treated as 'in' only

APAR status

• Closed as program error.

Error description

• Environment: Windows XP
  Product name: IBM? Rational? Business Developer
  Program Version : 8.0.1.1
  
  Problem Description.
  When debugging a function that have a record as a parameter the
  default is expected to be 'inout' while the behaviour at debug
  mode seems to be only 'in' but at runtime it is 'inout'
  
  Steps To reproduce
  
  Example:
  record MyRecord type BasicRecord
  5 val1 char(8);
  end
  
  program VG07A type BasicProgram {}
  
  function main()
  rec MyRecord;
  rec.val1='ABCDEF';
  test(rec);
  syslib.writeStdout(rec.val1);
  end
  
  function test(c char)
  c = 'Hi';
  end
  end
  
  
  While debugging the rec.val1 is not changed after calling the
  test function
  

Local fix

Problem summary

• ****************************************************************
  * USERS AFFECTED:                                              *
  ****************************************************************
  * PROBLEM DESCRIPTION:                                         *
  ****************************************************************
  * RECOMMENDATION:                                              *
  ****************************************************************
  When passing in a structured record to a function whose
  parameter is an INOUT CHAR, the record argument was treated
  as IN instead of INOUT. This was not a problem for other
  argument/parameter type combinations.
  

Problem conclusion

• A structured record argument being passed into an INOUT CHAR
  function parameter is now treated as INOUT.
  

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

• R801 PSN

     UP