IBM Support

PM65783: RAS: REXX SPOC RECEIVE NEGATIVE RC FROM SCI

Subscribe

You can track all active APARs for this component.

 

APAR status

  • Closed as fixed if next.

Error description

  • When a type 2 command is issued via REXX SPOC, the CSL RC
    is passed to REXX for a special REXX variable RC.
    But this variable can only used for 24 bit numbers.
    As a result, the REXX program receive RC of 1677732
    =01000010x if the SCI is not available.
    The 1677732 violates the REXX rules and REXX interprets
    the big RC wrong and executes the FAILURE condition.
    .
    

Local fix

Problem summary

  • ****************************************************************
    * USERS AFFECTED: All IMS V11 users using the REXX SPOC API    *
    ****************************************************************
    * PROBLEM DESCRIPTION: The CSL return code value that SPOC     *
    *                      passes back to REXX for the special     *
    *                      REXX variable RC is invalid.            *
    ****************************************************************
    * RECOMMENDATION:                                              *
    ****************************************************************
    The REXX SPOC API passes the return code from a CSL request,
    without modification, back to REXX as its return code which
    is then placed in the REXX special variable RC.  The format
    of the CSL return code could result in a large number which
    is beyond the range allowed by REXX; REXX allows for 24-bit
    numeric return code values.  For example: a CSL return code
    of '01000010'x would be an RC of 1677732.
    
    When a large, out of range return code value is passed back
    to REXX, REXX interprets the value incorrectly and executes
    the FAILURE condition.
    
    IMS SPOC commands and the REXX SPOC API functions currently
    set additional REXX variables - IMSRC and IMSREASON - which
    are intended to contain the CSL request's return and reason
    code respectively.
    
    The value intended for the IMSRC REXX variable is also used
    for the return code to REXX which is incorrect.  The proper
    value to return is the right-most 24 bits of the CSL return
    code: '01000010'x would be '000010'x or 16.
    

Problem conclusion

Temporary fix

Comments

  • The customer has agreed to accept a fix for this problem in
    a future IMS release.  This will be tracked by PTM KFN0557.
    

APAR Information

  • APAR number

    PM65783

  • Reported component name

    IMS V11

  • Reported component ID

    5635A0200

  • Reported release

    100

  • Status

    CLOSED FIN

  • PE

    NoPE

  • HIPER

    NoHIPER

  • Special Attention

    NoSpecatt / Xsystem

  • Submitted date

    2012-05-29

  • Closed date

    2013-01-10

  • Last modified date

    2013-01-10

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

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

Fix information

Applicable component levels

  • R100 PSN

       UP

[{"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":"100","Edition":"","Line of Business":{"code":"","label":""}},{"Business Unit":{"code":"BU048","label":"IBM Software"},"Product":{"code":"SSCVRBJ","label":"System Services"},"Component":"","ARM Category":[],"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"100","Edition":"","Line of Business":{"code":"","label":""}}]

Document Information

Modified date:
10 January 2013