A fix is available
APAR status
Closed as program error.
Error description
Problem description We are using "SNA" printers and are using the printer facility of Personal Communication. We could NOT understand WHY the printing was rejected (when running Personal Communication). The printing is rejected with code "1003". We have now analysed the data and this are our findings ! The returncode 1003 is an indication from the emulator that "something" in the datastream is in error (Sense 1003 indicates function not supported)... So, by printing different data and analyzing the datastream, we have found that CICS is producing and INCORRECT 3270 datastream. This error is trigged when we installed and started to use the CICS BMS exit. When a "map" contains the keyword "VALIDN=USEREXIT", CICS starts to create data that is in violation with how a 3270 datastream is to be built. PLEASE note that the error IS NOT trigged when you send directly to a terminal. But, when you communicate with a "3270 PRINTER" by building a datastream from a SEND MAP using "MAPPINGDEV", there is an error !!!!!!
Local fix
remove "VALIDN=USEREXIT" from your BMS MAP.
Problem summary
**************************************************************** * USERS AFFECTED: All CICS users. * **************************************************************** * PROBLEM DESCRIPTION: VALIDN=USEREXIT and SEND MAP with * * MAPPINGDEV creates incorrect 3270 data * * stream. * **************************************************************** * RECOMMENDATION: * **************************************************************** A BMS map has a field defined with VALIDN=USEREXIT to indicate that the BMS Global User Exit (XBMIN/XBMOUT) should be called for this field. An application using this map issues the following command: . EXEC CICS SEND MAP('mapname') MAPONLY MAPPINGDEV('name') SET(n) . so that a 3270 data stream is built and saved in storage pointed to by register n, to be send later to the MAPPINGDEV, which in this case is a PComm printer. To record the fact that VALIDN=USEREXIT was specified for one of the fields, and that the BMS user exit should be called, CICS sets an internal flag of x'80' in the validation attribute byte for the field. BMS module DFHMCY is called to handle the MAPPINGDEV SEND and tests if the field validation attribute byte is non-zero, if it is then a field validation sequence is inserted into the 3270 data stream being built. In the reported problem the field validation attribute byte is x'80' so a x'C180' sequence is inserted into the data stream. This sequence is invalid as the x'80' bit of a field validation attribute byte is reserved. Consequently when the 3270 data steam is sent to the MAPPINGDEV it is rejected with SENSE1003 'function not supported'. Additional keywords: SENSE 1003 SNS1003 SNS
Problem conclusion
DFHMCY has been changed for a SEND with MAPPINGDEV so that if the field validation attribute contains no valid bit settings, the field validation sequence will not be inserted into the 3270 data stream.
Temporary fix
FIX AVAILABLE BY PTF ONLY
Comments
APAR Information
APAR number
PM67169
Reported component name
CICS TS Z/OS V4
Reported component ID
5655S9700
Reported release
700
Status
CLOSED PER
PE
NoPE
HIPER
NoHIPER
Special Attention
NoSpecatt
Submitted date
2012-06-19
Closed date
2012-08-17
Last modified date
2012-09-05
APAR is sysrouted FROM one or more of the following:
APAR is sysrouted TO one or more of the following:
UK81210
Modules/Macros
DFHMCY
Fix information
Fixed component name
CICS TS Z/OS V4
Fixed component ID
5655S9700
Applicable component levels
R700 PSY UK81210
UP12/08/24 P F208
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"},"Component":"","ARM Category":[],"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"4.2","Edition":"","Line of Business":{"code":"LOB35","label":"Mainframe SW"}},{"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":"4.2","Edition":"","Line of Business":{"code":"","label":""}}]
Document Information
Modified date:
05 September 2012