A fix is available
APAR status
Closed as program error.
Error description
Users of Enterprise COBOL 6.2 compiling and running programs that contain a MOVE statement that satisfies the following two conditions: 1) the sender is a signed numeric-edited item that contains an invalid sign character; 2) the receiver is an unsigned numeric or unsigned numeric-edited item. After the MOVE statement is executed, the receiver contains an unpredictable result. The de-editing of the bad numeric-edited data item stops when the bad sign is found, leaving unpredictable data in the receiver.
Local fix
Correct the invalid data.
Problem summary
**************************************************************** * USERS AFFECTED: Users of Enterprise COBOL 6.2 compiling and * * running programs that contain a MOVE * * statement that satisfies the following two * * conditions: * * 1) the sender is a signed numeric-edited * * item that contains an invalid sign * * character; * * 2) the receiver is an unsigned numeric or * * unsigned numeric-edited item. * **************************************************************** * PROBLEM DESCRIPTION: After the MOVE statement is executed, * * the receiver contains an unpredictable * * result. This behaviour is different * * from * * pre-V5 versions of the compiler. * **************************************************************** * RECOMMENDATION: Apply the IBM-provided PTF. * **************************************************************** The COBOL program would stop de-editing the bad numeric-edited data item when it found the bad sign, leaving unpredictable data in the receiver.
Problem conclusion
The compiler was updated so that when moving a signed numeric-edited item with an invalid sign character to an unsigned numeric or numeric-edited receiver, the move will continue even if the sign character is bad.
Temporary fix
Comments
APAR Information
APAR number
PH39528
Reported component name
ENT COBOL FOR Z
Reported component ID
5655EC600
Reported release
620
Status
CLOSED PER
PE
NoPE
HIPER
NoHIPER
Special Attention
NoSpecatt / Xsystem
Submitted date
2021-08-03
Closed date
2021-08-19
Last modified date
2021-09-01
APAR is sysrouted FROM one or more of the following:
APAR is sysrouted TO one or more of the following:
UI76842 UI76843 UI76844
Modules/Macros
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 IGYCLIBH IGYCLIBO IGYCLIBR IGYCLSTR IGYCLVL0 IGYCLVL1 IGYCLVL2 IGYCLVL3 IGYCLVL8 IGYCMALL IGYCOPI 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 IGYZQDRV IGYZQENU IGYZQJPN
Fix information
Fixed component name
ENT COBOL FOR Z
Fixed component ID
5655EC600
Applicable component levels
R620 PSY UI76842
UP21/08/27 P F108
R621 PSY UI76843
UP21/08/27 P F108
R622 PSY UI76844
UP21/08/27 P F108
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"},"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"620","Line of Business":{"code":"LOB35","label":"Mainframe SW"}}]
Document Information
Modified date:
12 December 2023