A fix is available
APAR status
Closed as program error.
Error description
Example Syntax: STATUS = TRACE('ALL') FILERC = VIEWIMS('TPLDSN=TEMPLATE.LIBRARY') Do while filerc=0 filerc = GETIMS('SEGMENT=CUSTADDR' NEXT USING_VIEW) filerc = ISRTIMS('SEGMENT=CUSTADDR', 'SET #2=CUSTOMER ACCOUNT NUMBER', 'SET #3=CUSTOMER PHONE', 'set #4=CUSTOMER NAME', 'set #5=CUSTOMER ADDRESS') say fmconkey fmsegnm PRINT(INREC,TABL) PRINT(INREC,SNGL) END EXIT
Local fix
N/A
Problem summary
**************************************************************** * USERS AFFECTED: All FM/IMS Batch Edit (IEB) and Batch Browse * * (IBB) users. * **************************************************************** * PROBLEM DESCRIPTION: 1. When more than one field assignment * * statement is specified in the SET * * clause of an ISRTIMS call, FM/IMS * * only processes the last statement. * * * * 2. When more than one field assignment * * statement is specified in the WHERE * * clause of a GETIMS, DELIMS, REPLIMS * * or ISRTIMS call, FM/IMS only processes * * the last statement. * * * * 3. FM/IMS does not correctly evaluate * * the selection criteria in a VIEWIMS * * call when the selection criteria * * specify unformatted field references * * (for example #u2). * **************************************************************** * RECOMMENDATION: Apply the provided PTF. * ****************************************************************
Problem conclusion
FM/IMS has been modified to correct all of these problems.
Temporary fix
Comments
APAR Information
APAR number
PM70783
Reported component name
FILE MANAGER Z/
Reported component ID
5655W4700
Reported release
B14
Status
CLOSED PER
PE
NoPE
HIPER
NoHIPER
Special Attention
NoSpecatt / Xsystem
Submitted date
2012-08-13
Closed date
2012-11-08
Last modified date
2013-11-03
APAR is sysrouted FROM one or more of the following:
APAR is sysrouted TO one or more of the following:
Modules/Macros
FMN1LVL FMN1LVLJ FMN1LVLK
Fix information
Fixed component name
FILE MANAGER Z/
Fixed component ID
5655W4700
Applicable component levels
RB1C PSY UK83348
UP12/11/13 P F211
RB14 PSY UK83349
UP12/11/13 P F211
RB15 PSY UK83350
UP12/11/13 P F211
Fix is available
Select the PTF appropriate for your component level. You will be required to sign in. Distribution on physical media is not available in all countries.
[{"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":"B14","Edition":"","Line of Business":{"code":"","label":""}},{"Business Unit":{"code":"BU058","label":"IBM Infrastructure w\/TPS"},"Product":{"code":"SSXJAV","label":"File Manager for z\/OS"},"Component":"","ARM Category":[],"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"B14","Edition":"","Line of Business":{"code":"LOB35","label":"Mainframe SW"}}]
Document Information
Modified date:
03 November 2013