IBM Support

PK99622: CICS/REXX EXPORT COMMAND CREATING CORRUPT MEMBERS

A fix is available

Subscribe

You can track all active APARs for this component.

 

APAR status

  • Closed as program error.

Error description

  • When using the CICS/Rexx support's "EXPORT" command to export a
    CICS/Rexx RFS based file to a VSE Library Member the target VSE
    library member can become corrupt. This appears to only happen
    if the source RFS file contains blank lines.
    KIXREVBDB
    

Local fix

Problem summary

  • ****************************************************************
    * USERS AFFECTED: All CICS users.                              *
    ****************************************************************
    * PROBLEM DESCRIPTION: Using Rexx EXPORT with a RFS file       *
    *                      that contains blank lines will          *
    *                      store corrupt data in the output        *
    *                      library member.                         *
    ****************************************************************
    * RECOMMENDATION:                                              *
    ****************************************************************
    CICLIBW does not allow for the case where an RFS record
    only contains spaces, moving incorrect data to the library
    record buffer and overlaying storage beyond the end of this
    buffer. This results in corrupt data being stored in the
    library member and a potential storage violation at task
    termination:
    
    DFHSM0102 applid A storage violation (code X'0F0C') has been
    detected by module DFHSMAR .
    
    Additionally, it does not check that the RFS member record is
    greater than 80 bytes. In this case only the first 80 bytes
    are copied to the library member, and it overlays storage
    beyond the end of this buffer, again with a potential storage
    violation at task termination.
    
    Additional keywords: msgDFHSM0102 PK62423
    

Problem conclusion

  • CICLIBW has been changed to correctly create a blank line in
    the output library member from the input RFS blank line.
    
    In the case of the record being greater than 80 bytes, CICLIBW
    will cause the EXPORT to fail with return code 1741.
    
    The description for the EXPORT command in the CICS Transaction
    Server for VSE/ESA Rexx Guide (SC34-5764-00) will now read as
    follows:
    
    EXPORT
          EXPORT exports an RFS file to a VSE Librarian sublibrary
          member.
    
    The note that says that the RFS file must not contain blank
    lines has been removed.
    

Temporary fix

  • FIX AVAILABLE BY PTF ONLY
    

Comments

APAR Information

  • APAR number

    PK99622

  • Reported component name

    CICSTS FOR VSE

  • Reported component ID

    564805400

  • Reported release

    B0P

  • Status

    CLOSED PER

  • PE

    NoPE

  • HIPER

    NoHIPER

  • Special Attention

    NoSpecatt

  • Submitted date

    2009-10-27

  • Closed date

    2009-11-03

  • Last modified date

    2010-03-24

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

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

    UK51793

Modules/Macros

  •    CICLIBW
    

Publications Referenced
SC34576400    

Fix information

  • Fixed component name

    CICSTS FOR VSE

  • Fixed component ID

    564805400

Applicable component levels

  • RB0P PSY UK51793

       UP09/11/12 P E422

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":"BU011","label":"Systems - zSystems software"},"Product":{"code":"SSGMGV","label":"CICS Transaction Server"},"Component":"","ARM Category":[],"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"1.1.1","Edition":""}]

Document Information

Modified date:
24 March 2010