Вычисляем партнум
echo "select lower(hex(partnum)) from systables where tabname = '<tabname>' " | dbaccess <dbname>

киляем
k=`onstat -g opn | grep <partnum> | nawk '{print substr($2,4)}' | sort -d | uniq | nawk '{printf("%s|", $1) } END{print "aaaaaa"}'` ; onstat -u | egrep "$k" | grep -v informix | nawk '{k="onmode -z "$3 ; system(k)}'
как-то так

вместо nawk - awk можно использовать, как-то привык под соляркой к nawk
под bash работает
скрипт <file>.sh <dbname> <tabname>
пару раз хотел было сделать, но как-то забил - не часто просят