大致是取出所有带这个字段的程式 逐个编译
#!/bin/bash
if [ -z "$1" ]
then
echo "Usage: `basename $0` $1 not exsit"
exit 0
fi
grep -l $1 $TOP/*/4gl/*.4gl > dj.sh
grep -l $1 $CUST/*/4gl/*.4gl >> dj.sh
sed -i "s/\.4gl//g" dj.sh
sed -i "s/\(.*\)/cd \1/g" dj.sh
sed -i "s/4gl\//4gl\n r.c2 /g" dj.sh
sh dj.sh
sed -i "s/r.c2/r.l2/g" dj.sh
sh dj.sh
rm dj.sh