: !/bin/sh

tmpfile="/tmp/gdm$$"

cat wb2_m11.in | awk -F'|' '{ print $2 "|" $1 "|" $3 }' | sort -u >$tmpfile

(
cat wb2_m11.in | awk -F'|' '{ print $2 "|" $1 }' | sort -u | \
awk -F'|' '{ print $1 " " substr($1,1,4) "-" substr($1,5) }' | uniq -d | \
while read sid mobile
do
	echo ">>>>>>>>>>> $sid ____ $mobile <<<<<<<<<<<<<"
	grep $sid $tmpfile
	grep $mobile HIERIDx_tall.lst
	echo "  -------------"
	grep $mobile indata/Sep_2002/*/*.cde
	echo "  -------------"
	grep $mobile HIERIDx_tall.lst | awk -F'|' '{deptid=$4;print deptid}' | \
	while read deptid
	do
		echo "       >>>> deptid = $deptid <<<<"
		grep "|$deptid|" DEPTID_tall.lst
	done	
	echo ""
done
) 2>&1 |tee $0.out

rm -f $tmpfile