A fix is available
APAR status
Closed as program error.
Error description
Functional changes in the V6.3 compiler allow the SIGN reserved word to now appear in either the PROCEDURE or DATA DIVISIONS in a user program. This caused the index for the SIGN reserved word to change from value 03180001B20 to 02180001B20. The sample alternate reserved word table IGY8RWRD needs to be in sync with this internal reserved word table, but was mistakenly not updated, for this change.
Local fix
If the use of an alternate reserved word table for the compiler is required, update the entry for SIGN in the alternate reserved word table source and change the index from 03180001B20 to 02180001B20. Then rebuild the alternate reserved word table.
Problem summary
**************************************************************** * USERS AFFECTED: All users of the Enterprise COBOL V6.3 * * compiler who try to run a compile using an * * alternate reserved word table, based on the * * provided sample IGY8RWRD. * **************************************************************** * PROBLEM DESCRIPTION: Incorrect output: the compiler * * incorrectly flags the SIGN parameter * * in a picture clause with an * * IGYDS1089-S message. * **************************************************************** * RECOMMENDATION: Apply the provided PTF. * **************************************************************** Functional changes in the V6.3 compiler allow the SIGN reserved word to now appear in either the PROCEDURE or DATA DIVISIONS in a user program. This caused the index for the SIGN reserved word to change from 03180001B20 to 02180001B20. The sample, alternate reserved word table IGY8RWRD needs to be in sync with this internal reserved word table, but was mistakenly not updated, for this change.
Problem conclusion
The sample alternate, reserved word table IGY8RWRD has been updated to match the default reserved word table used internally by the compiler.
Temporary fix
Comments
APAR Information
APAR number
PH22936
Reported component name
ENT COBOL FOR Z
Reported component ID
5655EC600
Reported release
630
Status
CLOSED PER
PE
NoPE
HIPER
NoHIPER
Special Attention
NoSpecatt / Xsystem
Submitted date
2020-03-04
Closed date
2020-03-26
Last modified date
2020-04-02
APAR is sysrouted FROM one or more of the following:
APAR is sysrouted TO one or more of the following:
Modules/Macros
IGY8RWRD IGY8RWTU IGYCASMB IGYCCBE IGYCCCRT IGYCCICS IGYCCSRV IGYCDGEN IGYCDIAG IGYCDMAP IGYCEN$0 IGYCEN$1 IGYCEN$2 IGYCEN$3 IGYCEN$4 IGYCEN$5 IGYCEN$8 IGYCEN$D IGYCEN$R IGYCFGEN IGYCFREE IGYCINIT IGYCJA$0 IGYCJA$1 IGYCJA$2 IGYCJA$3 IGYCJA$4 IGYCJA$5 IGYCJA$8 IGYCJA$D IGYCJA$R IGYCLIBR IGYCLSTR IGYCLVL0 IGYCLVL1 IGYCLVL2 IGYCLVL3 IGYCLVL8 IGYCMALL IGYCOB2E IGYCOSCN IGYCPGEN IGYCRCTL IGYCRDPR IGYCRDSC IGYCREAL IGYCRWT IGYCSCAN IGYCSIMD IGYCUE$0 IGYCUE$1 IGYCUE$2 IGYCUE$3 IGYCUE$4 IGYCUE$5 IGYCUE$8 IGYCUE$D IGYCUE$R IGYCXREF IGYDRV IGYEQCWI IGYMSGE IGYMSGK IGYMSGT IGYQCBE IGYQSPLT IGYZQEN6 IGYZQENU IGYZQJP6 IGYZQJPN
Fix information
Fixed component name
ENT COBOL FOR Z
Fixed component ID
5655EC600
Applicable component levels
R630 PSY UI68641
UP20/04/01 P F003
R631 PSY UI68642
UP20/04/01 P F003
R632 PSY UI68643
UP20/04/01 P F003
R63H PSY UI68644
UP20/04/01 P F003
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":"SS6SG3","label":"Enterprise COBOL for z\/OS"},"Component":"","ARM Category":[],"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"630","Edition":"","Line of Business":{"code":"LOB35","label":"Mainframe SW"}}]
Document Information
Modified date:
12 December 2023