A fix is available
APAR status
Closed as program error.
Error description
Symbol MSCDLEN1 MSCDLEN1 EQU *-DFSMSCD LENGTH OF DFSMSCD WITHOUT MSC inadvertently removed from DFSMSCD macro in IMS V14. DFSMSCD is customer facing, the ommission can cause assembly errors in customer code referencing it.
Local fix
Temporarily, customer can add EQU in own code: MSCDLEN1 EQU MSCDLLB-DFSMSCD
Problem summary
**************************************************************** * USERS AFFECTED: * * All IMS V14 MSC USERS REFER MSCDLEN1 IN THEIR EXIT. * **************************************************************** * PROBLEM DESCRIPTION: * * Symbol MSCDLEN1 was inadvertently removed from DFSMSCD macro * * in IMS V14. * * This might cause assembly error in customers' user exit. * **************************************************************** * RECOMMENDATION: * * INSTALL CORRECTIVE SERVICE FOR APAR/PTF * **************************************************************** In IMS V14, symbol MSCDLEN1 was inadvertently removed from DFSMSCD macro. This could cause assemble error if customers' exit used it .
Problem conclusion
Updated DFSMSCD macro to add MSCDLEN1 back.
Temporary fix
Comments
APAR Information
APAR number
PI97235
Reported component name
IMS V14
Reported component ID
5635A0500
Reported release
400
Status
CLOSED PER
PE
NoPE
HIPER
NoHIPER
Special Attention
NoSpecatt / Xsystem
Submitted date
2018-04-25
Closed date
2018-10-16
Last modified date
2018-11-01
APAR is sysrouted FROM one or more of the following:
APAR is sysrouted TO one or more of the following:
PH01187 UI59131
Modules/Macros
DFSMSCD
Fix information
Fixed component name
IMS V14
Fixed component ID
5635A0500
Applicable component levels
R400 PSY UI59131
UP18/10/19 P F810
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":"SSEPH2","label":"IMS"},"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"14.1","Line of Business":{"code":"LOB35","label":"Mainframe SW"}}]
Document Information
Modified date:
01 December 2023