IBM Support

SI45448 - RPGLE-RUN-MSGMCH3601-MSGMCH0601 RPG FORMMATTED DUMP OF PGM

PTF Cover Letter


PTF ( Program Temporary Fixes ) Cover letter


Order this fix

Abstract

RPGLE-RUN-MSGMCH3601-MSGMCH0601 RPG FORMMATTED DUMP OF PGM


Pre/Co-Requisite PTF / Fix List

REQ  LICENSED      PTF/FIX  LEVEL

TYPE PROGRAM  REL  NUMBER   MIN/MAX  OPTION
---- -------- ---  -------  -------  ------
NONE



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

-----------------------------------------------
When CCSIDCVT(*EXCP) is specified, a CCSID conversion error
in the RPG program causes status code 00452. Message RNX0452
is used to signal the error condition and message RNQ0452 is
the inquiry message that is issued if the 00452 status is
not handled in the RPG module.

Messages msgRNX0452 and msgRNQ0452 may not be found in
message file QRNXMSG.

When these messages do exist in the message file, the
replacement text for the messages is not set correctly.

CORRECTION FOR APAR SE50270 :
-----------------------------
When escape message msgRNX0452 is required, the ILE RPG runtime
will check to see if RNX0452 exists in *LIBL/QRNXMSG.
- If it does exist, the replacement text will be set correctly.
- If it does not exist, the runtime will place an informational
message in the joblog to explain the problem that caused the
00452 status code. Then it will attempt to issue RNX0452 as an
escape message.

For example, the joblog might look like this:

RNX0452: SOME CHARACTERS COULD NOT BE CONVERTED FROM
CCSID(13488) TO CCSID(37).
Text not available for message RNX0452 file QRNXMSG.

When inquiry message msgRNQ0452 is required, the ILE RPG runtime
will check to see if RNQ0452 exists in *LIBL/QRNXMSG.
- If it does exist, the replacement text will be set correctly.
- If it does not exist, the runtime will issue the inquiry
message as a text message rather than attempting to use
RNQ0452.

For example, the inquiry message might say

RNQ0452: SOME CHARACTERS COULD NOT BE CONVERTED FROM
CCSID(1200 ) TO CCSID(37   ) (C G D F)

CIRCUMVENTION FOR APAR SE50270 :
--------------------------------
Use the ADDMSGD command to add the messages to the QRNXMSG file
in your system library list.

See the cover letter of the PTF to see the recommended
ADDMSG commands to use.


DESCRIPTION OF PROBLEM FIXED FOR APAR SE49969 :
-----------------------------------------------
Obtaining a formatted dump for an RPG module containing a
large variable may result in the dump failing with either
msgMCH3601 or msgMCH0601 being issued.

CORRECTION FOR APAR SE49969 :
-----------------------------
The ILE RPG runtime will be changed such that msgMCH3601 or
msgMCH0601 will not be issued when obtaining a formatted dump
of an ILE RPG module containing a variable that is too large
to dump.

CIRCUMVENTION FOR APAR SE49969 :
--------------------------------
Use the QIBM_TES_DUMP_MOD_VAR_CONTROL environment variable to
cause the dump for arrays to list only the first element.

The following command will enable the environment variable for
the current job.
ADDENVVAR ENVVAR(QIBM_TES_DUMP_MOD_VAR_CONTROL)
VALUE('DUMP_TABLE=FIRST')
LEVEL(*JOB)
REPLACE(*YES)

To have the environment variable enabled automatically for every
job, specify LEVEL(*SYS).


Activation Instructions


None.




Special Instructions


Create and call the following CL program to add messages RNX0452
and RNQ0452 to the RPG run-time message file QRNXMSG.

This program will create the messages in the first QRNXMSG message
file that is found in your library list.

If you have secondary-language libraries on your system, you should
add the messages to each QRNXMSG message file. You can do this by
- using the CHGSYSLIBL command to position the required QRNXMSG
message file in your library list
or
- modifying the CL program to specify a specific library for the
two ADDMSGD commands instead of using *LIBL

