Article 4665 of vmsnet.internals:
mehlhop@parsec.com (Jim Mehlhop 303-763-9600 wk 719-574-5469 hm) writes:

>>(Branislav Sveton) writes:
>
>>:The DEBUG, shows me a following instruction:
>>:
>>:CALLS    S^#01,@#SYS$IMGSTA+220
>>:
>>:.. and there is a problem. I need to find which syst. service
>>:is called ... Any ideas ?
>
>>  Well, given it appears you are looking at raw VAX assembly code, I'll
>>  assume this is an OpenVMS VAX application.  By definition, the
>>P1-space
>>  addresses of the system service vectors do not change..  As such, this
>>  appears to be a call to sys$put.  Here's how I located that
>>information:
>>
>>	$ lib sys$share:starlet.olb/extr=SYS$P1_VECTOR -
>>		/out=sys$scratch:SYS$P1_VECTOR.obj
>>	$ link/map=sys$scratch:SYS$P1_VECTOR.map/full/noexe -
>>		sys$scratch:SYS$P1_VECTOR.obj
>>	$ sear sys$scratch:SYS$P1_VECTOR.map SYS$IMGSTA/wind=1
>>	$ x=%x7FFEDF68+%x220
>>	$ sho sym x
>>	$ sear sys$scratch:SYS$P1_VECTOR.map 7FFEE188
>
>>  ------------------------- pure personal opinion
>>---------------------------
>>   Stephen Hoffman      OpenVMS Engineering     
>>hoffman@xdelta.enet.dec.com
> 
>>-------------------------------------------------------------------------
>>--
>
>Another possibility is 
>	$ lib sys$share:starlet.olb/extr=SYS$P1_VECTOR -
>		/out=sys$scratch:SYS$P1_VECTOR.obj
>then
>	$ analyze/system
>	SDA> read sys$scratch:SYS$P1_VECTOR.obj
>	SDA> exam sys$imgsta+220
>	SYS$PUT:  8FBD0FFC   "|.=."
>	SDA> 
>
>----------------------------------------------------------------------------
>Jim Mehlhop	The PARSEC Group
>		Lakewood, CO
>mehlhop@parsec.com

Right! ... and my first approach...

That's what I did to check the original poster's question since,
I keep a copy of SYS$P1_VECTOR handy for use with SDA.

When I posted the same solution which Steven has corroborated with
his post, I thought of using the SDA solution but then, I thought
a moment... If the original poster didn't understand how to resolve
the question, it's very likely that (I would hope so anyway) his
system manager didn't award his process with the privies to run SDA.

VAXman - 

Say what you want/Say what you will/'Cos I find you think what makes it easier
   And lies spread on lies/We don't care/Belief is our relief/We don't care
              - Tears For Fears:  the hurting/ideas as opiates -