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