cd /local/services/www/sap/dns/lib
for i in `ls *.tex *.htgt`
do
    case $i in
	*.htgt)	H=`echo $i | sed 's/htgt$/html/'` ;;
	*)	H=$i ;;
    esac

    echo "$H"
    sed -n -e '/%[A-Z][A-Z]*%/ {
				    s/[^%]*\(%[A-Z][A-Z]*%\)[^%]*/\1/g
				    s/%%/%\
%/g
				    s/%/\\\\%/g
				    p
				}
	' $i | \
	sort -u | \
	while read trou
	do
	    echo "    & \\texttt {$trou}"
	    echo "    & description"
	    echo "    \\\\ \\cline {2-3}"
	done
	echo "    \\\\ \\hline"

done
