L /* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *  *  *  *<  *                %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%\=  *                %% \___________________________________%% \ >  *                %% |                                   %%  \?  *                %% |             FILEDATES             %%   \ @  *                %% |         filedates.c  c2003        %%    \@  *                %% |            Lyle W. West           %%    |@  *                %% |                                   %%    |@  *                %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%    |@  *                \                                        \   |@  *                 \                                        \  |@  *                  \                                        \ |@  *                   \________________________________________\|  *  *  *9  *  Copyright (C) 2003 Lyle W. West, All Rights Reserved. J  *  Permission is granted to copy and use this program so long as [1] thisH  *  copyright notice is preserved, and [2] no financial gain is involvedH  *  in copying the program.  This program may not be sold as "shareware"G  *  or "public domain" software without the express, written permission   *  of the author.  *H  *  FILEDATES is an application which is both a subset of DIR/FULL and aH  *  superset DIR/DATE=ALL. Given a parameter being a filespec, FILEDATESL  *  will display the filename, creation date and revision date. Additionaly,J  *  qualifiers are available to display expiration, backup, effective, and  *  recording dates as desired.   *E  *  FILEDATES was created as a helper tool for CHFDAT, CHFNAM, et al.   *F  *  Online help is available after the foreign symbol is defined; From  *  DCL simply enter:   *  *      FILEDATES /HELP   *  *  Usage Examples:   *#  *    $ filedates FILEDATES_CLD.OBJ   *P  *     Target: DISK$ASUSER:[USR4.SOURCE.TOOLS.LOCAL.FILEDATES]FILEDATES_CLD.OBJ;,  *       Creation Date: 15-MAR-2002 02:16:040  *       Revision Date: 15-MAR-2002 02:16:04 (1)  *  *  -- or --  *  *    $ filedates *.obj /backup   *I  *     Target: DISK$ASUSER:[USR4.SOURCE.TOOLS.LOCAL.FILEDATES.WORK]*.OBJ;   *       FILEDATES.OBJ;5-  *        Creation Date: 15-MAR-2002 23:45:30 1  *        Revision Date: 15-MAR-2002 23:45:39 (1) -  *          Backup Date: 30-MAR-2002 02:17:33   *       FILEDATES_CLD.OBJ;4-  *        Creation Date: 20-FEB-2002 20:02:20 1  *        Revision Date: 20-FEB-2002 20:02:20 (1) -  *          Backup Date: 30-MAR-2002 02:17:33   *       SUPPORT.OBJ;2-  *        Creation Date: 15-MAR-2002 13:20:27 1  *        Revision Date: 15-MAR-2002 13:20:34 (1) -  *          Backup Date: 30-MAR-2002 02:17:33   *F  *  An undocumented option exists to also display date/time stamps forC  *  ISO9660 info, currently default for dcl 'dir/full'. This can be :  *  enabled by defining a process logical name as follows:  *"  *      $ DEFINE SHOW_ISO9660 TRUE  *K  *  The two ISO9660 date fields will only be displayed using /ALL qualifier   *@  *  This application must be relinked if the current VMS version+  *  is upgraded to version 7.3-2 or higher.   *M  * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */   