Subject: | |
From: | |
Reply To: | |
Date: | Fri, 13 Oct 2000 14:32:46 -0700 |
Content-Type: | text/plain |
Parts/Attachments: |
|
|
Some time ago I developed and contributed to this list a more 'flexible'
LISTF style command file that allows the user to select 'filesets' using a
variety of file attributes. The command file makes extensive use of the
FINFO function and thus can be used in many situations. Knowing that
option 61 of FINFO returns the number of users that are accessing a file
can be used in this command file to get a list of files that are in use.
For a list of all the files currently being accessed in the PUB.SYS group
I'd use the following command:
LISTFX @.PUB.SYS, $FINFO(61) > 0 (with the following results:)
Account = SYS Group = PUB FRI, OCT 13, 2000, 2:25 PM Page:
1
Filename Owner Code Records Sectors Cre-Date Mod-Date & time
Acc-Date
-------- -------- ----- ------- ------- --------- -----------------
---------
CATALOG *MANAGER 14022 4384 Oct 8/00 Oct 8/00 8:21am Oct
13/00
CI *MANAGER NMPRG 182 192 Oct 8/00 Oct 8/00 8:21am Oct
13/00
CMSTORE *MANAGER PROG 1888 2048 Oct 8/00 Oct 8/00 8:21am Oct
8/00
DSTLGTAB*MANAGER 24 32 Oct 8/00 Oct 8/00 8:31am Oct
8/00
DSTLID *MANAGER 17 256 Jun 15/00 Jun 15/00 6:22pm Jun
15/00
DSTRINS *MANAGER 9 256 Jun 15/00 Jun 15/00 6:22pm Jun
15/00
DSTWELC1*MANAGER 8 16 Jun 15/00 Jun 15/00 6:32pm Jun
15/00
DSTWELC2*MANAGER 8 16 Jun 15/00 Jun 15/00 6:32pm Jun
15/00
FPROTECT*MANAGER 94 32 Oct 8/00 Oct 8/00 8:21am Oct
8/00
GXIPCADX*MANAGER 0 272 Oct 13/00 Oct 13/00 2:02pm Oct
13/00
HPBBCAT *MANAGER MGCAT 273 288 Jul 18/99 Jul 18/99 9:00am Oct
13/00
HPGID *MANAGER PRIV 69 256 Jun 15/00 Jun 15/00 6:32pm Jun
15/00
HPGIDNX *MANAGER PRIV 69 144 Jun 15/00 Jun 15/00 6:32pm Jun
15/00
HPOPTMGR*MANAGER NMPRG 154 160 Oct 8/00 Oct 8/00 8:21am Oct
8/00
HPPXUDC *MANAGER 336 112 Apr 5/98 Apr 5/98 7:07am Oct
13/00
HPUID *MANAGER PRIV 252 4096 Jun 15/00 Jun 15/00 6:32pm Jun
15/00
HPUIDNX *MANAGER PRIV 252 144 Jun 15/00 Jun 15/00 6:32pm Jun
15/00
INSPOOL *MANAGER NMPRG 279 288 Oct 8/00 Oct 8/00 8:21am Oct
8/00
IODFAULT*MANAGER 852 272 Oct 8/00 Oct 8/00 8:21am Oct
8/00
JMATFILE*MANAGER 2100 2112 Oct 8/00 Oct 8/00 8:31am Oct
8/00
JOB *MANAGER NMPRG 205 208 Oct 8/00 Oct 8/00 8:21am Oct
8/00
JSMAIN *MANAGER NMPRG 174 176 Oct 8/00 Oct 8/00 8:21am Oct
13/00
LOAD *MANAGER PROG 600 768 Oct 8/00 Oct 8/00 8:21am Oct
8/00
LOADLIST*MANAGER 1 256 Jun 15/00 Aug 24/00 5:29pm Aug
24/00
LOADMAP *MANAGER 54 96 Oct 8/00 Oct 8/00 8:29am Oct
8/00
LOG *MANAGER NMPRG 233 240 Oct 8/00 Oct 8/00 8:21am Oct
8/00
LOG1259 *MANAGER 2676 2048 Oct 12/00 Oct 12/00 11:08pm Oct
12/00
MAKECAT *MANAGER PROG 320 512 Oct 8/00 Oct 8/00 8:21am Oct
8/00
MEMLOG *MANAGER 8 32 Jun 16/00 Oct 13/00 2:10pm Oct
13/00
MIXL *MANAGER NMXL 6928 6928 Apr 5/98 Apr 5/98 7:12am Oct
13/00
MOCAT000*MANAGER MGCAT 70 80 Oct 8/00 Oct 8/00 8:21am Oct
8/00
MPEXLDIR*MANAGER 69 32 Oct 8/00 Oct 8/00 8:18am Oct
8/00
NL *MANAGER NMXL 142344 143360 Oct 8/00 Oct 8/00 8:21am Oct
13/00
NMCAT *MANAGER 13867 4608 Oct 8/00 Oct 8/00 8:21am Oct
13/00
NMCONSOL*MANAGER NMPRG 2411 2416 Oct 8/00 Oct 8/00 8:21am Oct
8/00
NMFILE *MANAGER PROG 42 48 Oct 8/00 Oct 8/00 8:21am Oct
8/00
NMLG0115*MANAGER NLOG 2047 16384 Oct 8/00 Oct 8/00 8:31am Oct
8/00
NMLOGICS*MANAGER NMPRG 154 160 Oct 8/00 Oct 8/00 8:21am Oct
8/00
NMLOGMON*MANAGER NMPRG 2885 2896 Oct 8/00 Oct 8/00 8:21am Oct
8/00
NMTRCMON*MANAGER PROG 78 80 Oct 8/00 Oct 8/00 8:21am Oct
8/00
OUTSPOOL*MANAGER NMPRG 436 448 Oct 8/00 Oct 8/00 8:21am Oct
8/00
PEXL *MANAGER NMXL 4866 6928 Apr 5/98 Apr 5/98 7:12am Oct
13/00
SEGDVR *MANAGER PROG 179 496 Oct 8/00 Oct 8/00 8:21am Oct
8/00
SEGPROC *MANAGER PROG 1508 1792 Oct 8/00 Oct 8/00 8:21am Oct
12/00
SESSION *MANAGER NMPRG 178 192 Oct 8/00 Oct 8/00 8:21am Oct
8/00
SL *MANAGER SL 205190 206848 Oct 8/00 Oct 8/00 8:20am Oct
13/00
SPOOLMOM*MANAGER NMPRG 252 256 Oct 8/00 Oct 8/00 8:21am Oct
8/00
STORE *MANAGER NMPRG 6265 6272 Oct 8/00 Oct 8/00 8:21am Oct
8/00
STORECAT*MANAGER 3905 1232 Oct 8/00 Oct 8/00 8:21am Oct
8/00
SYSGCAT *MANAGER 5001 1568 Oct 8/00 Oct 8/00 8:21am Oct
10/00
SYSGEN *MANAGER NMPRG 3506 3520 Oct 8/00 Oct 8/00 8:21am Oct
10/00
SYSMAIN *MANAGER NMPRG 266 272 Oct 8/00 Oct 8/00 8:21am Oct
8/00
TURBODBS*MANAGER PRIV 65 80 Oct 8/00 Oct 13/00 11:49am Oct
13/00
TURBOLKT*MANAGER PRIV 8425 8432 Oct 8/00 Oct 13/00 11:49am Oct
13/00
VERRMSGS*MANAGER 1802 576 Jul 18/99 Jul 18/99 9:00am Oct
13/00
VSTORCAT*MANAGER 2643 832 Oct 8/00 Oct 8/00 8:21am Oct
8/00
XL *MANAGER NMXL 65075 65536 Oct 8/00 Oct 8/00 8:20am Oct
13/00
--------
Total Sectors: 501984 (57) Files
The 'help' option of the command file says (shown when no fileset is
specified):
listfx
Author: Paul H. Christidis [log in to unmask]
Usage: listfx [fileset] [select_expression]
Where:
fileset = a :LISTFILE style fileset (If using the (fset,fset,..)
format then it MUST be included in quotes).
select_expression = an expression comprised of coded FINFO function
calls. A number of 'predefined' finfo parms are included along
with the capability of specifying any of the additional finfo
parameters that one has memorized.
The 'predefined' items/constants are:
$fcode - The sting mnemonic for the file's file code.
$icode - The integer value for the file's file code.
$eof - The number of records in the file.
$recsize - File's record size in 'positive' bytes.
$credate - File's creation date.
$moddate - File's last modification date.
$accdate - File's last access date.
$sectors - Number of sectors allocated to file.
$today - The current day in 'yyyymmdd' format.
$finfo( - To invoke any other 'finfo' item.
Examples:
:listfx @,$fcode = 'prog' OR $icode = 1030
:listfx @,($fcode = 'prog' OR $icode = 1030) AND $accdate<>$today
:listfx ./[B-W]@ $eof < 1000 AND ($credate > $today-(18*30))
NOTE: The above expression "$today-(18*30)" REQUIRES the command
file "dtoffset", AND must NOT contain any spaces. Otherwise the
'$expression' result MUST evaluate in the current month.
:listfx "(./[B-W]@,/SYS/PUB/@)" $eof < 1000 AND $finfo("limit") > 25000
Regards
Paul Christidis
Gibson Nichols
<gnichol3@ford To: [log in to unmask]
.com> cc:
Sent by: Subject: Re: How can I find out who is
HP-3000 using Transact object file?
Systems
Discussion
<HP3000-L@RAVE
N.UTC.EDU>
10/13/00 01:46
PM
Please respond
to Gibson
Nichols
Thank you for the reply to my question. I've had several people provide
this suggestion. When I called HP they also suggested the Glance software.
This is a purchased product . . .
Another option provided by HP was SHOWPROC. This I think, needs SM or OP.
The LISTFILE method will list all the files in the fileset. What I
neglected
to mention is that I would like to see ONLY the files in use. We have both
Transact IP code (compatibility) and object files (native mode).
The GLANCE and SHOWPROC methods show the file called TRANSACT.PUB.SYS
instead of the specific IP code file so they have some limitations.
Gibson Nichols (Ford Motor Company)
Paul H Christidis <[log in to unmask]> wrote in message
news:8rtg270308b@enews1.newsguy.com...
> You can issue the command:
>
> Listf @.transgrp.transact,9
>
> Regards
> Paul Christidis
>
>
>
>
> How can I find out who is using our Transact object files?
>
> We would like to have a way of finding out who is running our home grown
> application. There may be times when we wish to take the system down
> so we need to know what is running to prioritize the timing.
>
> We store our object code in a specific set of groups in one account. We
> have one file for each "program". We use both compatibility mode and
> native
> mode Transact. This means we would need to know which files are in use.
>
|
|
|