echo "  <table width=\"100%\" border=\"1\" cellspacing=\"0\" cellpadding=\"0\" >\n";
 echo "      <tr>\n ";
 echo "        <td align=\"center\" bgcolor=\"#00436E\" width=\"6%\"><small><b>CNPJ</b></small></td>\n";
 echo "        <td align=\"center\" bgcolor=\"#00436E\" width=\"9\"><small><b>Inscrição</b></small></td>\n";
 echo "        <td align=\"center\" bgcolor=\"#00436E\" width=\"15%\"><small><b>Nome/Razão</b></small></td>\n";
 echo "        <td align=\"center\" bgcolor=\"#00436E\" width=\"18%\"><small><b>Serviço</b></small></td>\n";
 echo "        <td align=\"center\" bgcolor=\"#00436E\" width=\"7%\"><small><b>Nota</b></small></td>\n";
 echo "        <td align=\"center\" bgcolor=\"#00436E\" width=\"7%\"><small><b>Série</b></small></td>\n";
 echo "        <td align=\"center\" bgcolor=\"#00436E\" width=\"10%\"><small><b>Valor</b></small></td>\n";
 echo "        <td align=\"center\" bgcolor=\"#00436E\" width=\"10%\"><small><b>Aliquota</b></small></td>\n";
 echo "        <td align=\"center\" bgcolor=\"#00436E\" width=\"10%\"><small><b>Total</b></small></td>\n";
 echo "        <td align=\"center\" bgcolor=\"#00436E\" width=\"8%\"><small><b>Opções</b></small></td>\n";
 echo "      </tr>\n";
 $mostra_gravar = true;
 for ($xi = 0; $xi < $numrows2; $xi++) {
     $clquery->sql_result($result2, $xi, "q21_cnpj");
     $cnpj = $clquery->resultado;
     $clquery->sql_result($result2, $xi, "q21_inscr");
     $inscricao = $clquery->resultado;
     $clquery->sql_result($result2, $xi, "q21_nome");
     $nomerazao = $clquery->resultado;
     $clquery->sql_result($result2, $xi, "q21_servico");
     $sprestado = $clquery->resultado;
     $clquery->sql_result($result2, $xi, "q21_nota");
     $numnota = $clquery->resultado;
     $clquery->sql_result($result2, $xi, "q21_serie");
     $numserie = $clquery->resultado;
     $clquery->sql_result($result2, $xi, "q21_valorser");
     $valservico = $clquery->resultado;
     $clquery->sql_result($result2, $xi, "q21_aliq");
     $aliquota = $clquery->resultado;
$mesx = $matri[$mes];
$clquery->sql_query("issplan", "q20_nomecontri,q20_planilha, q20_numcgm, q20_ano, q20_mes,q20_numpre", "q20_mes", "q20_ano = {$ano} and q20_mes={$mes} and q20_numcgm= {$numcgm} or q20_ano = {$ano} and q20_numpre is null and q20_numcgm= {$numcgm}");
//die("$clquery->sql");  // traz todos do ano e mes selecionado ou ano e numpre = nada pelo cgc.
$clquery->sql_record($clquery->sql);
$numrows = $clquery->numrows;
$result = $clquery->result;
for ($x = 0; $x < $numrows; $x++) {
    $alterar = "alterar_" . $x;
    if (isset(${$alterar})) {
        $alterando = true;
        $numer = $x;
        break;
    }
}
if ($alterando == true) {
    $clquery->sql_result($result, $numer, 0);
    $codigopla = $clquery->resultado;
    $clquery->sql_result($result, $numer, 5);
    db_redireciona("opcoesissqn.php?" . base64_encode("modificando=true&alter=true&nomecontri=" . $nomecontri . "&fonecontri=" . $fonecontri . "&mes=" . $mes . "&ano=" . $ano . "&numcgm=" . $numcgm . "&nomes=" . $nomes . "&inscricaow=" . $inscricaow . "&planilha=" . $codigopla));
    exit;
}
$anocorreto = $ano;
$mescorreto = $mes;
$clquery->sql_query("db_confplan", " * ", "", "");
$clquery->sql_record($clquery->sql);
if (pg_numrows($clquery->result) == 0) {
    $w10_valor = 0;
}
db_fieldsmemory($clquery->result, 0);
//#######################    Excluir planilha  #########################
$cl_issplan = new cl_issplan();