A fix is available
APAR status
Closed as program error.
Error description
Exception occurs using LEDATA verbexit in IPCS, when paging through COBOL environment information.
Local fix
Problem summary
**************************************************************** * USERS AFFECTED: Enterprise COBOL V5+ compiling and running * * programs that get an ABEND and then using * * IPCS to read the dump. * * * **************************************************************** * PROBLEM DESCRIPTION: ABEND while using IPCS: A S0C4 ABEND * * is issued when IPCS exit tries to read * * a dump where the size of control block * * expected by IPCS mismatches what is in * * the dump. This occurs when the dump is * * created by a version of the COBOL * * Runtime different than the version of * * IPCS. * * * **************************************************************** * RECOMMENDATION: Apply the provided PTF. * * * **************************************************************** The dump formatting logic in the IPCS module read an incorrect size of the COBPCB control block. FIXCAT keyword: COB0501T/K COB0502T/K COB0601T/K
Problem conclusion
The IPCS exit formatting logic has been fixed to reflect the correct size of the control blocks used in IPCS.
Temporary fix
Comments
APAR Information
APAR number
PI63534
Reported component name
LE ENT COBOL LI
Reported component ID
568819812
Reported release
790
Status
CLOSED PER
PE
NoPE
HIPER
NoHIPER
Special Attention
NoSpecatt / Xsystem
Submitted date
2016-06-02
Closed date
2016-06-24
Last modified date
2016-07-04
APAR is sysrouted FROM one or more of the following:
APAR is sysrouted TO one or more of the following:
PI64726 UI38932 UI38933
Modules/Macros
CEESG004 HLE77A0J HLE7790 IGZCER4 IGZCEV4 IGZLLIBV IGZXACP IGZXACS IGZXACS1 IGZXACS2 IGZXAIO IGZXALOC IGZXANE IGZXANE1 IGZXANE2 IGZXAPI IGZXAPS IGZXBIO IGZXBSP IGZXBSP1 IGZXBSP2 IGZXBSP3 IGZXBSP4 IGZXBSP5 IGZXBST IGZXBST1 IGZXBST2 IGZXBST3 IGZXBST4 IGZXBST5 IGZXBS61 IGZXBU1L IGZXBU1P IGZXBU1R IGZXBU1S IGZXBU1V IGZXBU1W IGZXBU2R IGZXBU2V IGZXCANC IGZXCDT IGZXCFIG IGZXCKP IGZXCLDB IGZXCLKA IGZXCLN IGZXCLS IGZXCMSG IGZXCRST IGZXDACS IGZXDASN IGZXDATE IGZXDATN IGZXDAYS IGZXDCAL IGZXDCOS IGZXDCSU IGZXDCS2 IGZXDLG1 IGZXDLOG IGZXDMOD IGZXDMR IGZXDMSG IGZXDSIN IGZXDSP IGZXDSQT IGZXDTAN IGZXDYWK IGZXD2F IGZXD24 IGZXEXT IGZXE2E IGZXE2EN IGZXE2H IGZXE2N IGZXE2N2 IGZXFAC IGZXFCAL IGZXFPC1 IGZXFPW IGZXFREE IGZXFRST IGZXFWSA IGZXF2D IGZXF2D1 IGZXF2I IGZXGDR0 IGZXGDR1 IGZXGDR2 IGZXGFI IGZXGMTO IGZXGTST IGZXH2E IGZXIDB IGZXII2 IGZXINSP IGZXJGF IGZXLCLS IGZXLOCT IGZXLOPN IGZXLPIO IGZXLPKA IGZXLPKB IGZXLPKC IGZXLPKD IGZXLPKE IGZXLPKF IGZXLPKG IGZXMED IGZXMEDQ IGZXMFIG IGZXMSG IGZXNE2N IGZXNMV IGZXNMVC IGZXNMVQ IGZXNVCQ IGZXPK2 IGZXPPL IGZXPRC IGZXPRS IGZXPRV IGZXPRVQ IGZXPR2 IGZXQACS IGZXQASN IGZXQATN IGZXQCLS IGZXQCOS IGZXQLG1 IGZXQLOG IGZXQMOD IGZXQOPN IGZXQSIN IGZXQSQT IGZXQTAN IGZXQXPQ IGZXRAND IGZXRAS1 IGZXRAS2 IGZXRAS4 IGZXRAS5 IGZXRAS6 IGZXRAS7 IGZXRAS8 IGZXRAS9 IGZXRES1 IGZXRES2 IGZXRES3 IGZXRES4 IGZXRES5 IGZXRES6 IGZXRES7 IGZXRES8 IGZXRES9 IGZXREV IGZXREVU IGZXRTN IGZXRT1 IGZXSCC1 IGZXSCC2 IGZXSCH IGZXSGL IGZXSMSG IGZXSM0 IGZXSM1 IGZXSM2 IGZXSM3 IGZXSM4 IGZXSM5 IGZXSM6 IGZXSPA IGZXSRT IGZXSRV IGZXSTD IGZXSTDQ IGZXSTG IGZXSXPQ IGZXTREC IGZXTREN IGZXTRM IGZXUCP IGZXUNCQ IGZXUNE IGZXUNMV IGZXUNVC IGZXUNVQ IGZXUST IGZXUST2 IGZXVAR IGZXVARQ IGZXVCLS IGZXVMO IGZXVOPN IGZXXDI IGZXXDI0 IGZXXGF IGZXXML IGZXXMU IGZXXMU0 IGZXXMU2 IGZXXPR IGZXXPS IGZX2LW IGZX2LWU IGZX2UP IGZX2UPU
Fix information
Fixed component name
LE ENT COBOL LI
Fixed component ID
568819812
Applicable component levels
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":"BU054","label":"Systems w\/TPS"},"Product":{"code":"SSCVR7X","label":"Runtime"},"Platform":[{"code":"PF025","label":"Platform Independent"}],"Line of Business":{"code":"","label":""}}]
Document Information
Modified date:
14 December 2020