PK27986: EXEC CICS INVOKE WEBSERVICE, THE OPERATION(DATA-AREA) LENGTH IS 160 BYTES RATHER THAN 255 BYTES

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• exec cics invoke webservice('getNetname')
  channel('mychannel')
       operation('PZ82WSOperation')
       end-exec
  
  The manual states that OPERATION(data-area) parameter should be
  255characters, padded with trailing blanks. However looking at
  the OPERATION parameter address in EDF it appears that this is
  160 bytes long. this is only occurring in cobol translator.
  

Local fix

Problem summary

• ****************************************************************
  * USERS AFFECTED: All                                          *
  ****************************************************************
  * PROBLEM DESCRIPTION: EXEC CICS INVOKE WEBSERVICE fails with  *
  *                      a response of NOTFND.                   *
  ****************************************************************
  * RECOMMENDATION:                                              *
  ****************************************************************
  The CICS translator module DFHECMAC analyzes the arguments for
  EXEC CICS calls. When a literal is encountered, the literal is
  expanded to the length of the expected data, up to 160 bytes
  which is the maximum length of a literal in a COBOL program.
  Some of the operands for the EXEC CICS INVOKE WEBSERVICE command
  have a maximum length of 255 bytes. When the application is
  executed the full 255 bytes of data is referenced and residual
  data may be encountered. This may lead to a response of
  NOTFND or INVREQ, or other unpredictable results may occur.
  Additional keywords: COBOL2 COBOL3 OPERATION URI AEIP abendAEIP
                      AEIM abendAEIM RESP EIBRESP
  

Problem conclusion

• DFHEXMTD will create a temporary variable for any field which is
  longer than 160 characters if the COBOL3 compiler option is set.
  When DFHECMAC encounters a literal value for a field longer than
  160 characters then the literal is copied to the temporary
  variable defined by DFHEXMTD and this is passed by reference
  on the DFHENTRY call, all other fields are passed by content in
  a literal which is right padded with blanks to the correct
  length.
  

Temporary fix

• FIX AVAILABLE BY PTF ONLY
  

Comments

• ž**** PE06/11/29 FIX IN ERROR. SEE APAR PK35289  FOR DESCRIPTION
  

APAR Information

• APAR is sysrouted FROM one or more of the following:

• APAR is sysrouted TO one or more of the following:

  UK19817

Modules/Macros

•    DFHECMAC DFHEXMTD
  

Fix information

• Fixed component name

  CICSTS 3.1 Z/OS

• Fixed component ID

  5655M1500

Applicable component levels

• R400 PSY UK19817

     UP06/11/21 P F611

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.