grep "^ *[0-9]" infile435 | cut -c15-88 |
while read portnames stat1 stat2 stat3 stat4 stat5 stat6
do
  i=0
  while [ $((i+=1)) -le 6 ]
  do
    eval s=\$stat$i
    if [ "$s" != "111111" ] && [ -n "${s## *}" ]; then
      echo "${portnames%-*}$i"
    fi
  done
done

grep "^ *[0-9]" infile435 | cut -c15-88 |
while read cellnames cfrphem1 cfrphem2 cfrphem3 cfrphem4 cfrphem5 cfrphem6
do
  i=0
  while [ $((i+=1)) -le 6 ]
  do
    eval s=\$cfrphem$i
    if [ "$s" != "111111" ] && [ -n "${s## *}" ]; then
      echo "${cellnames%-*}$i"
    fi
  done
done