A fix is available
APAR status
Closed as program error.
Error description
IGYPG5052-U Too many literals for HM-space were found.
Local fix
N/A
Problem summary
**************************************************************** * USERS AFFECTED: Users of Enterprise COBOL 5.1 compiling a * * program using many references to FUNCTION * * LENGTH. * * * **************************************************************** * PROBLEM DESCRIPTION: Compiler abort when a program * * containing many references to the * * LENGTH intrinsic function with an * * alphanumeric literal argument that is * * greater than 35 characters. The * * compiler abort the compilation and * * generate the following erroneous * * message: IGYPG5052-U Too many * * literals for HM-space were found. * * * **************************************************************** * RECOMMENDATION: Apply the provided PTF. * * * **************************************************************** When the compiler process a LENGTH intrinsic function that has an alphanumeric literal argument that is grater than 35 character in length. It fail to free the literal from internal storage.
Problem conclusion
The compiler was modified to free the storage allocated for a LENGTH intrinsic function alphanumeric literal argument when that storage is not needed any more.
Temporary fix
Comments
APAR Information
APAR number
PI69337
Reported component name
ENT COBOL FOR Z
Reported component ID
5655W3200
Reported release
510
Status
CLOSED PER
PE
NoPE
HIPER
NoHIPER
Special Attention
NoSpecatt / Xsystem
Submitted date
2016-09-19
Closed date
2016-10-19
Last modified date
2016-11-25
APAR is sysrouted FROM one or more of the following:
APAR is sysrouted TO one or more of the following:
UI41798 UI41799 UI41801 PI71943 PI72821
Modules/Macros
IGYCCICS IGYCLVL0 IGYCLVL1 IGYCLVL2 IGYCLVL3 IGYCLVL8 IGYCRWT IGYDCNTL IGYDGPIC IGYDMETA IGYDPR01 IGYDPR02 IGYDPR03 IGYDPR04 IGYDPR05 IGYDPR06 IGYDPR07 IGYEADAT IGYECNTL IGYEEN$D IGYEEN$R IGYEEN$0 IGYEEN$1 IGYEEN$2 IGYEEN$3 IGYEEN$4 IGYEEN$5 IGYEEN$8 IGYEJA$D IGYEJA$R IGYEJA$0 IGYEJA$1 IGYEJA$2 IGYEJA$3 IGYEJA$4 IGYEJA$5 IGYEJA$8 IGYEMSGS IGYEUE$D IGYEUE$R IGYEUE$0 IGYEUE$1 IGYEUE$2 IGYEUE$3 IGYEUE$4 IGYEUE$5 IGYEUE$8 IGYFCNTL IGYFFCB IGYFFIB IGYFFIB1 IGYFSRVE IGYGCNTL IGYGGCLC IGYGITXT IGYGMETA IGYGPR01 IGYGPR02 IGYGPR03 IGYGPR04 IGYGPR05 IGYHADAT IGYHCNTL IGYIADAT IGYICNTL IGYKADAT IGYKCNFL IGYKCNTL IGYKSTAT IGYLADAT IGYLBASI IGYLCNTL IGYLCOPY IGYLLIBH IGYLLIBO IGYLSRVE IGYMCNTL IGYMDIAG IGYMDMAP IGYMXREF IGYNARIT IGYNCNTL IGYNCOND IGYNDATA IGYNEROR IGYNEVAL IGYNFUNC IGYNINOU IGYNLINK IGYNPRFM IGYNPROC IGYNSORT IGYNSRVE IGYNXML IGYPACCP IGYPADAT IGYPADSB IGYPARTH IGYPASBB IGYPASFF IGYPASII IGYPASSL IGYPCALC IGYPCBB IGYPCCLB IGYPCDD IGYPCDNL IGYPCFF IGYPCLAS IGYPCLSI IGYPCMPR IGYPCNDX IGYPCNTL IGYPCPTR IGYPCTLS IGYPCXN IGYPDBUG IGYPDECL IGYPDELT IGYPDISP IGYPDVBB IGYPDVDE IGYPDVFF IGYPDVII IGYPDVSL IGYPERR IGYPEVAL IGYPEXPO IGYPEXSL IGYPFALF IGYPFDAT IGYPFLIB IGYPFMOR IGYPFMTH IGYPFNUM IGYPFRDM IGYPFSAM IGYPFUNC IGYPFUNI IGYPGNT IGYPGPFM IGYPINIT IGYPINI2 IGYPINSP IGYPINVK IGYPIOCM IGYPIPI IGYPLINK IGYPMAA IGYPMAAE IGYPMBB IGYPMBD IGYPMDB IGYPMEE IGYPMEI IGYPMERG IGYPMFF IGYPMFX IGYPMGX IGYPMHX IGYPMID IGYPMLND IGYPMNEN IGYPMNNE IGYPMOVE IGYPMQX IGYPMTHI IGYPMUNE IGYPMVV IGYPMVX IGYPMXF IGYPMXG IGYPMXH IGYPMXN IGYPMXQ IGYPMXV IGYPMZND IGYPNATC IGYPON IGYPOPCL IGYPREAD IGYPREWR IGYPSBSC IGYPSET IGYPSORT IGYPSRCH IGYPSRTM IGYPSRVE IGYPSTNG IGYPSTOR IGYPSTRT IGYPTEXT IGYPTIBB IGYPTIFF IGYPTIII IGYPTIMS IGYPTISL IGYPTMGT IGYPTSMG IGYPUCP IGYPUNST IGYPUSE IGYPVALU IGYPWRIT IGYPXGF IGYPXLDD IGYPXPS IGYQCNRD IGYQCNTL IGYQMETA IGYQPR01 IGYQPR02 IGYQPR03 IGYQPR04 IGYQPR05 IGYQPR06 IGYQPR07 IGYQPR08 IGYQPR09 IGYQPR10 IGYQPR11 IGYQPR12 IGYQPR13 IGYQPR14 IGYQPR15 IGYRABRT IGYRBECB IGYRCBSU IGYRCNTL IGYRNATC IGYRPCER IGYRSRVE IGYSADAT IGYSCBL IGYSCICS IGYSCNTL IGYSERR IGYSITEM IGYSJAVA IGYSMETA IGYSNATC IGYSPARS IGYSPR01 IGYSREAD IGYSSQL IGYSTERM IGYSTPUT IGYTALIA IGYTCICS IGYTCNTL IGYTDICT IGYTIMS IGYTIMS1 IGYTIMS2 IGYTMWTR IGYTPUTE IGYTSMGT IGYTSQL IGYTSQL1 IGYTSQL2 IGYTTMAP IGYTTMGT IGYVCNTL IGYVPIPI IGYVSRVE IGYWADSP IGYWCNTL IGYWDBG1 IGYWDBUG IGYWINIT IGYWSYM IGYXACCM IGYXADAT IGYXCNTL IGYXPRNT IGYXPRN2 IGYXSORT IGYXVREF IGY0CNTL IGY1CNTL IGY1CTXT IGY1ETRC IGY1ETXT IGY1FMAT IGY1FTRC IGY1HTRC IGY1ITXT IGY1LTRC IGY1LTXT IGY1MTRC IGY1MTXT IGY1PFLG IGY1PTRC IGY1SNAP IGY1STRC IGY1TERR IGY1TFLD IGY1TRCE IGY1TXLN IGY1WCOD IGY1WTRC IGY1XBCD IGY1XTRC IGY8RWTU
Fix information
Fixed component name
ENT COBOL FOR Z
Fixed component ID
5655W3200
Applicable component levels
R510 PSY UI41798
UP16/10/26 P F610
R511 PSY UI41799
UP16/10/26 P F610
R512 PSY UI41801
UP16/10/26 P F610
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":"510","Edition":"","Line of Business":{"code":"LOB17","label":"Mainframe TPS"}},{"Business Unit":{"code":"BU054","label":"Systems w\/TPS"},"Product":{"code":"SG19M","label":"APARs - z\/OS environment"},"Component":"","ARM Category":[],"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"510","Edition":"","Line of Business":{"code":"","label":""}}]
Document Information
Modified date:
25 November 2016