/*===========================================================================* 
 *  RCD.CMD                                                     version 1.2  * 
 *                                                                           * 
 *  This REXX script can be used like the NCD command that is part of Norton * 
 *  Utilities.  This is my first try at creating a useful REXX script.       * 
 *  This script is FREEWARE.  Please use it all you wish, and If you can     * 
 *  improve it, please do so.  All I ask is that if you change this command  * 
 *  and distribute an improved version, that I get a copy of the changes.    * 
 *  You can contact me with suggestions or bug reports on the Internet at    * 
 *  'easyrob@cs.utexas.edu'.  Thanks.                                        * 
 *                                                                           * 
 *---------------------------------------------------------------------------* 
 *  Usage: rcd [-r| r] <dirname>                                             * 
 *                                                                           * 
 *  Flags: -r      Reads current directory structure and updates the         * 
 *                 rcd database.  The database is kept in \rcd.db on         * 
 *                 the current drive and is automatically created If         * 
 *                 it does not exist.                                        * 
 *                                                                           * 
 *  Changes current directory to a directory named in the database that      * 
 *  matches or has <dirname> as a substring.  If there is more than one      * 
 *  possible destination then each choice is shown and the ENTER key         * 
 *  chooses the destination.  The TAB and arrow keys move through the        * 
 *  list and the ESC key quits without changing the directory.               * 
 *---------------------------------------------------------------------------* 
 *  Developed by:  Robert D. Reynolds                                        * 
 *                                                                           * 
 *  The beginning: 07/07/92       RDR                                        * 
 *           v1.0: 07/10/92       RDR                                        * 
 *           v1.1: 07/11/92       RDR - Fixed bug with spaces in directory   * 
 *                                      names.                               * 
 *           v1.2: 07/14/92       RDR - Uses more REXX internal functions    * 
 *                                      fixes bug when target was not found  * 
 *                                      and problem with $DIRCMD.            * 
 *                                                                           * 
 *===========================================================================*/