A fix is available
APAR status
Closed as new function.
Error description
Add COBOL 31 digit support for DFHWS2LS. COBOL compiler option ARITH(EXTEND).
Local fix
n/a
Problem summary
**************************************************************** * USERS AFFECTED: All CICS users. * **************************************************************** * PROBLEM DESCRIPTION: DFHWS2LS limits the number of digits * * in a COBOL packed decimal field to 18. * **************************************************************** * RECOMMENDATION: * **************************************************************** When using DFHWS2LS to generate a COBOL data structure from a WSDL document, the length of any packed decimal field (COMP-3) is restricted to 18 bytes. However, packed decimal fields may be up to 31 bytes long if the ARITH(EXTEND) compiler option is used. Additional keywords: xsd totalDigits value
Problem conclusion
Temporary fix
FIX AVAILABLE BY PTF ONLY
Comments
A new parameter WIDE-COMP3 has been added to DFHWS2LS. This parameter controls whether COBOL COMP-3 fields of length greater than 18 are permitted. If WIDE-COMP3=YES, DFHWS2LS will allow COBOL COMP-3 type fields with a length greater than 18, to a maximum of 31 digits. If WIDE-COMP3=NO, DFHWS2LS will continue to restrict COBOL COMP-3 fields to a maximum length of 18 and warning message DFHPI9022W will be issued. The CICS Transaction Server for z/OS Version 3 Release 2 Web Services Guide, SC34-6838-00, has been altered as follows: In Chapter 7. 'Creating the Web services infrastructure' in section 'DFHWS2LS: WSDL to high level language conversion' the following optional input parameter has been added to DFHWS2LS: +-WIDE-COMP3=NO--+ >--+----------------+--------------------------->< +-WIDE-COMP3=YES-+ WIDE-COMP3 = {NO | YES } For COBOL only. Controls the maximum size of the packed decimal variable length in the COBOL language structure. NO This is the default. DFHWS2LS limits the packed decimal variable length to 18 when generating the COBOL language structure type COMP-3. If the packed decimal size is greater than 18, message DFHPI9022W is issued which indicates that the specified type is being restricted to a total of 18 digits. YES DFHWS2LS supports the maximum size of 31 when generating the COBOL language structure type COMP-3.
APAR Information
APAR number
PM38347
Reported component name
CICSTS V3 Z/OS
Reported component ID
5655M1500
Reported release
500
Status
CLOSED UR1
PE
NoPE
HIPER
NoHIPER
Special Attention
NoSpecatt
Submitted date
2011-05-04
Closed date
2011-07-14
Last modified date
2011-08-01
APAR is sysrouted FROM one or more of the following:
APAR is sysrouted TO one or more of the following:
Modules/Macros
DFJ@H176 DFJ@H223
SC34683800 |
Fix information
Fixed component name
CICSTS V3 Z/OS
Fixed component ID
5655M1500
Applicable component levels
R50D PSY UK69797
UP11/07/24 P F107
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":"3.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":"3.2","Edition":"","Line of Business":{"code":"","label":""}}]
Document Information
Modified date:
01 August 2011