thanks all, think it's sorted using APE. as i understand it this
allowed me to map the PC value from the EMS message (the accelerated
millicode address?) to the TNS address that INSPECT understood:
LOOKING FOR:
PC: 0x704828D0
> APE
APE (Accelerated Program Examiner) - T9292D30 - 13JUN05 (May 14 2005)
Copyright Tandem Computers Incorporated 1991-1994
APE> file auth4q
opened.
APE> procs tns/r
Base Length Entry Name
…
…
0x704825BC 0x00000688 0x70482B60 CSM074^CHECK^PBF^LIMITS
…
…
APE> icode at CSM074^CHECK^PBF^LIMITS tns/r
Initializing tables for code segment 0
EPIL table loaded
EPFL table loaded
All tables loaded
0x704825BC -> 0x70482C40 CSM074^CHECK^PBF^LIMITS
…
…
0x704828B0: ADD $0,sp,at LHU s0,-16(fp) LH
s4,18(fp)
0x704828BC: SLL t0,s0,1 LWL t5,0(t0) LWR
t5,3(t0)
0x704828C8: LHU s5,20(fp) ADDI t0,t5,262 LH
s0,0(t0)
0x704828D4: LHU s1,2(t0) LHU s2,4(t0) LHU
s3,6(t0)
0x704828E0: LHU s6,22(fp) LHU s7,24(fp) SUB
t7,s0,s4
0x704828EC: BNE t7,$0,0x7048291 NOP SUB
t7,s1,s5
0x704828F8: BNE t7,$0,0x7048291 NOP SUB
t7,s2,s6
…
…
APE> icode at CSM074^CHECK^PBF^LIMITS BOTH
Sp Pep Base Limit Entry Attrib Name
00 076 100000 100344 100265 CSM074^CHECK^PBF^LIMITS
…
…
100135:000135: 1 DADD 0x704828C8: LHU s5,20(fp)
100136:000136: 3 LQX 0x704828CC: ADDI t0,t5,262
100137:000137: 4 LADR L+011 0x704828D0: LH s0,0(t0)
100140:000140: 7 QLD 0x704828D4: LHU s1,2(t0)
100141:000141: 7 QCMP 0x704828D8: LHU s2,4(t0)
100142:000142: 7 BNEQ +010 0x704828DC: LHU s3,6(t0)
0x704828E0: LHU s6,22(fp)
0x704828E4: LHU s7,24(fp)
0x704828E8: SUB t7,s0,s4
0x704828EC: BNE t7,$0,0x7048291
0x704828F0: NOP
0x704828F4: SUB t7,s1,s5
0x704828F8: BNE t7,$0,0x7048291
0x704828FC: NOP
0x70482900: SUB t7,s2,s6
0x70482904: BNE t7,$0,0x7048291
0x70482908: NOP
0x7048290C: SUB t7,s3,s7
0x70482910: BNE t7,$0,0x7048292
0x70482914: NOP
…
…
> RUND auth4q
INSPECT - Symbolic Debugger - T9673G10 - (21JUL2008) System \HAL
Copyright Hewlett Packard Company 1983,1985-1999,2000-2005
INSPECT
003,00,00612 $Y668 #AUTHS^LN^04.#3025(AUTH4QS) + %101I
Executing command file INSPCSTM
SOURCE mode has been enabled
-$Y668-LOW
_$Y668_=100137:UC.00
= #CSM074^CHECK^PBF^LIMITS.16 + %7I,
#CSM074^CHECK^PBF^LIMITS.#29625(AUTH4QS) + %7I,
#CSM074^CHECK^PBF^LIMITS + %137I
_$Y668_HIGH
-$Y668-SO AT #CSM074^CHECK^PBF^LIMITS.#29625
#29621 !
#29622
#29623 ! Allow for possibility that PBF server has updated
the recor
#29624 ! If max bal is ascii spaces, set it to zero
@#29625 IF PBF1.BASE.USER^FLD^ATMOS.MAX^BALANCE =
ASCII^SPACES^F THEN
#29626 PBF1.BASE.USER^FLD^ATMOS.MAX^BALANCE := 0F;
#29627
#29628 IF PBF2.BASE.USER^FLD^ATMOS.MAX^BALANCE > 0F THEN
#29629 MAX^BAL := PBF1.BASE.USER^FLD^ATMOS.MAX^BALANCE
#29630 ELSE
-$Y668-