parse_str($HTTP_SERVER_VARS["QUERY_STRING"]); $pdf = new PDF1(); // abre a classe $Letra = 'arial'; $pdf->SetFont($Letra, 'B', 11); $pdf->Open(); // abre o relatorio $pdf->AliasNbPages(); // gera alias para as paginas $pdf->AddPage(); // adiciona uma pagina $pdf->SetTextColor(0, 0, 0); $pdf->SetFillColor(235); $pdf->Ln(3); $pdf->SetFont($Letra, 'BI', 14); $pdf->MultiCell(0, 6, 'Autorização para impressão de documentos fiscais- AIDOF ', 0, "C", 0); $pdf->SetFont($Letra, 'B', 12); $pdf->Ln(3); $pdf->MultiCell(0, 6, 'EMPRESA SOLICITANTE :', 0, "J", 0); $pdf->Ln(3); $pdf->SetFont($Letra, '', 10); $result = pg_exec("select * from cgm inner join issbase on q02_numcgm = z01_numcgm where q02_inscr = {$inscricao}"); if (pg_numrows($result) > 0) { db_fieldsmemory($result, 0); } $pdf->MultiCell(0, 6, 'Nome : ' . @$z01_nome, 0, "J", 0); $pdf->MultiCell(0, 6, 'CNPJ : ' . @$z01_cgccpf, 0, "J", 0); $pdf->MultiCell(0, 6, 'Endereço : ' . @$z01_ender, 0, "J", 0); $pdf->MultiCell(0, 6, 'Número : ' . @$z01_numero, 0, "J", 0); $pdf->MultiCell(0, 6, 'Complemento : ' . @$z01_compl, 0, "J", 0); $pdf->MultiCell(0, 6, 'Bairro : ' . @$z01_bairro, 0, "J", 0);
$Letra = 'arial'; $pdf->SetFont($Letra, 'B', 11); $pdf->Open(); // abre o relatorio $pdf->AliasNbPages(); // gera alias para as paginas $pdf->AddPage(); // adiciona uma pagina $pdf->SetTextColor(0, 0, 0); $pdf->SetFillColor(235); $pdf->Ln(10); $pdf->Cell(3, 1, "CONTRIBUINTE: ", 0, 0, "L", 0); $pdf->Ln(3); $pdf->SetFont($Letra, '', 10); $pdf->Cell(80, 6, 'NOME: ' . @$z01_nome, 0, 0, "J", 1); $pdf->MultiCell(0, 6, 'CIDADE: ' . @$z01_munic, 0, "J", 1, 30); $pdf->Cell(80, 6, 'ENDEREÇO: ' . @$w05_rua, 0, 0, "J", 1); $pdf->MultiCell(0, 6, 'NÚMERO: ' . @$w05_numero, 0, "J", 1, 30); $pdf->Cell(80, 6, 'COMPLEMENTO: ' . @$w05_compl, 0, 0, "J", 1); $pdf->Cell(80, 6, 'BAIRRO: ' . @$w05_bairro, 0, 0, "J", 1); $pdf->Ln(10); $pdf->SetFont($Letra, 'B', 11); $pdf->Cell(3, 1, "SÓCIOS: ", 0, 0, "L", 0); $pdf->Ln(3); $pdf->SetFont($Letra, 'I', 10); if (pg_numrows($resultsocios) > 1) { for ($i = 0; $i < pg_numrows($resultsocios); $i++) { db_fieldsmemory($resultsocios, $i); $pdf->Cell(50, 6, 'CNPJ/CPF: ' . $w06_cgccpf, 1, 0, "J", 1); $pdf->Cell(100, 6, 'Nome: ' . $w06_nome, 1, 0, "J", 1); $pdf->MultiCell(0, 6, 'RG: ' . $w06_rg, 1, "J", 1);
$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); $sP12_cnpj = convert_CPFCNPJ($p12_cnpj); if (strlen($sP12_cnpj) >= 14) {
$numer = $codimpresso != 0 ? " Nº {$codimpresso} " : ""; } $pdf->SetFont('Arial', 'b', 13); $pdf->cell(0, 5, $tipocer . $numer, 0, 1, "C", 0); $pdf->ln(); for ($i = 0; $i < $numrows; $i++) { db_fieldsmemory($result, $i); if ($db02_descr == 'CODIGO PHP') { eval($db02_texto); } else { $pdf->SetFont('Arial', '', 12); $pdf->SetX($db02_alinha); $texto = db_geratexto($db02_texto); $pdf->SetFont('Arial', '', 12); $pdf->cell(15, 6, "", 0, 0, "R", 0); $pdf->MultiCell("0", 4 + $db02_espaca, $texto, "0", "J", 0, $db02_inicia + 0); $pdf->cell(0, 6, "", 0, 1, "R", 0); } } $pdf->SetX(@$x + 80); $y = $pdf->GetY(); $x = $pdf->GetX(); $pdf->SetXY($x + 80, $y + 10); //**************************************** FIM PDF ******************************************************// /************************************ R O D A P E (recibo) D A C N D *******************************************************/ if (isset($cadrecibo) && $cadrecibo == 't') { $y = $pdf->w - 20; } else { $y = $pdf->GetY() - 20; } if (isset($cadrecibo) && $cadrecibo == 't') {