PM53218: PGM 03B AT X'6DD' IN O2OPCN, INSTRUCTION AT X'6DC' IS SPKA 0(0) OPCN AND MACRO $EXIT DO NOT SUPPORT 64-BIT MODE.

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• PSW=077D0001 A7A703ED
  (Running in PRIMARY, key 7, AMODE 64, DAT ON)
  DISABLED FOR PER
  ASID(X'029E') 27A703ED. KO2OCNTB+331D IN EXTENDED PRIVATE
  ASID(X'029E') 27A703ED. AREA(Subpool252Key00)+33ED IN EXTENDED
  PRIVATE
  ASCB670 at F06B80, JOB(IMGO2), for the home ASID
  ASXB670 at 7FDB70 and TCB670EX at 7537E8 for the home ASID
  HOME ASID: 029E PRIMARY ASID: 029E SECONDARY ASID: 029E
  
  General purpose register values
  0-1  00000000_00000000  00000000_00000000
  2-3  00000000_2B096384  00000048_7E04E0B8
  4-5  00000000_27762D7C  00000000_0027BC00
  6-7  00000000_27762D80  00000000_2B0963C4
  8-9  00000000_00000000  00000000_000000CE
  10-11 00000000_27A6FD68  00000000_00000040
  12-13 00000000_2CF6EFC0  00000000_27762D30
  14-15 00000000_A7A703EC  00000000_00000004
  Control register values
  0-1  00000000_DF88EE70  00000005_7E6AC007
  2-3  00000000_01AC5FC0  00000003_FFFF029E
  4-5  00000003_0001029E  00000000_05487780
  6-7  00000000_00000000  00000005_7E6AC007
  8-9  00000000_00000000  00000000_00000000
  10-11 00000000_00000000  00000000_00000000
  12-13 00000000_922B98DB  00000005_7E6AC007
  14-15 00000000_DF885494  00000000_7E211010
  
  
  The PSW points to X'6DD' in O2OPCN (V510210  07/12/11 22:07..
  PM43404).  The instruction at offset X'6DC' is B20A0000 or
  "SPKA  0(0)".  The instruction at X'6DA' is "BALR R14,R15", R14
  points
  to the start of "SPKA 0(0)".
  
  
  *First PSW word....077D0001*
  Byte 1 of First PSW Word...07
  Program-Event-Recording.....0   DAT Mode....................1
  Iput/Output Mask............1   External Mask...............1
  Byte 2 of First PSW Word...7D
  PSW Key.....................7
  ESA/390 PSW (2 Words)           Machine-Check...............1
  Wait State..................0   Problem State...............1
  Byte 3 of First PSW Word...00
  Primary Address Space Mode      Condition Code..............0
  Fixed-Point Overflow........0   Decimal Overflow............0
  HFP-Exponent Underflow......0   HFP-Significance............0
  Byte 4 of First PSW Word...01
  *Second PSW word...A7A703ED*
  64-Bit Addressing Mode       Instruction Address.....27A703ED
  *** SUMMARY OF FIRST PSW WORD ***
  +--------------------------------------------------+
  | | |   | | | |PSW  | | | | |   |   |PROG|       |E|
  |0|R|000|T|I|E|KEY  |1|M|W|P|AS |CC |MASK|0000000|A|
  +--------------------------------------------------+
  0       5     8     12      16  18  20   24      31
  +--------------------------------------------------+
  |0|0|000|1|1|1| 7   |1|1|0|1|00 | 0 |0000|0000000|1|
  +--------------------------------------------------+
  
  From the system trace:
  03 029E 007537E8  PGM    03B 077D0001 A7A703ED  0004003B
  00000000
  00000000 00000000 029E 029E 17:01:49.829291
  A7A70000
  00000000
  03 029E 007537E8 *RCVY  PROG                    940C4000
  0000003B
  00000000  00000000 00000000 029E 029E 17:01:49.829346
  
  00000000
  
  The meaning for the "3B" is:
  Region-Third exception. This error is caused by one of the
  following:
  A program attempted to reference storage that had not been
  obtained.
  To correct the error, allocate the storage before attempting to
  reference it.
  A program running in 64-bit addressing mode used a 31-bit
  pointer
  that had the high order bit on.
  Note:
  Programs running in 31-bit mode using 4-byte pointers often use
  the
  high order bit of a 4-byte pointer to indicate 31-bit addressing
  mode,
  versus 24-bit mode. Also, certain instructions will set the high
  order
  bit on in registers to indicate addressing mode.
  A program running in 64-bit addressing mode loaded a 31-bit
  pointer
  into a 64-bit register and did not clear the high half of the
  register.
  To correct the error, ensure that the program running in 64-bit
  addressing mode clears the 33 high-order bits of any register
  when
  loading a 31-bit pointer into that register.
  A program that was running disabled attempted to access storage
  that
  was not obtained as DREF.
  
  Address A7A70000 is flagged in the PGM 03B, it's storage
  attributes are:
  ASID(X'029E') 27A70000. KO2OCNTB+2F30 IN EXTENDED PRIVATE
  ASID(X'029E') 27A70000. AREA(Subpool252Key00)+3000 IN EXTENDED
  PRIVATE
  
  The following changes in OPCN and macro $EXIT does not support
  64-bit mode
  
  Module OPCN:
  CAL$2600 DS    0H
           LR    @W1,@W4                  RESTORE PARAM REG
           L     @WF,EVTEEPA              GET EP ADDRESS
           BALR  @WE,@WF                  CALL RTN
  @L2C
           DROP  @W3
  
  Macro $EXIT:
  $EXIT RC=@WF,OUTPUT=@W8,OUTLEN=@W2       RETURN TO CALLER
  LR    @WF,@WF                      DATA IS IN A REGISTER
  LR    @W0,@W2                      DATA IS IN A REGISTER
  LR    @W1,@W8                      OUTPUT AREA ADDRESS
  L     @WD,SA@BWD(,@WD)             yes...                 @04A
  L     @WE,SA@WE(,@WD)              RETURN ADDR            @04A
  LM    @W2,@WC,SA@W2(@WD)                                  @L1A
  BR    @WE                          RETURN TO CALLER       @L1C
  
  Module OPCN - BALR should be changed back to BASSM
  Macro $EXIT - BR should be changed to BSM 0,@WE
  

