Subject: | |
From: | |
Reply To: | VANCE,JEFF (HP-Cupertino,ex1) |
Date: | Tue, 25 Sep 2001 11:47:46 -0700 |
Content-Type: | text/plain |
Parts/Attachments: |
|
|
> > I want to see how many people at any given time are running
> > a particular program with a Parm of 2. MPEX Listf ,Access
> > will show me how many people are accessing it, but does not
> > show me if they ran it with a parm. How can I find this out?
>
> I'm not sure of any other way, but here's a product-based way:
...good way snipped...
Here is an all FOS method, but you need 7.0 exp1 to get the new
PINFO function: (note, not tested and not a complete script)
PARM pgm, parm=0, entry=main
# finds all accessors of "pgm" via parm="parm"
#
if '!entry' = 'main' then
...
continue
listfile !pgm,9 >lftmp
if hpcierr = 0 then
xeq !hpfile !pgm !parm entry="read_lf" <lftmp
endif
return
elseif '!entry' = 'read_lf' then
# input redirected to listf,9 output
# parse out the accessor's pin
setvar end finfo(hpstdin,'eof')
while setvar(end,end-1) >= 0 do
if lft(setvar(rec,input()),3) = ' #P' then
if pinfo(word(rec),'parm') = !parm then
# You have a match...
endif
endif
endwhile
return
endif
* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *
|
|
|