Clear_Queue does just that -- it deletes entries in a queue using the following parameters:

1. Queue name, e.g. Sys$Batch
2. RETAINED if you only want retained jobs deleted
3. Minimum age in days of jobs to delete, e.g., 7 would only delete jobs over a week old.

For example:

would delete any print job in sys$print that was submitted before yesterday.

NOTE: this procedure requires the DBD (days between dates) routine also found on this site. Please modify the line (right after the f$verify) that defines DBD, if DBD is not already defined on your system.

This procedure finds the bg devices of a process. It will just display "matched" if a process does not own a bg device.

You pass a PID as P1, for example:

$ @findbg.com 20217DFF
BG8833:
BG8835:
BG8836:
BG8853:
BG1272:

This procedure tries to find the logfile of a process, assuming the logfile has a .log extension. It is not bullet-proof. It can be adapted to search for something else.

You give the pid of the process as the P1 parameter:

$ @find_log  2020043E
DSA0:[SQLSRV$DEFLT]SQS_BILBO_GENERI0040001.LOG;21

The rdel.com procedure recursively deletes all the directory present in a given directory. User need not run command del[...]*.*;* repeatedly.

$ sh def
SMSY22$USERS:[TEMP.EXAMPLE]
$ create /dir [.A.B.C.D]
$ create /dir [.X.Y.Z]
$ @rdel SMSY22$USERS:[TEMP.EXAMPLE]

dclspy.com :

A new version V1.7-1 has been released.

This "DCL Program" (1867 lines) provides powerful process scanning capabilities giving detailed JPI process context variable information about any processes on the same node or cluster. The processes to be displayed can be specified using multiple selection criteria. A VT220 compatible terminal is assumed. The procedure adapts the number of columns displayed automatically when the screen is in 80 column or 132 column mode. Single pass and continuous display modes are supported. The continuous display mode can be exited only using Control-C. The continuous mode will also change the page length of the screen automatically when needed, if your terminal emulation supports the VT function correctly. DECwindow's DECterm supports this functionality the best. For a more complete HELP description and many more capabilities, start the procedure with a question mark "?" as the first command line parameter.

Some of the useful things you can do with this procedure:

• find all processes running a specific image, or any image within a specific directory tree.
• find all processes with a specific quota exhausted to a specified percentage.
• count the number of times processes with a specific set of attributes exist during a period of time.
• call this procedure from your own, and use the global variables created that give the identifying attributes of the first or last process that PROCESS_SCAN found.
• watch the processes of another cluster node and their changing attributes as that node boots, BEFORE the System Manager can log-on to the booting node, and BEFORE TCP/IP or DECnet has been loaded on that node.

Happy 30th OpenVMS Anniversary to the OpenVMS Community!