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') {
