*/
session_start();
if (!session_is_registered("DB_acesso")) {
    echo "<script>location.href='index.php?erroscripts=3'</script>";
}
include "libs/db_conecta.php";
include "libs/db_stdlib.php";
include "libs/db_sql.php";
mens_help();
$dblink = "index.php";
db_logs("", "", 0, "Digita Codigo do Contribuinte.");
db_mensagem("contribuinte_cab", "contribuinte_rod");
postmemory($HTTP_POST_VARS);
$matri = array("1" => "janeiro", "2" => "Fevereiro", "3" => "Março", "4" => "Abril", "5" => "Maio", "6" => "Junho", "7" => "Julho", "8" => "Agosto", "9" => "Setembro", "10" => "Outubro", "11" => "Novembro", "12" => "Dezembro");
$mesx = $matri[$mes];
$clquery = new cl_query();
if (isset($alter)) {
} else {
    if (isset($nova)) {
        $result = pg_exec("select * from issbase inner join cgm on z01_numcgm = q02_numcgm where q02_inscr  = {$inscricaow} and  z01_numcgm = {$numcgm}");
        if (pg_numrows($result) != 0) {
            db_fieldsmemory($result, 0);
        } else {
            redireciona("digitaissqn.php?" . base64_encode("erroscripts=Acesso a Rotina Inválido, verifique os dados digitados!"));
        }
    } elseif (isset($first)) {
        $inscricaow != "" ? "" : ($inscricaow = 0);
        if (!empty($cgc)) {
            $cgccpf = $cgc;
        } else {
            if (!empty($cpf)) {
 *  detalhes.                                                         
 *                                                                    
 *  Voce deve ter recebido uma copia da Licenca Publica Geral GNU     
 *  junto com este programa; se nao, escreva para a Free Software     
 *  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA          
 *  02111-1307, USA.                                                  
 *  
 *  Copia da licenca no diretorio licenca/licenca_en.txt 
 *                                licenca/licenca_pt.txt 
 */
include "libs/db_conecta.php";
include "libs/db_stdlib.php";
define('FPDF_FONTPATH', 'font/');
require "fpdf151/fpdf.php";
postmemory($HTTP_POST_VARS);
$clquery = new cl_query();
$nova = false;
$head1 = "";
$head2 = "";
$head3 = "";
$head4 = "";
$head5 = "";
$head6 = "";
$head7 = "";
$head8 = "";
$head9 = "";
$clquery->sql_query("issplan inner join cgm on q20_numcgm = z01_numcgm", "issplan.*,z01_nome,z01_ender,z01_munic", "", "q20_planilha= {$planilha}");
$clquery->sql_record($clquery->sql);
db_fieldsmemory($clquery->result, 0);
$clquery->sql_query("issplanit", "round(sum(q21_valor),2) as q21_valor", "", "q21_planilha= {$planilha}");
$clquery->sql_record($clquery->sql);
include "libs/db_stdlib.php";
include "libs/db_sql.php";
$result = db_query("SELECT distinct m_publico,m_arquivo,m_descricao\n                   FROM db_menupref\n                   WHERE m_arquivo = 'digitadae.php'\n                   ORDER BY m_descricao\n                   ");
db_fieldsmemory($result, 0);
if ($m_publico != 't') {
    if (!session_is_registered("DB_acesso")) {
        echo "<script>location.href='index.php?" . base64_encode('erroscripts=3') . "'</script>";
    }
    echo "<script>location.href='opcoesdae.php?nova=1'</script>";
}
$db_verifica_ip = db_verifica_ip();
mens_help();
$dblink = "digitadae.php";
db_logs("", "", 0, "Digita inscricao do Contribuinte.");
postmemory($HTTP_POST_VARS);
$clquery = new cl_query();
if (isset($nova)) {
    $clquery->sql_query("issbase", " q02_numcgm ", "", "q02_inscr  = {$inscricaow}");
    $clquery->sql_record($clquery->sql);
    $num = $clquery->numrows;
    if ($num != 0) {
        db_fieldsmemory($clquery->result, 0);
        $clquery->sql_query("cgm", "z01_nome, z01_numcgm", "", " z01_numcgm = {$q02_numcgm}");
        // select z01_nome, z01_numcgm from cgm where z01_numcgm = q02_numcgm
        $clquery->sql_record($clquery->sql);
        // conta as linhas no banco
        db_fieldsmemory($clquery->result, 0);
        // cria variaveis (z01_nome, z01_numcgm) apartir dos campos
    } else {
        redireciona("digitadae.php?" . base64_encode('erroscripts=Acesso a Rotina Inválido, verifique os dados digitados!'));
    }
include "classes/db_issplanit_classe.php";
include "classes/db_issplaninscr_classe.php";
include "classes/db_issplanitinscr_classe.php";
parse_str(base64_decode($HTTP_SERVER_VARS["QUERY_STRING"]));
$result = pg_exec("SELECT distinct m_publico,m_arquivo,m_descricao\n                   FROM db_menupref\n                   WHERE m_arquivo = 'digitaissqn.php'\n                   ORDER BY m_descricao\n                  ");
db_fieldsmemory($result, 0);
if ($m_publico != 't') {
    if (!session_is_registered("DB_acesso")) {
        echo "<script>location.href='index.php?" . base64_encode("erroscripts=3") . "'</script>";
    }
}
mens_help();
db_logs("", "", 0, "Digita Codigo da Inscricao.");
db_mensagem("alvara_cab", "alvara_rod");
postmemory($HTTP_POST_VARS);
$clquery = new cl_query();
$alterando = false;
$matri = array("1" => "janeiro", "2" => "Fevereiro", "3" => "Março", "4" => "Abril", "5" => "Maio", "6" => "Junho", "7" => "Julho", "8" => "Agosto", "9" => "Setembro", "10" => "Outubro", "11" => "Novembro", "12" => "Dezembro");
$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;
    }
 *  detalhes.                                                         
 *                                                                    
 *  Voce deve ter recebido uma copia da Licenca Publica Geral GNU     
 *  junto com este programa; se nao, escreva para a Free Software     
 *  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA          
 *  02111-1307, USA.                                                  
 *  
 *  Copia da licenca no diretorio licenca/licenca_en.txt 
 *                                licenca/licenca_pt.txt 
 */
//include("libs/db_conecta.php");
include "libs/db_stdlib.php";
include "libs/db_sql.php";
define('FPDF_FONTPATH', 'font/');
require "fpdf151/fpdf.php";
$clquery = new cl_query();
$nova = false;
$head1 = "";
$head2 = "";
$head3 = "";
$head4 = "";
$head5 = "";
$head6 = "";
$head7 = "";
$head8 = "";
$head9 = "";
$situacao = "";
$sqluf = "select * from db_config  inner join db_uf on db12_uf=uf  where codigo = " . db_getsession('DB_instit');
$resultuf = pg_query($sqluf);
db_fieldsmemory($resultuf, 0);
$clquery->sql_query("issplan left join issplaninscr on q20_planilha=q24_planilha", "*", "", "q20_planilha= {$planilha}");
 *  Copia da licenca no diretorio licenca/licenca_en.txt 
 *                                licenca/licenca_pt.txt 
 */
//include("libs/db_conecta.php");
include "libs/db_stdlib.php";
include "libs/db_sql.php";
include "dbforms/db_funcoes.php";
include "classes/db_arrecad_classe.php";
include "classes/db_arreold_classe.php";
include "classes/db_issplannumpre_classe.php";
include "classes/db_cairetordem_classe.php";
include "classes/db_issvar_classe.php";
include "classes/db_issplannumpreissplanit_classe.php";
parse_str($HTTP_SERVER_VARS["QUERY_STRING"]);
postmemory($HTTP_POST_VARS);
$clquery = new cl_query();
$cl_issvar = new cl_issvar();
$cl_arreold = new cl_arreold();
$cl_issplannumpre = new cl_issplannumpre();
$cl_arrecad = new cl_arrecad();
$cl_cairetordem = new cl_cairetordem();
$cl_issplannumpreissplanit = new cl_issplannumpreissplanit();
$q24_inscr = 0;
$clquery->sql_query("db_confplan", " * ", "", "");
$clquery->sql_record($clquery->sql);
if (pg_numrows($clquery->result) == 0) {
    echo "<script>window.close();window.opener.alert('Não é possivel gerar recibo. Por favor, contate com a prefeitura.');window.opener.location.href='digitaissqn.php'</script>";
    exit;
}
db_fieldsmemory($clquery->result, 0);
if (!isset($dados_recibo)) {