A fix is available
APAR status
Closed as program error.
Error description
Duplicate Cobol field names generated by DFHJS2LS are suffixed with one or two numbers making them unique which is not always desired. For example the following json schema { "type": "object", "properties": { "topElementA": { "type": "object", "properties": { "foo": { "type": "string" } } }, "topElementB": { "type": "object", "properties": { "foo": { "type": "string" } } } } } generates 06 topElementA2-num PIC S9(9) COMP-5 SYNC. 06 topElementA. 09 foo-num PIC S9(9) COMP-5 SYNC. 09 foo PIC X(80). 06 topElementB2-num PIC S9(9) COMP-5 SYNC. 06 topElementB. 09 foo2-num PIC S9(9) COMP-5 SYNC. 09 foo2 PIC X(80). Here the two foo fields could be referenced using their parent fields so the "2" suffixes are unnecessary.
Local fix
Problem summary
**************************************************************** * USERS AFFECTED: All users of the CICS JSON assistant utility * * program DFHJS2LS * **************************************************************** * PROBLEM DESCRIPTION: Duplicate fields are suffixed with one * * to two numeric digits * **************************************************************** Duplicate Cobol field names generated by DFHJS2LS are suffixed with one or two numbers making them unique which is not always desired.
Problem conclusion
The code in DFHJS2LS has been changed to not add the suffixes when the value MAPPING-OVERRIDES=NO-ARRAY-NAME-INDEXING is provided as input to the utility. The CICS Transaction Server for z/OS 5.3.0 and 5.4.0 Knowledge Centres will be altered as follows. In Developing applications > Developing web services The description for the "NO-ARRAY-NAME-INDEXING" option of the MAPPING-OVERRIDES input parameter has been updated to read " For COBOL and Enterprise PL/I only. Ensures that the field names within an array are unique only within the scope of the higher level structure." for the following high level language conversions. > Creating a JSON web service > The CICS JSON assistant > DFHJS2LS: JSON schema to high-level language conversion for request-response services > Creating a SOAP web service > The CICS web services assistant > DFHWS2LS: WSDL to high-level language conversion > Mapping and transforming application data and XML > The CICS XML assistant > DFHSC2LS: XML schema to high-level language conversion Also in Developing applications > Developing web services One of the rules laid out for the schema to COBOL or PLI mappings will be updated to read "Duplicate names in the same scope are made unique by the addition of one or two numeric digits to the second and subsequent instances of the name. For example, three instances of year become year, year1, and year2. Should the above behavior be undesirable the user can specify MAPPING-OVERRIDES=NO-ARRAY-NAME-INDEXING as input to the utility which disables the addition of one or two numeric digits to the second and subsequent instances of the name." The mappings and rules that will be updated are as follows: > Creating a JSON web service > The CICS JSON assistant > High-level language and JSON schema mapping > JSON schema to COBOL mapping Rule 4 > Creating a JSON web service > The CICS JSON assistant > High-level language and JSON schema mapping > JSON schema to PL/I mapping Rule 2 > Mapping and transforming application data and XML>The CICS XML assistant>High-level language and XML schema mapping>XML schema to COBOL mapping Rule 5 > Mapping and transforming application data and XML>The CICS XML assistant>High-level language and XML schema mapping>XML schema to PL/I mapping Rule 3
Temporary fix
Comments
APAR Information
APAR number
PI97925
Reported component name
CICS TS Z/OS V5
Reported component ID
5655Y0400
Reported release
000
Status
CLOSED PER
PE
NoPE
HIPER
NoHIPER
Special Attention
NoSpecatt / Xsystem
Submitted date
2018-05-14
Closed date
2018-10-17
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:
UI59166 UI59167
Modules/Macros
DFJ@H176
Fix information
Fixed component name
CICS TS Z/OS V5
Fixed component ID
5655Y0400
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":"BU058","label":"IBM Infrastructure w\/TPS"},"Product":{"code":"SSGMGV","label":"CICS Transaction Server"},"Component":"","ARM Category":[],"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"5.3","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":"5.3","Edition":"","Line of Business":{"code":"","label":""}}]
Document Information
Modified date:
01 November 2018