#!C:\MKS\mksnt/ksh.exe
# File: err_compile.ksh
# Purpose: This script will look for *src/*.err files and add them
#          to the Lawson compiler queue.

if [[ $# -ne 1 ]]; then
  print "\nUsage: $0 <product line>\n"
  exit
fi
set -x

PL=$1
cd $LAWDIR/$PL
for ProgCode in `C:/MKS/mksnt/find.exe . -type f -name "*.err"`
do
	Program=`basename "$ProgCode" | cut -f 1 -d '.'`
	SysCode=`dirname $ProgCode | cut -c3-4`
	qcompile $PL $SysCode $Program
done
qstatus