Local fix

Problem summary

• ****************************************************************
  * USERS AFFECTED: OMEGAMON XE for DB2 PE/DB2PM                 *
  *                 users of component:                          *
  *                 -   OMEGAMON collector                       *
  *                 -   Classic Interface                        *
  ****************************************************************
  * PROBLEM DESCRIPTION: ABEND0C4 KO2OCNTB+331D                  *
  *                                                              *
  ****************************************************************
  * RECOMMENDATION: Apply this PTF                               *
  *                                                              *
  ****************************************************************
  PROBLEM SUMMARY:
  Inter-routine call linkage AMODE error.
  
  PROBLEM CONCLUSION:
  Improve inter-routine linkage AMODE support
  

Problem conclusion

• Improve inter-routine linkage AMODE support
  
  KEYWORDS : TOLERANCE 64-BIT AMODE KO2OCNTB
  

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:

  UK80836 UK80837

Modules/Macros

•    KO2ASU2A KO2ASU2K KO2ASU22 KO2ATVPB KO2CMVSF
  KO2EGX1K KO2EOJSK KO2ONCYB KO2OPCNB KO2OSY1B KO2OTH3B KO2STOAB
  KO2STOBB KO2STORB KO2XTHSA KO2XTHSK KO2XTHS2 KO2XTH3A KO2XTH3K
  KO2XTH32
  

Fix information

• Fixed component name

  OM XE DB2PE/PM

• Fixed component ID

  5655OPE00

Applicable component levels

• R510 PSY UK80836

     UP12/08/09 P F208

• R511 PSY UK80837

     UP12/08/09 P F208

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.