PM55948: EGL COBOL error IGYDS1160-S Character(s) '-' were found as 'PICTURE' string character

Rational Business Developer Fix Pack 4 (8.0.1.4) for 8.0.1
Rational Business Developer 8.5.1
Rational Business Developer Fix Pack 2 (8.5.1.2) for 8.5.1

APAR status

• Closed as program error.

Error description

• APAR Error Description:
  Abstract: In Rational Business Developer (RBD) version 8.0.1.2,
  attempts to compile a generated EGL COBOL program result in
  error
  IGYDS1160-S Character(s) '-' were found as 'PICTURE' string
  character
  Problem: Problem is caused by an incorrect usage of substring
  like for example:
  
  program MyProg type BasicProgram {}
  
   function main()
    str1 char(20)='hello world';
    str2 char(9);
  
    str2=str1[13:3];
   end
  end
  
  Local fix:
  Correct the substring to use valid begin and end offsets.
  

Local fix

Problem summary

• ****************************************************************
  * USERS AFFECTED:                                              *
  ****************************************************************
  * PROBLEM DESCRIPTION:                                         *
  ****************************************************************
  * RECOMMENDATION:                                              *
  ****************************************************************
  EGL validation was not validating the integer literal
  indeces used on a substring access. No validation error is
  thrown for and index that is less than 1, or if the first
  index is greater than the second index.
  

Problem conclusion

• This validaiton has been added.
  

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