CH="$BDA/contenu"

cd $BDA/$1

for i in `ls`
do

cd $BDA/$1/$i
 
test -f spt.sup || continue

testfZ spt.don

if test -f spt.don
then
  cat spt.sup >> spt.don
  sort -o spt.don -n +0 +1 spt.don
  NET=`zex spt.don | net | awkpr1`
  NENR=`zex spt.don | nenr | awkpr1`
  AMA=`awkam $OCL`
  awkmsjcnt $NENR $NET $AMA < $CH/spt.sup > $CH/cnt.mod
  mv $CH/cnt.mod $CH/spt.sup
  rm spt.sup
else
  mv spt.sup spt.don
  compress spt.don
fi

done