?>
 <table width="300" align="center" border="0" bordercolor="#cccccc" cellpadding="2" cellspacing="0" class="texto">
  <tr height="220">
   <td align="center">
    <img src="imagens/atencao.gif"><br>
    Para acessar suas informações, efetue login.
   </td>
  </tr>
 </table>
<?php 
} elseif ($w13_permfornsemlog == "t") {
    //verifica se está logado
    if (@$codigo_cgm != "" || @$_COOKIE["cookie_codigo_cgm"] != "") {
        $usuario = $codigo_cgm == "" ? $_COOKIE["cookie_codigo_cgm"] : $codigo_cgm;
        // die($clcgm->sql_query("","cgm.z01_cgccpf, cgm.z01_nome, cgm.z01_numcgm","","cgm.z01_numcgm = $usuario"));
        $result = $clcgm->sql_record($clcgm->sql_query("", "cgm.z01_cgccpf, cgm.z01_nome, cgm.z01_numcgm", "", "cgm.z01_numcgm = {$usuario}"));
        $linhas = $clcgm->numrows;
        if ($linhas != 0) {
            db_fieldsmemory($result, $x);
            //11 14
            if (strlen($z01_cgccpf) > 11) {
                $cgc = $z01_cgccpf;
                $cpf = "";
            } else {
                $cgc = "";
                $cpf = $z01_cgccpf;
            }
            db_redireciona("digitafornecedor.php?id_usuario={$z01_numcgm}&cpf={$cpf}&cgc={$cgc}");
        }
    } else {
        ?>
$Letra = 'arial';
$pdf->SetFont($Letra, 'B', 8);
$pdf->Open();
$pdf->AliasNbPages();
$pdf->AddPage();
$pdf->SetTextColor(0, 0, 0);
$pdf->SetFillColor(235);
$sSql = "select * \n            from db_config \n           where codigo = " . db_getsession('DB_instit');
$rsSql = pg_query($sSql);
if (pg_numrows($rsSql) > 0) {
    db_fieldsmemory($rsSql, 0);
}
$total = 0;
if ($cllistainscr->numrows > 0) {
    db_fieldsmemory($result, 0);
    $result1 = $clcgm->sql_record($clcgm->sql_query($p11_numcgm));
    db_fieldsmemory($result1, 0);
    $pdf->MultiCell(190, 4, "" . $z01_nome . ", vem pela presente requerer habilitação e/ou desabilitação de acesso via internet do Cadastro Fiscal do Município de " . @$munic . " ( " . @$url . "/dbpref) dos contribuintes a seguir relacionados conforme o tipo de lançamento:", 0, "J", 0, 15);
    $pdf->ln(5);
    $posicao = $pdf->getY();
    $pdf->SetFont($Letra, 'B', 7);
    $pdf->SetFillColor(235);
    $pdf->Cell(25, 4, "INSCRIÇÃO ", 1, 0, "C", 1);
    $pdf->Cell(35, 4, "CNPJ / CPF", 1, 0, "C", 1);
    $pdf->Cell(26, 4, "TELEFONE ", 1, 0, "C", 1);
    $pdf->Cell(70, 4, "NOME ", 1, 0, "C", 1);
    $pdf->Cell(34, 4, "TIPO LANÇAMENTO ", 1, 1, "C", 1);
    $pdf->SetFillColor(255);
    for ($x = 0; $x < $numrows; $x++) {
        $total += $i;
        db_fieldsmemory($result, $x);
if (@$_COOKIE["cookie_codigo_cgm"] == "") {
    // issbase
    if (@$inscricaow != "") {
        @($result = $clissbase->sql_record($clissbase->sql_query("", "cgm.z01_numcgm,cgm.z01_nome", "", "issbase.q02_inscr = {$inscricaow} and trim(cgm.z01_cgccpf) = '{$cgccpf}'")));
        @($linhas1 = $clissbase->numrows);
    } else {
        if (!empty($codigo_cgm) || !empty($cgc) || !empty($cpf)) {
            //CGM
            if (!empty($codigo_cgm)) {
                $condicao = "cgm.z01_numcgm = {$codigo_cgm}";
            } else {
                if (!empty($cgccpf)) {
                    $condicao = "trim(cgm.z01_cgccpf) = '{$cgccpf}'";
                }
            }
            @($result = $clcgm->sql_record($clcgm->sql_query("", "cgm.z01_numcgm,cgm.z01_nome", "", $condicao)));
            @($linhas2 = $clcgm->numrows);
        } else {
            if (@$matricula1 != "") {
                //Matricula
                $sql_exe = " select cgm.*\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t   ";
                $sql_exe .= "   from fc_busca_envolvidos(false,{$db21_regracgmiptu},'M',{$matricula1}) ";
                $sql_exe .= "\t\t inner join cgm on z01_numcgm = rinumcgm\t\t\t\t           ";
                $sql_exe .= "  where rimatric = {$matricula1}\t\t \t\t\t\t\t\t\t\t   ";
                if ($sConfig["w13_exigecpfcnpjmatricula"] == "t") {
                    $sql_exe .= " and trim(z01_cgccpf) = '{$cgccpf}' ";
                }
                $result = db_query($sql_exe);
                $linhas3 = pg_num_rows($result);
            }
        }
              <table width="100%" border="0" cellspacing="0" cellpadding="0">
                <tr> 
                  <td height="60" align="<?php 
    echo $DB_align1;
    ?>
">
                    <?php 
    echo $DB_mens1;
    ?>
                  </td>
                </tr>
                <tr> 
                  <td align="center" valign="top">
                  <?php 
    $clcgm = new cl_cgm();
    $result = $clcgm->sql_record($clcgm->sql_query($z01_numcgm));
    //die($clcgm->sql_query($z01_numcgm));
    if ($clcgm->numrows > 0) {
        db_fieldsmemory($result, 0);
        echo "<p><font size='2'><strong>Escritório Contábil</strong> " . @$z01_nome . "</font></p>";
        $sqllista = "select * from listainscrcab where p11_numcgm={$z01_numcgm}";
        // die($sqllista);
        $result = pg_query($sqllista);
        $linhas = pg_num_rows($result);
        if ($linhas > 0) {
            // se existir lista ... verificar se tem lista em aberto
            $sql = "select * from listainscrcab where p11_numcgm={$z01_numcgm} and p11_fechado is false and p11_processado is false";
            $result = pg_query($sql);
            $linhas2 = pg_num_rows($result);
            //db_fieldsmemory($result,0);
            if ($linhas == 0) {
            $clissbase = new cl_issbase();
            $result_inf = pg_exec("select * from empresa where q02_inscr = {$inscr}");
            //      if($clissbase->numrows!=0){
            if (pg_numrows($result_inf) != 0) {
                db_fieldsmemory($result_inf, 0);
                $z01_numcgm = $q02_numcgm;
            } else {
            }
        } else {
            if (!empty($numpre)) {
                $result_teste = debitos_numpre($numpre, 0, 0, $DB_DATACALC, $DB_anousu, 0, '', 'k00_tipo,k00_numpre,k00_numpar,k00_receit');
                $outros = "Código Arrecadação: " . $numpre;
                $result = debitos_numpre($numpre, 0, 0, $DB_DATACALC, $DB_anousu, 0, '', 'k00_tipo,k00_numpre,k00_numpar,k00_receit');
                $z01_numcgm = pg_result($result, 0, "k00_numcgm");
                $clcgm = new cl_cgm();
                $result = $clcgm->sql_record($clcgm->sql_query_file($z01_numcgm, "z01_nome"));
                db_fieldsmemory($result, 0);
                //$result = debitos_numpre($numpre,0,0,$DB_DATACALC,$DB_anousu,0,'','k00_tipo,k00_numpre,k00_receit,k00_numpar',$desconto);
                $result = debitos_numpre($numpre, 0, 0, $DB_DATACALC, $DB_anousu, 0, '', 'k00_tipo,k00_numpre,k00_numpar,k00_receit');
                $result = debitos_numpre($numpre, 0, 0, $DB_DATACALC, $DB_anousu, 0, '', 'k00_tipo,k00_numpre,k00_numpar,k00_receit', $where);
            }
        }
    }
}
$pdf = new PDF();
$pdf->Open();
$pdf->AliasNbPages();
//$pdf->AddPage();
$pdf->SetFillColor(235);
//Dados
$dados = pg_exec("select z01_numcgm,z01_nome,z01_ender,z01_munic,z01_uf,z01_cgccpf,z01_ident,z01_numero,z01_compl\nfrom cgm where z01_numcgm = {$z01_numcgm}");
}
$db_verificaip = db_verifica_ip();
mens_help();
$dblink = "atualizaendereco.php";
db_logs("", "", 0, "Atualiza endereço CGM.");
db_mensagem("endereco_cab", "endereco_rod");
if ($db_verificaip == "0") {
    $onsubmit = "onsubmit=\"return js_verificaCGCCPF((this.cgc.value==''?'':this.cgc),'');\"";
} else {
    $onsubmit = "";
}
parse_str(base64_decode($HTTP_SERVER_VARS["QUERY_STRING"]));
if ($cgmlogin == "") {
    db_redireciona("centro_pref.php");
} else {
    $result = $cl_cgm->sql_record($cl_cgm->sql_query("", "*", "", "cgm.z01_numcgm = {$cgmlogin}"));
    if ($cl_cgm->numrows != 0) {
        db_fieldsmemory($result, 0);
        $w11_cgccpf = $z01_cgccpf;
    }
}
////gravar
if (isset($incluir)) {
    @($result2 = $cldb_cgmatualiza->sql_record($cldb_cgmatualiza->sql_query("", "*", "", "w11_numcgm = {$cgmlogin}")));
    db_inicio_transacao();
    if ($cldb_cgmatualiza->numrows == 0) {
        //insert
        $cldb_cgmatualiza->incluir(null);
        //cgmatualizaliga se cgm não for novo
        if ($w11_cgmnovo == "f") {
            $cldb_cgmatualizaliga->w12_cgmatualiza = $cldb_cgmatualiza->w11_sequencial;
            }
        }
    }
}
db_fim_transacao(false);
/**
 * GERA PDF
 */
$cl_cgm = new cl_cgm();
if (isset($z01_numcgm) || @$z01_numcgm != null || @$z01_numcgm != '') {
    $sSqlIdent = $cl_cgm->sql_query("", "*", "", "z01_numcgm = {$z01_numcgm}");
} else {
    $sSqlIdent = $cl_cgm->sql_query("", "*", "", "z01_cgccpf = '{$z01_cgccpf}'");
}
//die($sSqlIdent);
$rsIdent = $cl_cgm->sql_record($sSqlIdent);
if ($cl_cgm->numrows > 0) {
    db_fieldsmemory($rsIdent, 0);
}
$z01_cgmpri = $z01_numcgm;
$sqlDbconfig = "select * from db_config where codigo = " . db_getsession('DB_instit');
$rsDbconfig = db_query($sqlDbconfig);
db_fieldsmemory($rsDbconfig, 0);
/**
 *  Criada este select apenas para corrigir o nome na identificação do contribuinte
 *  de acordo com a configuração encontrada no campo (db21_regracgmiptu) na tabela db_config
 *
 *  Isso faz com que não aparece o nome do proprietário e sim o nome do promitente.
 */
if ($db21_regracgmiptu == 2 && isset($matric)) {
    $sSqlNomePromitente = "select * from proprietario where j01_matric = {$matric}";
            db_fim_transacao(false);
        } catch (Exception $oException) {
            $oRetorno->sMessage = $oException->getMessage();
            db_fim_transacao(true);
            $oRetorno->iStatus = 2;
        }
        break;
    case 'getNome':
        require_once 'classes/db_cgm_classe.php';
        $oDaoCgm = new cl_cgm();
        $aRetornoDados = array();
        $iCgcCpf = $oParam->z01_cgccpf;
        $sCampos = "z01_nome, ";
        $sCampos .= "z01_email ";
        $sSqlDados = $oDaoCgm->sql_query_file(null, $sCampos, null, "z01_cgccpf = '{$iCgcCpf}' ");
        $rsDados = $oDaoCgm->sql_record($sSqlDados);
        if ($oDaoCgm->numrows > 0) {
            $oDados = db_utils::fieldsMemory($rsDados, 0);
            $oDdosCgm = new stdClass();
            $oDdosCgm->z01_nome = $oDados->z01_nome;
            $oDdosCgm->z01_email = $oDados->z01_email;
            $aRetornoDados[] = $oDdosCgm;
            $oRetorno->aDados = $aRetornoDados;
        } else {
            $oRetorno->iStatus = 2;
            $oRetorno->sMessage = "Cpf ou Cnpj, nao encontrado no sistema";
        }
        break;
}
$oRetorno->sMessage = urlencode($oRetorno->sMessage);
echo $oJson->encode($oRetorno);
* Descricao: grava os clientes informados na lista
* */
if (isset($adicionar)) {
    if ($escrito == "true") {
        /*
        * Referencia: valida regras informadas
        * Descricao: funcao php para verificar consistencia dos dados conforme regra informada
        * */
        $validaRegra = validaRegra($regra, $numCgm, $p12_inscr, $p12_cnpj, $p12_tipolanc);
        /*
        * Referencia: Verifica consistencia dos dados
        * Descricao: select para pesquisa se cgccpf informado coresponde a inscr e numcgm informado na consulta, 
        * se campo estiver vazio nao permite incluir cliente na lista
        * */
        $str_sql = " select * \n                  from cgm\n                       left outer join db_cgmbairro on cgm.z01_numcgm     = db_cgmbairro.z01_numcgm\n                       left outer join db_cgmcgc    on cgm.z01_numcgm     = db_cgmcgc.z01_numcgm\n                       left outer join db_cgmcpf    on cgm.z01_numcgm     = db_cgmcpf.z01_numcgm\n                       left outer join db_cgmruas   on cgm.z01_numcgm     = db_cgmruas.z01_numcgm\n                       inner join issbase           on issbase.q02_numcgm = cgm.z01_numcgm\n                 where cgm.z01_cgccpf    = '{$p12_cnpj}'\n                   and issbase.q02_inscr = '{$p12_inscr}' ";
        $clcgm->sql_record($str_sql);
        /*
        * Referencia: verifica retorno do sql anterior
        * Descricao: verifica se dados informados estao consistentes se nao nao permite inclusao na tabela listainscr
        * */
        if ($clcgm->numrows == 1) {
            if ($p12_tipolanc != 0) {
                $cllistainscr->p12_tipolanc = $p12_tipolanc;
            }
            db_inicio_transacao();
            $cllistainscr->p12_fone = $p12_fone;
            $cllistainscr->incluir($oCriaLista->p11_codigo, $p12_inscr, $p12_cnpj);
            db_fim_transacao();
            if ($cllistainscr->erro_status == "0") {
                @$cllistainscr->erro();
            } else {
$cl_aidofautenticidade = new cl_aidofautenticidade();
parse_str($HTTP_SERVER_VARS['QUERY_STRING']);
$sqlpref = "select * from db_config where codigo = " . db_getsession("DB_instit");
$resultpref = pg_exec($sqlpref);
if (pg_numrows($resultpref) != 0) {
    db_fieldsmemory($resultpref, 0);
}
$result_aidof = $claidof->sql_record($claidof->sql_query_file($codaidof));
if ($claidof->numrows != 0) {
    db_fieldsmemory($result_aidof, 0);
}
$result_notasiss = $clnotasiss->sql_record($clnotasiss->sql_query_file(null, "q09_descr as especie", null, "q09_codigo={$y08_nota}"));
if ($clnotasiss->numrows != 0) {
    db_fieldsmemory($result_notasiss, 0);
}
$result_graf = $clcgm->sql_record($clcgm->sql_query_file($y08_numcgm, "z01_nome as nome_graf,z01_ender as ender_graf,z01_numero as num_graf,z01_cgccpf as cgccpf_graf,z01_bairro as bairro_graf,z01_munic as munic_graf"));
if ($clcgm->numrows != 0) {
    db_fieldsmemory($result_graf, 0);
}
$result_graf_inscr = $clissbase->sql_record($clissbase->sql_query_file(null, "q02_inscr as inscr_graf", null, "q02_numcgm={$y08_numcgm}"));
if ($clissbase->numrows != 0) {
    db_fieldsmemory($result_graf_inscr, 0);
}
$sql_empr = "select q02_inscr as inscr_usu,z01_nome as nome_usu,z01_ender as ender_usu,z01_numero as num_usu,z01_cgccpf as cgccpf_usu,z01_bairro as bairro_usu,z01_munic as munic_usu from empresa where q02_inscr={$y08_inscr}";
$result_empresa = pg_exec($sql_empr);
if (pg_numrows($result_empresa) != 0) {
    db_fieldsmemory($result_empresa, 0);
}
//***************************
$mes = date("m");
$ano = date("Y");