$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) {
$cgccpf = db_formatar($sP12_cnpj, 'cnpj');
} else {
$cgccpf = db_formatar($sP12_cnpj, 'cpf');
}
$pdf->SetFont($Letra, 'I', 6);
$pdf = new PDF1();
// abre a classe
$pdf->SetFont('arial', 'B', 10);
$head1 = "DECLARAÇÃO ANUAL DE ISSQN \n EXERCÍCIO: {$w04_ano} - DATA DE ENVIO: " . ($w04_data != "" ? db_formatar($w04_data, 'd') : "") . " \n INSCRIÇÃO: {$w04_inscr}";
$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++) {
