PI07555: CSLULGTP RETURN IMSRC=01000000X FOR SCI ERRORS

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• When CSLULGTP returned imsrc= 01000000X for SCI errors, the
  stem.ctl.rc and stem.ctl.rsn variables were not set neither.
  

Local fix

Problem summary

• ****************************************************************
  * USERS AFFECTED: All IMS V13 Users of CSLULGTP that receive   *
  *                 a SCI error return/reason code like no       *
  *                 OM address space.                            *
  ****************************************************************
  * PROBLEM DESCRIPTION: Command errors that result in a SCI     *
  *                      error return and reason code            *
  *                      (rc='0100000n'x) are not being          *
  *                      returned in the stem variables          *
  *                      stem.ctl.rsn and stem.ctl.rc.           *
  ****************************************************************
  * RECOMMENDATION: INSTALL CORRECTIVE SERVICE FOR APAR/PTF      *
  ****************************************************************
  The command errors for any SCI error result in an error return
  code of high order byte of '01'x. For these errors the error
  return and reason code is not being returned in the stem
  variables stem.ctl.rc and stem.ctl.rsn.
  

Problem conclusion

• GEN:
  KEYWORDS:
  
  *** END IMS KEYWORDS ***
  Module:  CSLULDBX - compile only
  Module:  CSLULGTP
  
  The stem variables stem.ctl.rc and stem.ctl.rsn will now
  return error return code and reason code for SCI errors.
  
  
  Document Holdcard below.
  
  BOOK:  IMS Version 13
         System Programming APIs
  
  In Chapter 10. REXX SPOC API  environment with the CSL,
  under the heading 'CSLULGTP: retrieving command responses
  directly to a REXX stem variable',
  after the subheading 'Sample code for retrieving command
  responses using the CSLULGTP request',
  the following subheading and paragraph will be added:
  
  Handling errors when using the CSLULGTP function
  
  The CSLULGTP function will not set the "ctl.rc" and
  "ctl.rsn" stem variables if an error is encountered in
  the function itself.  It is therefore highly recommended
  that any REXX program using the CSLULGTP function first
  check the IMSRC and IMSREASON REXX variables before any
  other processing continues to determine if the function
  has completed successfully.
  
  If the IMSRC variable is non-zero, and the error was
  encountered in CSLULGTP itself, the value in IMSRC will
  begin with "08".  In this case, the "ctl.rc" and
  "ctl.rsn" stem variables are not set and no data is
  returned in the stem variables.
  
  The IMSRC and IMSREASON errors that can be returned
  are documented in the macro CSLUXRR.
  
  For other errors (where the IMSRC is non-zero and does
  not begin with "08") the "ctl.rc" and "ctl.rsn" stem
  variables will contain the command return code and reason
  code and some of the other stem variables are set based on
  the command response.  For example, if an invalid verb was
  entered, there is no command response data returned, but
  the "ctl.rc" and "ctl.rsn" stem variables, as well as the
  REXX IMSRC and IMSREASON variables will be set.
  

Temporary fix

Comments

APAR Information

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

  PM99130

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

  UI16196

Modules/Macros

•    CSLULDBX CSLULGTP HMK1300J
  

Fix information

• Fixed component name

  IMS V13

• Fixed component ID

  5635A0400

Applicable component levels

• R300 PSY UI16196

     UP14/03/26 P F403

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.