Thanks to everyone who came to my rescue! I had never done
anything fancy with MPEX (yes, I know: It's never to late to
learn something new and exciting).
Here is the specific MPEX file that I assembled, based on the
advice of my friends:
(* This file is moddate.listf.vesoft (Qedit format is OK) *)
(* *)
(* To list a fileset sorted (in descending order) by *)
(* modification date, do this from Qedit: *)
(* *)
(* /%listf @.source, moddate *)
(* To list only those files modified in the last few days, *)
(* do this from Qedit, depending on the number or days that *)
(* interest you: *)
(* *)
(* /%listf @.source (moddate > today-30), moddate *)
(* Assembled by F. Alfredo Rego on July 1, 2004, with *)
(* many thanks to my MPEX Guru friends from hp3000-L: *)
(* *)
(* Tom Emerson *)
(* Ron Horner *)
(* David N. Lukenbill *)
(* Andreas Schmidt *)
for rFile in mpexFileset
sort (ModDate:'desc')
PageHead begin
writeln (' ');
writeln (79*'-');
writeln(svar("mpexFileset"),
', sorted by modification date'
);
writeln (' ');
end
do
writeln (file:8,
ModDate:' %0C%0Y %1M %0D ',
(If ModTime=IsTime(0) Then '00:00'
Else StrWrite(ModTime:'%024h:%0m')) :5
)
OnBreakAfter 1
writeln (' ')
;
* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *
|