PM70783: WHEN MULTIPLE SET STATEMENTS ARE USED IN AN INSERT OPERATION, ONLY THE LAST SET STATEMENT IS HONORED.

Obtain the fix for this APAR.

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 is sysrouted FROM one or more of the following:

• APAR is sysrouted TO one or more of the following:

  PM75414

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.