SI41005 - RPGLE-CMPL-MSGMCH3601 %LEN(DS.SUBF:*MAX) WITH QUALIFIED SUBF

TYPE PROGRAM  REL  NUMBER   MIN/MAX  OPTION
---- -------- ---  -------  -------  ------
PRE  5770SS1  710  SI41000   00/00    0000



NOTICE:
-------
Application of this PTF may disable or render ineffective programs that
use system memory addresses not generated by the IBM translator,
including programs that circumvent control technology designed to limit
interactive capacity to purchased levels.  This PTF may be a prerequisite
for future PTFs.  By applying this PTF you authorize and agree to the
foregoing.

This PTF is subject to the terms of the license agreement which
accompanied, or was contained in, the Program for which you are obtaining
the PTF.  You are not authorized to install or use the PTF except as part
of a Program for which you have a valid Proof of Entitlement.

SUBJECT TO ANY WARRANTIES WHICH CAN NOT BE EXCLUDED OR EXCEPT AS EXPLICITLY
AGREED TO IN THE APPLICABLE LICENSE AGREEMENT OR AN APPLICABLE SUPPORT
AGREEMENT, IBM MAKES NO WARRANTIES OR CONDITIONS EITHER EXPRESS OR IMPLIED,
INCLUDING BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OR CONDITIONS OF
MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE, AND NON INFRINGEMENT,
REGARDING THE PTF.

The applicable license agreement may have been provided to you in printed
form and/or may be viewed using the Work with Software Agreements (WRKSFWAGR)
CL command.





APAR Error Description / Circumvention

-----------------------------------------------
Compiling an ILE RPG program may fail with msgMCH3601 when
%LEN(DS.SUBF:*MAX) is used with a qualified data structure
subfield.

CORRECTION FOR APAR SE44055 :
-----------------------------
The ILE RPG compiler will be changed such that msgMCH3601 is not
issued when compiling a program that has %LEN(DS.SUBF:*MAX) used
with a qualified data structure subfield.

CIRCUMVENTION FOR APAR SE44055 :
--------------------------------
Define a named constant with %LEN(DS.SUBF:*MAX).

If it is a complex qualified name with more than two levels,
for example DS.SUBDS.SUBF, then use %LEN(OTHER.SUBF:*MAX),
where "OTHER" is the data structure used in the LIKEDS keyword
that defined the SUBDS data structure subfield.


DESCRIPTION OF PROBLEM FIXED FOR APAR SE44538 :
-----------------------------------------------
This APAR addresses the V7.1 support for the following version
6 APARs:
SE41799
RPGLE-CMPL-MSGRNF5413 RETURN STATEMENT MISSING RETURN VALUE
SE42052
RPGLE-CMPL-INCORROUT SEVERITY 50 MESSAGE NOT IN COMPILE LISTING
WHEN SOURCE CONTAINS COMPILE TIME ARRAY DATA.

Addition Symptom Corrected:
RPGLE-RUN-MSGCEE0808 for %ALLOC with OPTIMIZE(*FULL)
The %ALLOC and %REALLOC built-in functions may fail
if the module is compiled with optimization.

To circumvent this problem, add keyword ALLOC(*SNGLVL)
to the H specification.

CORRECTION FOR APAR SE44538 :
-----------------------------
The ILE RPG compiler will be changed to correct the listed
problems.

CIRCUMVENTION FOR APAR SE44538 :
--------------------------------
None.


DESCRIPTION OF PROBLEM FIXED FOR APAR SE44327 :
-----------------------------------------------
The PTF for this APAR provides several corrections and updates
related to Open-Access files:

1. Date, time, and timestamp fields were not handled correctly
in name-value information for the EXFMT operation and for
subfile operations.

2. The status of the file is not set to 11 when an input
operation reaches end-of-file.

3. Support for closing static files when the activation group
ends or when a secondary thread ends.

When a static file is still open when the activation group
ends or when the secondary thread ends, the Open-Access
handler will be called to close the file.

Please note that another PTF will be necessary at
runtime on the system where the RPG program is run.

4. Support for the COMMIT keyword

The new "commit" subfield in the Open-Access data structure
will have a value of '1' if the file is defined with the
COMMIT keyword, or if the file is defined with COMMIT(ind)
and the indicator field has a value of '1' when the file is
opened.  If the COMMIT keyword is not specified, the "commit"
subfield will have a value of zero.

5. Support for the SLN keyword

The new "sln" subfield in the Open-Access data structure
will have the value of the variable specified by the
SLN keyword in the RPG program.  If the SLN keyword is
not specified, the new "sln" subfield will have a value
of zero.

CORRECTION FOR APAR SE44327 :
-----------------------------
The ILE RPG compiler will be changed to correct the problems
related to the end-of-file status and the date, time, and
timestamp functions; to add the new support for the COMMIT and
SLN keywords; and to enable the Open-Access handler to be called
to close a static file when the activation group or secondary
thread is ended.

Please note the following:

1. An additional PTF is needed at runtime to provide
the following new RPG runtime functions related to closing
static Open-Access files.
_QRNX_REG_THD_CNL
_QRNX_CLOSE_OA_STATIC

2. PTF SI40621 for product 5733-OAR provides the new subfields
in the Open-Access copy files.  That PTF is not needed to
compile RPG programs; it is only needed when writing code
for a handler that is interested in the "commit" and "sln"
subfields.

CIRCUMVENTION FOR APAR SE44327 :
--------------------------------
None.


Activation Instructions


None.


Special Instructions


None.


Default Instructions

THIS PTF CAN BE APPLIED IMMEDIATE OR DELAYED.



Supersedes

PTF/FIX NO(S).  APAR TITLE LINE
--------------  ------------------------------------------------------------
   SI40657      RPGLE-CMPL-MSGMCH4227-RC7 COMPILING A SUBPROCEDURE W/O PROTO
   SI38772      RPGLE-CMPL-INCORROUT SEVERAL PROBLEMS FIXED
   SI33776      RPGLE-CMPL-INCORROUT SEVERAL PROBLEMS FIXED

Summary Information

System i Support