A fix is available
APAR status
Closed as program error.
Error description
This APAR describes several fixes that are being provided in the first PTF for IMU version 4.1. ****************************************** Pre-requisites: IMU V4.1 base tape Four (4) changes are available as described below. The following macros were changed in FSOFT01.V4R1M0.SFSYFJCC: EASYTCBW - Existing macro EASYT007 - Existing macro The following load modules in FSOFT01.V4R1M0.SFSYLOAD library were re-linked: FSCCOBOL - Existing module XXCCOBOL - Existing module FSCASSEM - Existing module FSCCOB31 - existing module FSDYNIO0 - existing module ---------------------------------------------------------------- This change synchronizes IMU V4.1 with IMU V3.2 PMR-33457-422-000 Cobol-reserved-word-not-recognized-160-char-limit IMU V3.2 APAR - PM74452 Date reported: 09/21/2012 Severity: medium Users Affected: All IMU users of MU V4.1 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.V4R1M0.SFSYFJCC: EASYTCBW - Existing macro EASYT007 - Existing macro ---------------------------------------------------------------- This change synchronizes IMU V4.1 with IMU V3.2 PMR 38890,632,760 - BLKSIZE specified for output DD in the JCL not effective IMU V3.2 APAR PM75009 Date reported: 10/12/2012 Pre-req: PTF UK81766 but it should work with PTF UK81073 Severity: High Users Affected: All IMU users of MU V4.1 Problem Description: BLKSIZE specified in the JCL for output tape files is not recognized. Problem Summation This problem occurs for output tape files when the BLKSIZE generated in the program is zero, or the BLKSIZE=NATIVE EZPARAMS option was specified. The problem was introduced by the implementation of the Long Block Interface (LBI) feature. The problem occurs when the BLKSIZE coded in the JCL for tape files that support LBI is less than 32K. Problem Conclusion: The FSDYNIO0 module was changed to extract the BLKSIZE from the BLKSIZE coded in the JCL when the block size generated in the program is zero. Changed modules in FSOFT01.V4R1M0.SFSYLOAD FSDYNIO0 - existing module Special note: FSDYNIO0 is a runtime module. Re-compiling of programs is not required. ---------------------------------------------------------------- This change synchronizes IMU V4.1 with IMU V3.2 PMR 05079,180,846 - MSG IOR003-04,012 CON_CODE :PARAMETER LIST IS MISSING when running SQL IMU V3.2 APAR - PM74414 Date reported: 09/17/2012 Severity: Medium Users Affected: All IMU users of MU V4.1 Problem Description: Getting MSG IOR003-04,012 CON_CODE :PARAMETER LIST IS MISSING Problem Summation SQL field names that begin with CON_ and SEL_ are in conflict with CCL1 Constructor/Selector functions syntax. Problem Conclusion: Logic was added to FSIOR003 module to ignore CON_/SEL_ functions syntax for EXEC SQL statements. Changed modules in FSOFT01.V4R1M0.SFSYLOAD FSCCOBOL - Existing module XXCCOBOL - Existing module FSCASSEM - Existing module FSCCOB31 - existing module ---------------------------------------------------------------- This change Applies to IMU V4R1M0 only ACCL-05 DBCS - IMPROPER DATA OR EXCEEDS MAX LENGTH Date discovered: 10/19/2012 Severity: Medium Users Affected: All IMU users of MU V4.1 Problem Description: Getting MSG - ACCL-05 DBCS - IMPROPER DATA OR EXCEEDS MAX LENGTH Problem Summation The ACCL DBCS macro instruction was not adjusted to expand dynamic strings. Problem Conclusion: Logic was added to FSACCL00 to expand variables dynamically when string does not fit. Changed modules in FSOFT01.V4R1M0.SFSYLOAD FSCCOBOL - Existing module XXCCOBOL - Existing module FSCASSEM - Existing module FSCCOB31 - existing module ----------------------------------------------------------------
Local fix
none available
Problem summary
**************************************************************** * USERS AFFECTED: All IMU V4.1 Users. * **************************************************************** * PROBLEM DESCRIPTION: Four fixes changes are included in this * * APAR. * * * * 1. - COBOL compiler is failing on field * * name 'METHOD' because it is a * * Reserved Word. * * - COBOL compiler is failing when * * quoted literal is over 160 bytes * * long. * * * * 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. * * * * 3. BLKSIZE specified in the JCL for * * output tape files is not recognized. * * * * 4. Getting MSG IOR003-04,012 CON_CODE * * :PARAMETER LIST IS MISSING * **************************************************************** * RECOMMENDATION: Apply the PTF. * **************************************************************** 1. Some reserved words are missing from the EASYTCBW table. IMU passes long quoted values to COBOL for evaluation. 2. This problem occurs for output tape files when the BLKSIZE generated in the program is zero, or the BLKSIZE=NATIVE EZPARAMS option was specified. The problem was introduced by the implementation of the Long Block Interface (LBI) feature. The problem occurs when the BLKSIZE coded in the JCL for tape files that support LBI is less than 32K. 3. SQL field names that begin with CON_ and SEL_ are in conflict with CCL1 Constructor/Selector functions syntax. 4. The ACCL DBCS macro instruction was not adjusted to expand dynamic strings.
Problem conclusion
1. The following reserved words have been added to EASYTCBW: CLASS-ID END-EXEC METACLASS TYPE RECURSIVE FACTORY END-INVOKE JNIENVPTR METHOD NATIONAL REPOSITORY NATIONAL-EDITED INHERITS XML METHOD-ID END-XML RETURNING XML-EVENT INVOKE XML-CODE SELF XML-TEXT SUPER XML-NTEXT LOCAL-STORAGE FUNCTION-POINTER OVERRIDE GROUP-USAGE 2. The FSDYNIO0 module was changed to extract the BLKSIZE from the BLKSIZE coded in the JCL when the block size generated in the program is zero. 3. Logic was added to FSIOR003 module to ignore CON_/SEL_ functions syntax for EXEC SQL statements. 4. Logic was added to FSACCL00 to expand variables dynamically when string does not fit.
Temporary fix
Comments
APAR Information
APAR number
PM76250
Reported component name
MIGRATION UTILI
Reported component ID
5697N4400
Reported release
410
Status
CLOSED PER
PE
NoPE
HIPER
NoHIPER
Special Attention
NoSpecatt
Submitted date
2012-10-31
Closed date
2012-11-30
Last modified date
2013-01-02
APAR is sysrouted FROM one or more of the following:
APAR is sysrouted TO one or more of the following:
UK83911
Modules/Macros
FSYASSEM FSYCCBOL FSYCCB31 FSYDNIO0 FSYESCBW FSYET007 FSYXCOBO
Fix information
Fixed component name
MIGRATION UTILI
Fixed component ID
5697N4400
Applicable component levels
R410 PSY UK83911
UP12/12/15 P F212
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.
Rate this page:
Average rating
Copyright and trademark information
IBM, the IBM logo and ibm.com are trademarks of International Business Machines Corp., registered in many jurisdictions worldwide. Other product and service names might be trademarks of IBM or other companies. A current list of IBM trademarks is available on the Web at "Copyright and trademark information" at www.ibm.com/legal/copytrade.shtml.