A fix is available
APAR status
Closed as program error.
Error description
In macro DFHCSAD the lowercase letters 'x' were introduced so error messages ASMA041E and ASMA158E occurred when assembling programs under setting COMPAT(CASE,SYSLIST). CSASTGFZ EQU x'20' .. storage freeze enabled CSAGTRAP EQU x'08' GTRAP invoked CSATRAP EQU x'04' TRAP invoked Additional Symptom(s) Search Keyword(s): KIXREVCHY DFHCSAD ASMA041E ASMA158E COMPAT(CASE)
Local fix
change CASE to NOCASE
Problem summary
**************************************************************** * USERS AFFECTED: All CICS Users. * **************************************************************** * PROBLEM DESCRIPTION: Assembly of DFHCSAD macro fails if * * HLASM option COMPAT(CASE) is specified. * **************************************************************** A CICS assembler program includes the DFHCSAD macro to generate a DFHCSADS DSECT. The assembly specifies the option COMPAT(CASE), which tells the assembler to prohibit the use of lower case characters in assembler statements. Some assembler statements in DFHCSAD macro have lower case characters. The assembler reports messages ASMA041E, ASMA158E, ASMA435I informing the programmer that an error has been detected. The assembly terminates with Return Code 08. Additional keywords: MSGASMA041E MSGASMA158E MSGASMA435I RC08 HLASM
Problem conclusion
The DFHCSAD macro has been changed to use only upper case characters in assembler directives.
Temporary fix
Comments
APAR Information
APAR number
PH23469
Reported component name
CICS TS Z/OS V5
Reported component ID
5655Y0400
Reported release
200
Status
CLOSED PER
PE
NoPE
HIPER
NoHIPER
Special Attention
NoSpecatt / Xsystem
Submitted date
2020-03-18
Closed date
2020-04-06
Last modified date
2020-05-02
APAR is sysrouted FROM one or more of the following:
APAR is sysrouted TO one or more of the following:
UI68830
Modules/Macros
DFHCSAD
Fix information
Fixed component name
CICS TS Z/OS V5
Fixed component ID
5655Y0400
Applicable component levels
R200 PSY UI68830
UP20/04/10 P F004
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":"SSGMGV","label":"CICS Transaction Server"},"Platform":[{"code":"PF025","label":"Platform Independent"}],"Line of Business":{"code":"LOB35","label":"Mainframe SW"}}]
Document Information
Modified date:
04 May 2020