A fix is available
APAR status
Closed as program error.
Error description
Per PMR 33457,422,000. ================================================================ PMR-33457-422-000 Cobol-reserved-word-not-recognized-160-char-limit APAR - Date reported: 09/21/2012 Severity: medium Users Affected: All IMU users of MU V3.2 Problem Description: 1. COBOL compiler is failing on field name 'METHOD' because it is a Reserved Word. 2. COBOL compiler is failing when quoted literal is over 160 bytes long. Problem Summation 1. Some reserved words are missing from the EASYTCBW table. 2. IMU passes long quoted values to COBOL for evaluation. Problem Conclusion: 1. The following reserved words have been added to EASYTCBW: CLASS-ID METACLASS RECURSIVE END-INVOKE METHOD REPOSITORY INHERITS METHOD-ID RETURNING INVOKE SELF SUPER LOCAL-STORAGE OVERRIDE END-EXEC TYPE FACTORY JNIENVPTR NATIONAL NATIONAL-EDITED XML END-XML XML-EVENT XML-CODE XML-TEXT XML-NTEXT FUNCTION-POINTER GROUP-USAGE 2. The long quoted values logic was changed to generate an internal field name and use the field name in the place of the quoted string. The internal field is initialized by the long string via multiple MOVE instructions in segments of 160 characters long. The following macros were changed in FSOFT01.V3R2M0.SFSYFJCC: EASYTCBW - Existing macro EASYT007 - Existing macro Note: The problem was reported by Sandy Malcolm at PGDS US ONE LLC. ================================================================
Local fix
N/A
Problem summary
**************************************************************** * USERS AFFECTED: All IMU V3.2 users. * **************************************************************** * PROBLEM DESCRIPTION: 1. COBOL compiler is failing on field * * name 'METHOD' because it is a * * Reserved Word. * * 2. COBOL compiler is failing when * * quoted literal is over 160 bytes * * long. * **************************************************************** * RECOMMENDATION: Apply PTF. * **************************************************************** 1. Some reserved words are missing from the EASYTCBW table. 2. IMU passes long quoted values to COBOL for evaluation.
Problem conclusion
1. The following reserved words have been added to EASYTCBW: CLASS-ID END-EXEC END-INVOKE END-XML FACTORY FUNCTION-POINTER GROUP-USAGE INHERITS INVOKE JNIENVPTR LOCAL-STORAGE METACLASS METHOD METHOD-ID NATIONAL NATIONAL-EDITED OVERRIDE RECURSIVE REPOSITORY RETURNING SELF SUPER TYPE XML XML-CODE XML-EVENT XML-NTEXT XML-TEXT 2. The long quoted values logic was changed to generate an internal field name and use the field name in the place of the quoted string. The internal field is initialized by the long string via multiple MOVE instructions in segments of 160 characters long.
Temporary fix
Comments
APAR Information
APAR number
PM74452
Reported component name
MIGRATION UTILI
Reported component ID
5697N4400
Reported release
320
Status
CLOSED PER
PE
NoPE
HIPER
NoHIPER
Special Attention
NoSpecatt
Submitted date
2012-10-05
Closed date
2012-10-18
Last modified date
2012-11-02
APAR is sysrouted FROM one or more of the following:
APAR is sysrouted TO one or more of the following:
UK82757
Modules/Macros
FSYESCBW FSYET007
Fix information
Fixed component name
MIGRATION UTILI
Fixed component ID
5697N4400
Applicable component levels
R320 PSY UK82757
UP12/10/19 P F210
Fix is available
Select the PTF appropriate for your component level. You will be required to sign in. Distribution on physical media is not available in all countries.
[{"Business Unit":{"code":"BU058","label":"IBM Infrastructure w\/TPS"},"Product":{"code":"SSY4B9","label":"IBM Migration Utility for z\/OS"},"Component":"","ARM Category":[],"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"320","Edition":"","Line of Business":{"code":"LOB35","label":"Mainframe SW"}}]
Document Information
Modified date:
27 October 2020