PGM

ADDMSGD  MSGID(RNX0452) MSGF(*LIBL/QRNXMSG) +
MSG('Some characters could not be converted from +
CCSID(&6) to CCSID(&7).') +
SECLVL('&N Cause . . . . . : +
In RPG procedure &1 in program &3/&2, a conversion is +
being done which requires conversion from CCSID(&6) to +
CCSID(&7), but this conversion could not successfully +
convert all the characters.') +
SEV(50) +
FMT((*CHAR 10) (*CHAR 10) (*CHAR 10) (*CHAR 10) +
(*CHAR 7)  (*CHAR 5)  (*CHAR 5)) +
DMPLST(*NONE)
ADDMSGD  MSGID(RNQ0452) MSGF(*LIBL/QRNXMSG) +
MSG('Some characters could not be converted from +
CCSID(&6) to CCSID(&7) (C G D F).') +
SECLVL('&N Cause . . . . . : +
In RPG procedure &1 in program &3/&2, a conversion is +
being done which requires conversion from CCSID(&6) to +
CCSID(&7), but this conversion could not successfully +
convert all the characters.') +
SEV(99) +
FMT((*CHAR 10) (*CHAR 10) (*CHAR 10) (*CHAR 10) +
(*CHAR 7)  (*CHAR 5)  (*CHAR 5)) +
DMPLST(*NONE) +
VALUES(C G D F S) +
SPCVAL(('c' C) ('g' G) ('d' D) ('f' F) ('s' S)) +
DFT(C)

ENDPGM


Default Instructions

THIS PTF CAN BE APPLIED IMMEDIATE OR DELAYED.



Supersedes

PTF/FIX NO(S).  APAR TITLE LINE
--------------  ------------------------------------------------------------
   SI43159      RPGLE-RUN-INCORROUT SEVERAL PROBLEMS FIXED
   SI42510      RPGLE-RUN XML-INTO ENHANCEMENT: NAMESPACES, NON-RPG NAMES
   SI42510      RPGLE-RUN-PERFM HIGH CPU USE WITH ALTSEQ
   SI41000      RPGLE-RUN-INCORROUT SEVERAL PROBLEMS FIXED
   SI41000      RPGLE-RUN CLOSE OPEN ACCESS FILES WHEN ACTIVATION GROUP ENDS
   SI34732      RPGLE-RUN-INCORROUT ERROR IN OPEN-ACCESS LICENSE CHECK
   SI38773      RPGLE-RUN-INCORROUT SEVERAL PROBLEMS FIXED
   SI33944      RPGLE-RUN-INCORROUT SEVERAL PROBLEMS FIXED

Summary Information

System..............................i
Models..............................
Release.............................V7R1M0
Licensed Program...............5770SS1
APAR Fixed..........................View details for APAR SE50270
View details for APAR SE49969
Superseded by:......................View fix details for PTF SI58913
Recompile...........................N
Library.............................QSYS
MRI Feature ........................NONE
Cum Level...........................C2115710


System i Support

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 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.

[{"Business Unit":{"code":"BU054","label":"Systems w\/TPS"},"Product":{"code":"SG15V","label":"PTF Cover Letters - OS\/400 General"},"Component":"","ARM Category":[],"Platform":[{"code":"PF012","label":"IBM i"}],"Version":"V7R1M0","Edition":"","Line of Business":{"code":"","label":""}},{"Business Unit":{"code":"BU054","label":"Systems w\/TPS"},"Product":{"code":"SG16D","label":"PTF Cover Letters - IBM i 7.1 environment"},"Component":"","ARM Category":[],"Platform":[{"code":"PF012","label":"IBM i"}],"Version":"V7R1M0","Edition":"","Line of Business":{"code":"","label":""}}]

Document Information

Modified date:
16 December 2011