PM03160: Compile Error during move field to substring

APAR status

• Closed as program error.

Error description

• A compile error occurs for  the generated cobol program if the E
  GL source contains a move from
  fieldChar to another fieldChar with substring.
  
  TRAP_SUP has char(79) and USUARIO has char(8).
  
  T230019.TRA_SUP62 : 71 = P2300533_WRK.USUARIO;
  
  COBOL Listing:
  
  008779 * EGL 181 T23054.T230019.TRA_SUP62:71 = c' ' + P2300 ...
  008780 * EGL 181 533_WRK.USUARIO;
  008781 SET EZEHAST-OUTPUT-SELECTED IN EZEMAP-TRA-SUP-7 ( 62 : 1
  + 71 833
  802
  
  ==008781==? IGYPG3191-E A reference-modifier start value exceede
  d the
  number of characters in
  'EZEHAST-AOUT'. A value equal to the number of characters in
  'EZEHAST-AOUT' was assumed.
  

Local fix

Problem summary

• The logic for assigning to a target form field variable,
  with a substring, was also trying to substring the TUI
  single byte flag field, which produced a compiler error.
  

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

• R750 PSN

     UP