intitles

This assumes you have created the titleprogs script. It searches the current directory for programs in the "titles" dataset as matched by those entries coming out of the titleprogs script.

#!/bin/sh
# Script     : intitles
# Version    : 1.0
# Author     : Roland Rashleigh-Berry
# Date       : 06 Ausgust 2003
# Contact    : rolandberry@hotmail.com
# Purpose    : To display what programs in the current directory are in the
#              titles dataset.
# SubScripts : titleprogs
# Notes      : Assumes the titleprogs script has been written. 
# Usage      : intitles
# 
#================================================================================
# PARAMETERS:
#-pos- -------------------------------description--------------------------------
# N/A  (none)
#================================================================================
# AMENDMENT HISTORY:
# init --date-- mod-id ----------------------description-------------------------
# 
#================================================================================
# This is public domain software. No guarantee as to suitability or accuracy is
# given or implied. User uses this code entirely at their own risk.
#================================================================================

# You must have written the titleprogs script. This should be a list of unique
# program names with no extension that will match the case of the actual program
# names in the directories.

titleprogs | awk '{print $0 ".sas"}' > $HOME/tprogs.tmp

ls *.sas > $HOME/progs.tmp

join $HOME/tprogs.tmp $HOME/progs.tmp

rm -f $HOME/tprogs.tmp $HOME/progs.tmp