PK50346: SENDING EXEC CICS WEB SEND IMMEDIATE FROM() FROMLENGTH() (NON- HTTP) RESULT'S IN DFHWB0001 CODE 0C4/AKEA AT X'45EC' IN DFHWBAP.

Obtain the fix for this APAR.

APAR status

• Closed as unreproducible.

Error description

• Trying to have DFHWBEP issue EXEC CICS WEB SEND IMMEDIATE FROM()
  FROMLENGTH() without any of the codepage options.  DFHWBEP then
  needs to set WBEP_RESPONSE_LEN to 0 to ensure that no more data
  is sent.
  .
  However, this result's in a program check on the WEB SEND
  IMMEDIATE command. This is due to a failure to set DFHSOCK_PTR
  to address SOCK_PARMS prior to setting sock_response in refstep
  wbrq_send_immediate_or_eventual.  This will affect any WEB SEND
  IMMEDIATE from a non-HTTP server application (HTTP SENDs work OK
  as we have by this time send the HTTP headers and set
  DFHSOCK_PTR earlier on)."
  .
  This result's in the following message:
  .
  DFHWB0001 applidxx An abend (code 0C4/AKEA) has occurred at
  offset x'45EC' in module DFHWBAP.
  

Local fix

Problem summary

• ****************************************************************
  * USERS AFFECTED: All.                                         *
  ****************************************************************
  * PROBLEM DESCRIPTION: MSGDFHWB0001 after ABEND0C4 in DFHWBAP  *
  *                      when processing EXEC CICS WEB SEND      *
  *                      IMMEDIATE command.                      *
  ****************************************************************
  * RECOMMENDATION:                                              *
  ****************************************************************
  A TCPIPSERVICE defined with PROTOCOL(USER) is used to receive a
  non-HTTP request into CICS. If the attached task issues EXEC
  CICS WEB SEND IMMEDIATE there is an ABENDS0C4 at offset X'45EC'
  into DFHWBAP. This occurs because code is attempting to
  initialize a socket parameter list field. The parameter list is
  not addressed at this point when sending a response from a
  non-HTTP server task. The code should be initializing a field in
  the local stack of DFHWBAP.
  If EXEC CICS WEB SEND IMMEDIATE is issued by a task processing
  an HTTP request there is no program check. However, the failure
  to initialize the correct field can lead to an ABENDAEXZ which
  gets converted to an ABENDAWBM. This is likely to occur if there
  is no HTTP response body present on the EXEC CICS WEB SEND
  IMMEDIATE command.
  
  ADDITIONAL KEYWORDS :- AEXZ AWBM WB0001 DFHWB0001 SOC4 0C4
  

Problem conclusion

Temporary fix

• FIX AVAILABLE BY PTF ONLY
  

Comments

• DFHWBAP has been changed to initialize the correct field.
  

APAR Information

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

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

Modules/Macros

•    DESWBAP  DESWBDM  DESWBRQ  DESWBRQF DESWBSR
  DESWBXM  DFHWBAP  DFHWBAPF DFHWBDM  DFHWBRQS DFHWBSR  DFHWBXM
  

Fix information

• Fixed component name

  CICSTS V3 Z/OS

• Fixed component ID

  5655M1500

Applicable component levels

• R400 PSY UK29262

     UP07/09/21 P F709

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.