IBM Support

II09532: DOC ERRORS FOR PL/I FOR VSE PROGRAMMING GUIDE SC26-8053-00 SC26805300

Subscribe to this APAR

By subscribing, you receive periodic emails alerting you to the status of the APAR, along with a link to the fix after it becomes available. You can track this item individually or track all items by product.

Notify me when this APAR changes.

Notify me when an APAR for this component changes.

 

APAR status

  • INTRAN

Error description

  • 568606900 18H R18H 18P R18P
    Page 13, under LINECOUNT, change description of 'n' to read -
    ----------------------------------------------------------------
    n is the number of lines. It must be in the range 1 through
      32,767, but any number below 10 will default to LINECOUNT(55).
      When you specify less than 100, the static internal storage
      map and the object listing are printed in double column
      format. Otherwise, they are printed in single column format.
    ---------------------------------------------------------------
    Pages 204 - 219
    The sample application beginning at the heading -
    'Sample facility 3: Analyzing CPU-time Usage' on page 204 and
    continuing through page 219 will not work under VSE/ESA
    Version 2.
    This is due to the removal from VSE/ESA Version 2 of the macros
    TESTT and SETT.
    CPU-time usage may be obtained through use of the GETJA macro
    or the GETFLD FIELD=CPUTIME macro.
    
    Page 51 - Add the following section before the "CICS
    considerations" section.
    
    ________________________________________________________________
    Date and Time considerations
    
    Use DATETIME built-in function instead of DATE if a four digit
    year date is required.
    
    MLE features available in PL/I can also be used to convert
    two digit year dates. The  PL/I MLE for VSE/ESA product
    must be installed before MLE features can be used.
    (Program Number 5686-MLX). Refer to the PL/I
    MLE Guide (GC26-9324-01), and the PL/I MLE for VSE/ESA
    Installation and Customization Guide (SC26-8057-01) for more
    details.
    ______________________________________________________________
    To read and update a VSAM KSDS record and at the same time
    change its record length, the following method may be used.
    In this example, a record of any size (to a maximum of 120
    bytes) is read, and rewritten with a new record length of 100.
    ----------------------------------------------------------
     DCL F33001 FILE RECORD KEYED UPDATE ENV(VSAM);
     DCL 1 F33001_REC                        CHAR(120) VARYING;
     DCL 1 F33001_REC_REDEF         BASED(ADDR(F33001_REC)),
                3 F33001_RECLENG           FIXED BIN(15);
     READ         FILE(F33001) INTO   (F33001_REC);
     F33001_RECLENG=100;
     REWRITE  FILE(F33001) FROM (F33001_REC);
    ----------------------------------------------------------
    

Local fix

  • PLIRETC and PLIRETV Return Code (RC) handling with Register 15.
    ---------------------------------------------------------------
    PLIRETC documentation implies that the RC is loaded into R15
    and is returned to the caller. This is not so.
    The use of 'return code' in the documentation is intended to
    mean the PL/I return code, rather than the system return code,
    which by convention, is returned in Register 15.
    To force the RC that was previously set by PLIRETC to be loaded
    into R15, a subsequent PLIRETV(); may be used. The PLIRETV();
    stmt must appear immediately before the statement that returns
    to the caller, e.g:
    DCL J FIXED BIN(15,0);
    CALL PLIRETC(73); /* sets RC=73                              */
    ........          /* subsequent PL/I stmts                   */
    J=PLIRETV();      /* retrieves the current setting of the RC */
    RETURN;           /* and returns to the caller with R15=73   */
    
    ________________________________________________________________
    
    PL/I for VSE Compiler Documenation for Multitasking support
    can be found at the following link to the LE page:
    http://www-03.ibm.com/systems/z/os/zvse/products/languages.html#
    le
    Alternatively, you can use the direct FTP link to the PDF:
    ftp://public.dhe.ibm.com/eserver/zseries/zos/vse/pdf3/PLI_multit
    asking-MK2.pdf
    

Problem summary

Problem conclusion

Temporary fix

Comments

APAR Information

  • APAR number

    II09532

  • Reported component name

    PA LIB INFO ITE

  • Reported component ID

    INFOPALIB

  • Reported release

    001

  • Status

    INTRAN

  • PE

    NoPE

  • HIPER

    NoHIPER

  • Special Attention

    NoSpecatt / Xsystem

  • Submitted date

    1996-07-01

  • Closed date

  • Last modified date

    2010-12-06

  • 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

[{"Business Unit":{"code":"BU054","label":"Systems w\/TPS"},"Product":{"code":"SG19N","label":"APARs - OS\/390 environment"},"Component":"","ARM Category":[],"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"001","Edition":"","Line of Business":{"code":"","label":""}},{"Business Unit":{"code":"BU054","label":"Systems w\/TPS"},"Product":{"code":"SG32M","label":"APARs - VSE\/ESA environment"},"Component":"","ARM Category":[],"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"001","Edition":"","Line of Business":{"code":"","label":""}},{"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":"001","Edition":"","Line of Business":{"code":"","label":""}},{"Business Unit":{"code":null,"label":null},"Product":{"code":"SG19O","label":"APARs - MVS environment"},"Component":"","ARM Category":[],"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"001","Edition":"","Line of Business":{"code":"","label":""}},{"Business Unit":{"code":"BU054","label":"Systems w\/TPS"},"Product":{"code":"SSSN3L","label":"z\/OS Communications Server"},"Component":"","ARM Category":[],"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"001","Edition":"","Line of Business":{"code":"LOB35","label":"Mainframe SW"}},{"Business Unit":{"code":"BU054","label":"Systems w\/TPS"},"Product":{"code":"SG27M","label":"APARs - z\/VM environment"},"Component":"","ARM Category":[],"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"001","Edition":"","Line of Business":{"code":"LOB16","label":"Mainframe HW"}}]

Document Information

Modified date:
06 December 2010