abrePagina("Submissao de Sequencias por Laboratório"); $genopar->abreBanco(); verGetPost(array("processa", "bco")); $bcos= array(); $n= $genopar->queryBanco("select bco from prod group by bco"); while($lin=$genopar->getArray()) array_push($bcos,$lin["bco"]); echo '

'; echo ''; echo '

'; # DATA echo "Biblioteca: "; echo ""; echo "*"; foreach ($bcos as $value) echo "$value"; echo ''; echo '    '; echo '

---

'; echo ""; if (isset($bco) && $bco != '*') echo ""; else echo ""; echo ""; $genopar->fechaPagina(); ?>