Nothing fancy, but works.....
MODDATE.MPEX.acct
%Listf @,moddate.mpex
MPEXHeader1:='';
MPEXHeader2:='MODIFICATION'+32*' '+'FILE';
MPEXHeader3:='DATE'+5*' '+'TIME'+3*' '+'FILENAME'+
20*' '+'CODE'+4*' '+'CREATOR';
WriteLn(MPEXHeader1);
WriteLn(MPEXHeader1);
WriteLn(Today:'%W, %1M %0D, %4Y',', ',Clock:'%h:%0m %x');
WriteLn(MPEXHeader1);
WriteLn(MPEXHeader1);
WriteLn(MPEXHeader2);
WriteLn(MPEXHeader3);
WriteLn(MPEXHeader1);
For RFile in MPEXFileSet
Sort (ModDate:'Asc',ModTime:'Asc')
Do
WriteLn(ModDate:'%0Y/%0M/%0D ',
(If ModTime=IsTime(0) Then ''
Else StrWrite(ModTime:'%024h:%0m ')):7,
FullName:28,
Code:8,
Creator+'.'+Account:11);
WriteLN(MPEXHeader1);
At 9:58 +0200 7/1/04, Andreas Schmidt wrote:
>If I remember right you have to write a little commandfile...
Aha! Thanks for the tip. So, I rephrase my question:
Has anyone written such a SPECIFIC command file for MPEX?
I will be delighted to send an Adager MemoCube in exchange for
that person's saving me 10 minutes of my life (reinventing the
wheel).
Lazily yours,
_______________
| |
| |
| r | Alfredo http://www.adager.com
| e |
| g | F. Alfredo Rego
| a | Manager, R & D Labs
| d | Adager Corporation
| A | Sun Valley, Idaho 83353-3000 U.S.A.
| |
|_______________|
* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *
* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *
|