Something

cat /proc/net/ip_tables_names | grep -v mangle | while read table; do  $IPTABLES -t $table -L -n | while read c chain rest; do      if test "X$c" = "XChain" ; then        $IPTABLES -t $table -F $chain      fi  done  $IPTABLES -t $table -Xdone