PTF Cover Letter
PTF ( Program Temporary Fixes ) Cover letter
RPGLE-CMPL-INCORROUT NO SOURCE INFO MIXEDCASE SRCSTMF(/QSYS.
Pre/Co-Requisite PTF / Fix List
REQ LICENSED PTF/FIX LEVEL
TYPE PROGRAM REL NUMBER MIN/MAX OPTION
---- -------- --- ------- ------- ------
PRE 5770SS1 710 SI58913 00/00 0000
PRE 5770SS1 710 SI58107 00/00 0000
PRE 5770SS1 710 SI57877 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
-----------------------------------------------
A data structure LEVEL1 has a date, time, or timestamp subfield
with keyword INZ(*SYS), and another data structure LEVEL2 has a
subfield defined with keywords LIKEDS(LEVEL1) INZ(*LIKEDS).
A procedure has a parameter defined with keyword LIKEDS(LEVEL2).
When the procedure is called for the first time, the timestamp
in the nested data structure subfield of the parameter is set to
the current system value while the procedure is being called.
This modifies both the parameter within the procedure and the
variable that was passed to the subprocedure as a parameter.
This does not occur for subsequent calls to the procedure.
If the procedure is a cycle main procedure, the issue occurs
the first time the procedure is called, and each time the
procedure is called after LR was set on for the previous call.
The problem also exists for character subfields defined
with INZ(*USER).
CORRECTION FOR APAR SE64989 :
-----------------------------
The ILE RPG compiler will be changed so that if a data structure
DS1 has a subfield defined with INZ(*SYS) or INZ(*USER), the
special initialization values will not be used for any data
structure defined with LIKEDS(DS1) unless that data structure
has keyword INZ(*LIKEDS).
Note that this problem also affects non-parameter data
structures. The following example illustrates this:
dcl-ds ds1 qualified template;
sub1 char(10) inz(*user);
sub2 date inz(*sys);
end-ds;
dcl-ds ds2 qualified;
subds1 likeds(ds1) inz;
end-ds;
dcl-ds ds3 qualified;
subds2 likeds(ds1) inz;
end-ds;
Data structure DS2.DS1 is correctly initialized with
default initializations, but data structure DS3.DS2.DS1
is initialized with the special initializations from
the parent data structure DS1.
DS3.DS2.DS1.sub1 is initialized with the current user
DS3.DS2.DS1.sub2 is initialized with the current date
With this PTF, DS3.DS2.DS1 will be correctly initialized
with default initializations.
CIRCUMVENTION FOR APAR SE64989 :
--------------------------------
None.
DESCRIPTION OF PROBLEM FIXED FOR APAR SE64988 :
-----------------------------------------------
When the parameter for the SRCSTMF parameter for CRTRPGMOD or
CRTBNDRPG is in the form
'/QSYS.LIB/MYLIB.LIB/MYSRCFILE.FILE/MYMBR.MBR')
and the parameter is not entirely in upper case, DSPMOD does
not show that the module was compiled from file MYLIB/MYSRCFILE
member MYMBR.
If '/QSYS.LIB' is uppercase, and the remainder of the parameter
is not entirely uppercase, the compile may fail with msgRNS9311
RC 1.
CORRECTION FOR APAR SE64988 :
-----------------------------
The ILE RPG compiler will be changed so that the source library,
file, and member will be placed in the module if the SRCSTMF
parameter is in the form
'/qsys.lib/srclib.lib/srcfile.file/srcmbr.mbr'
and it is specified in all uppercase, all lowercase, or a
mixture of upper and lower case.
CIRCUMVENTION FOR APAR SE64988 :
--------------------------------
Specify the parameter for SRCSTMF with all uppercase.
Activation Instructions
None.
Special Instructions
None.
Default Instructions
THIS PTF CAN BE APPLIED IMMEDIATE OR DELAYED.
Supersedes
PTF/FIX NO(S). APAR TITLE LINE
-------------- ------------------------------------------------------------
SI60688 RPGLE-RUN REMOVING ENDFOR BREAKPOINT REMOVES WRONG BREAKPOIN
SI60688 RPGLE-RUN-INCORROUT %ELEM RETURNS 0 FOR SUBPROC INDICATOR AR
SI60688 RPGLE-RUN-INCORROUT DBGVIEW(*LIST) SHOWS EXTRA TEXT IN STRDB
SI60060 RPGLE-CMPL-MSGCPF3BC7 XML-INTO or XML-SAX IN CCSID 65535 SOU
SI59809 RPGLE-CMPL-MSGRNF5505 CRTSQLRPGI RPGPPOPT **FREE WITH /COPY
SI59809 RPGLE-CMPL-MSGRNF7544 RESET QUALIFIED MAIN ENTRY PARM SUBFIE
SI58914 RPGLE-CMPL-MSGRNF0224 XML-INTO XML-SAX WITH LITERAL OPTIONS
SI58914 RPGLE-CMPL-MSGMCH4227-RC12 *ZEROS PASSED TO CONST FLOAT PARM
SI58914 RPGLE-CMPL-INCORROUT /COPY IN **FREE CRTSQLRPGI+RPGPPOPT NOT
SI58914 RPGLE-CMPL-MSGMCH4227 CHGSRVPGM PRFDTA(*APYALL) KEYED I/O
SI58136 RPGLE-CMPL SUPPORT FREE-FORM FROM COLUMN 1 TO END OF LINE
SI57842 RPGLE-CMPL-MSGRNF5377 %DATE WITH NO PARMS FOLLOWED BY AND /
SI57842 RPGLE-CMPL-MSGRNF1250 MAIN PI WITHOUT EXTPGM WITH CRTBNDRPG
SI57842 RPGLE-CMPL-T/QRN4MAIN-MSGMCH3601 EVAL-CORR FOR UNDEFINED LIK
SI56638 RPGLE-CMPL-MSGMCH4229 RESET OF A DATA STRUCTURE ARRAY SUBFIE
SI56405 RPGLE-CMPL-INCORROUT PCML MISSING NAME TAG FOR UNNAMED MAIN
SI56405 RPGLE-CMPL-MSGRNS9311-RC1 PROC WITH SAME NAME AS GLOBAL SUBF
SI55987 RPGLE-CMPL-MSGRNF0202 %SIZE(DS) UNDEFINED FOR A FREEFORM KEY
SI55340 RPGLE-CMPL PCML USABILITY: MIXED CASE; PCML FOR ONLY SOME PR
SI55148 RPGLE-CMPL-MSGCPD5D02 %PADDR(PROC) WHEN PROC HAS NO PR OR PI
SI55148 RPGLE-RUN-INCORROUT BREAKPOINT LINE FOR DCL-PROC AND END-PRO
SI54502 RPGLE-CMPL ALIAS FOR FILES; RELAX RULES FOR I/O DATA STRUCTU
SI54502 RPGLE-CMPL-MSGMCH0602 MSGMCH0602 SQL FUNCTION RETURN *BLANKS
SI54103 RPGLE-CMPL-MSGRNF3320 FREE-FORM KEYWORD IN SUBPROC WITH GLOB
SI54103 RPGLE-CMPL-MSGRNF7062 MESSAGE MSGRNF7062 IS NOT BEING FLAGGE
SI53610 RPGLE-CMPL-MSGMCH3203 EXTPGM FOR A NON-MAIN SUBPROCEDURE
SI53610 RPGLE-CMPL-MSGMCH4216 CONCATENATION EXPRESSION PASSED TO CON
SI53610 RPGLE-CMPL-MSGRNF0267 CONTINUED LITERAL WITH CRTSQLRPGI RPGP
SI52846 RPGLE-RUN-MSGMCH1202 MCH1202 FOR SUBDUR(E) WITH INVALID
SI52846 RPGLE-CMPL-INCORROUT DTAARA(*VAR:FLD) DOES NOT CAUSE A READ
SI52846 RPGLE-CMPL-MSGRNF0257 FOR DCL-XX AFTER A CALCULATION
SI52307 RPGLE-CMPL-F/QTESYMS--MSGCPF955E LIKEREC WITH PAGE FIELD
SI52307 RPGLE-CMPL-MSGRNF7030 OPTION(*NOXREF) WITH DTAARA KEYWORD
SI52307 RPGLE-RUN-INCORROUT O SPEC RECORDNAME BLANK IN OA HANDLER PA
SI52307 RPGLE-CMPL-MSGRNF7030 *INLR NOT DEFINED FOR A PRIMARY FILE
SI52307 RPGLE-RUN-INCORROUT OPEN ACCESS OUTPUTBUFFERLEN > RECORD LEN
SI52307 RPGLE-CMPL-MSGRNX0103 SUBTRACTING TWO %SUBDT GETS OVERFLOW E
SI51640 RPGLE-CMPL-MSGRNF0203 ("/IF GROUP BEGINNING...") SQL RPGPPOP
SI51337 RPGLE-CMPL-INCORROUT SEVERAL PROBLEMS FIXED
SI51094 RPGLE-CMPL SUPPORT FREE-FORM H F D AND P STATEMENTS
SI50860 RPGLE-CMPL-MSGRNF6040 EDITWORD CONTAINING DBCS CHARACTERS
SI50533 RPGLE-CMPL-INCORROUT MISSING ERROR FOR ASTERISK PASSED AS PA
SI50455 RPGLE-CMPL-MSGMCH6906 WITH DEBUG MEMORY MANAGER ACTIVE
SI50221 RPGLE-CMPL-MSGRNF3530 EXTERNAL DS WITH EXTNAME(DDMF:*KEY)
SI50221 RPGLE-CMPL-INCORROUT SEVERAL PROBLEMS FIXED
SI49240 RPGLE-CMPL-MSGRNF0267 CRTSQLRPGI WITH RPGPPOPT(*LVL1) OR *LV
SI49240 RSE-RPGLE CRTSQLRPGI RPGPPOPT(*LVL1) ERROR LIST OPENS WRONG
SI48671 RPGLE-RUN-INCORROUT CCSID CONVERSIONS DURING ACTGRP EXIT
SI48475 RSE-RPGLE-MSGRNF3907 ERROR LIST POINTS TO FIRST LINE IN EDIT
SI47646 RPGLE-CMPL-INCORROUT SEVERAL PROBLEMS FIXED
SI47646 RPGLE-CMPL-MSGRNF0662 %SCANRPL HEX LITERAL AS 1ST OR 2ND PAR
SI47345 RSE-RPGLE-MSGRNF5177 WRONG LINE FOR MISSING ENDIF WITH *SRCS
SI47291 RPGLE-CMPL-MSGMCH3601 LIKE KEYWORD TO DEFINE OBJECT FOR JAVA
SI47113 RPGLE-CMPL-INCORROUT SEVERAL PROBLEMS FIXED
SI46836 RSE-RPGLE-MSGRNF5177 ERROR LIST POINTS TO WRONG LINE IN EDIT
SI46836 RPGLE-CMPL-MSGMCH3601 USING QUALIFIED NAME FOR LIKEDS KEYWOR
SI46561 RPGLE-CMPL-MSGMCH4227 CYCLE FILE WITH HANDLER KEYWORD
SI46561 RPGLE-CMPL-INCORROUT COMPARISON USING ALTSEQ AND OPTIMIZE(*F
SI45903 RPGLE-CMPL ALLOW OPEN ACCESS WITHOUT LICENSE FOR 5733-OAR
SI44389 RPGLE-CMPL-INCORROUT SEVERAL PROBLEMS FIXED
SI43157 RPGLE-CMPL-INCORROUT SEVERAL PROBLEMS FIXED
SI43157 RPGLE-RUN-MSGMCH4429 PASSING CONCATENATED STRING TO CONST PA
SI43157 RPGLE-CMPL ILLEGAL PROGRAM CREATED USING CRTBNDRPG
SI42509 RPGLE-CMPL-INCORROUT ALIAS NAME FOR EXT FIELD WITH TEXT DATA
SI42509 RPGLE-CMPL-INCORROUT SEVERAL PROBLEMS FIXED
SI41005 RPGLE-CMPL-MSGMCH3601 %LEN(DS.SUBF:*MAX) WITH QUALIFIED SUBF
SI41005 RPGLE-CMPL-INCORROUT SEVERAL PROBLEMS FIXED
SI41005 RPGLE-CMPL OPEN-ACCESS: SUPPORT COMMIT, SLN, ACTGRP-EXIT CLO
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 |
Models.............................. | |
Release............................. | V7R1M0 |
Licensed Program............... | 5770WDS |
APAR Fixed.......................... | View details for APAR SE64989 View details for APAR SE64988 |
Superseded by:...................... | View fix details for PTF SI66801 |
Recompile........................... | Y |
Library............................. | QRPGLE |
MRI Feature ........................ | NONE |
Cum Level........................... | C6320710 |
IBM disclaims all warranties, whether express or implied, including, but not limited to, the implied warranties of merchantability and fitness for a particular purpose. By furnishing this document, IBM grants no licenses to any related patents or copyrights. Copyright © 1996,1997,1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008, 2009, 2010, 2011, 2012, 2013, 2014, 2015, 2016, 2017, 2018 IBM Corporation. Any trademarks and product or brand names referenced in this document are the property of their respective owners. Consult the Terms of use link for trademark information.
Was this topic helpful?
Document Information
Modified date:
06 July 2016