if ($linhastomador == 0) { $pdf->MultiCell(0, 6, 'SEM VALORES NA RETENÇÃO COMO TOMADOR TOMADOR LANÇADOS', 0, "J", 1); } else { $pdf->Cell(3, 1, "RETENÇÃO COMO TOMADOR: ", 0, 0, "L", 1); } $pdf->Ln(3); $pdf->SetFont($Letra, '', 8); if ($linhastomador != 0) { $total = 0; $totali = 0; $totalvp = 0; for ($t = 0; $t < $linhastomador; $t++) { db_fieldsmemory($resulttomador, $t); $pdf->SetFillColor(200); $pdf->Cell(26, 6, 'Mês: ' . db_mes($w08_mes), 1, 0, "L", 1); $pdf->Cell(50, 6, 'CPF ou CNPJ: ' . db_cgccpf($w08_cnpj), 1, 0, "L", 1); $pdf->Cell(114, 6, 'Nome ou Razão Social: ' . $w08_nome, 1, 1, "L", 1); $pdf->SetFillColor(235); $pdf->Cell(114, 6, 'Serviço: ' . $w08_servico, 1, 0, "L", 0); $pdf->Cell(38, 6, 'Nota: ' . $w08_nota, 1, 0, "L", 0); $pdf->Cell(38, 6, 'Serie: ' . $w08_serie, 1, 1, "L", 0); $pdf->Cell(38, 6, 'Valor: ' . db_formatar($w08_valreceita, 'f'), 1, 0, "L", 0); $pdf->Cell(38, 6, 'Alíquota: ' . $w08_aliquota . " %", 1, 0, "L", 0); $pdf->Cell(38, 6, 'Imposto: ' . db_formatar($w08_imposto, 'f'), 1, 0, "L", 0); $pdf->Cell(38, 6, 'Data do pagto: ' . ($w09_dtpaga != '' ? db_formatar($w09_dtpaga, 'd') : 'não efetuado'), 1, 0, "L", 0); $pdf->Cell(38, 6, 'Valor pago: ' . ($w09_valpago != '' ? db_formatar($w09_valpago, 'f') : 'nâo efetuado'), 1, 1, "L", 0); $total += $w08_valreceita; $totali += $w08_imposto; //if ($w09_valpago!='') $totalvp += $w09_valpago; }
if (isset($planilha)) { if ($planilha != "" || $planilha != 0) { $sql = "select *,\n\t\t\t\t\t\t\t\t\t\tcase when q21_tipolanc = 1 then 'Tomado' \n\t\t\t\t\t\t\t\t\t\t\t\telse 'Prestado' \n\t\t\t\t\t\t\t\t\t\tend as tipolanc\n\t\t\t\t\t\t\t\t\tfrom issplanit \n\t\t\t\t\t\t\t\t\tleft join issplanitinscr on q21_sequencial=q31_issplanit \n\t\t\t\t\t\t\t\t\twhere q21_planilha= {$planilha} and q21_status = 1\n\t\t\t\t\t\t\t\t\torder by q21_tipolanc,q21_datanota"; //monta_tabela($sql,$parametro); //die($sql); $resultx = db_query($sql); $linhax = pg_num_rows($resultx); // db_msgbox("nnnnnnnnnnn".$int_max." lin=".$linhax); if ($linhax > 0) { if ($linhax > $int_max) { db_msgbox("Voce deve criar outra planilha"); echo "<script> document.form1.grava.style.visibility='hidden';\n\t\t\t\t\t </script>"; } for ($x = 0; $x < $linhax; $x++) { db_fieldsmemory($resultx, $x); echo "\n\t\t\t\t\t\t\t\t\t\t\t<tr>\n\t\t\t\t\t\t\t\t\t\t\t<td align= 'center'>{$tipolanc}</td>\n\t\t\t\t\t\t\t\t\t\t\t<td align= 'center'>{$q31_inscr}</td>\n\t\t\t\t\t\t\t\t\t\t\t<td align= 'left'>" . db_cgccpf($q21_cnpj) . "</td>\n\t\t\t\t\t\t\t\t\t\t\t<td align= 'left'>{$q21_nome}</td>\n\t\t\t\t\t\t\t\t\t\t\t<td align= 'center'>{$q21_nota}</td>\n\t\t\t\t\t\t\t\t\t\t\t<td align= 'center'>{$q21_serie}</td>\n\t\t\t\t\t\t\t\t"; if ($q21_datanota != "") { echo "<td align= 'center'>" . db_formatar($q21_datanota, "d") . "</td>"; } else { echo "<td align= 'center'></td>"; } echo "\n\t\t\t\t\t\t\t\t\t\t\t<td align= 'right'>" . db_formatar($q21_valorbase, 'f') . "</td>\n\t\t\t\t\t\t\t\t\t\t\t<td align= 'center'>{$q21_aliq}%</td>\n\t\t\t\t\t\t\t\t\t\t\t<td align= 'right'>" . db_formatar($q21_valor, 'f') . "</td>\n\t\t\t\t\t\t\t\t\t\t\t<td width= '150px'>\n\t\t\t\t\t\t\t \t <input class=\"botao\" name=\"alterar teste\" type=\"button\" value=\"Alterar\" onClick=\"js_alterar('{$q31_sequencial}','{$q31_inscr}','{$q21_sequencial}','{$q21_planilha}','{$q21_cnpj}','{$q21_nome}','{$q21_servico}','{$q21_nota}','{$q21_serie}','{$q21_valorser}','{$q21_aliq}','{$q21_valor}','{$q21_tipolanc}','{$q21_situacao}','{$q21_valordeducao}','{$q21_valorbase}','{$q21_retido}','{$q21_obs}','{$q21_valorimposto}', '" . db_formatar($q21_datanota, "d") . "')\">\n\t\t\t\t\t\t\t\t\t\t \t<input class=\"botao\" name=\"excluir\" type=\"submit\" value=\"Excluir\" onClick=\"js_excluir('{$q21_sequencial}','{$q31_sequencial}')\">\n\t\t\t\t\t\t\t\t\t\t\t</td>\n\t\t\t\t\t\t\t\t\t\t\t</tr>\n\n"; } } } echo "<script> document.form1.proximo.style.visibility='visible'; </script>"; } if (isset($z01_numcgm) and $z01_numcgm != "") { echo "<script> document.form1.z01_numcgm.value = {$z01_numcgm};</script>"; } ?>
if (!$cabec) { $pdf->Cell(0, 21, '', "TB", 0, 'C'); $pdf->Text($X, $Y, "Numcgm:"); $pdf->Text($X + 40, $Y, $outros); $pdf->Text($X, $Y + 4, "Nome:"); $pdf->Text($X, $Y + 8, "CNPJ/CPF:"); $pdf->Text($X + 45, $Y + 8, "Identidade:"); $pdf->Text($X, $Y + 12, "Endereço:"); $pdf->Text($X + 110, $Y + 12, "Número:"); $pdf->Text($X + 155, $Y + 12, "Complemento:"); $pdf->Text($X, $Y + 16, "Município:"); $pdf->Text($X + 55, $Y + 16, "UF:"); $pdf->SetFont('Arial', 'I', 8); $pdf->Text($X + 18, $Y, pg_result($dados, 0, "z01_numcgm")); $pdf->Text($X + 18, $Y + 4, pg_result($dados, 0, "z01_nome")); $pdf->Text($X + 18, $Y + 8, db_cgccpf(pg_result($dados, 0, "z01_cgccpf"))); $pdf->Text($X + 18 + 45, $Y + 8, pg_result($dados, 0, "z01_ident")); $pdf->Text($X + 18, $Y + 12, pg_result($dados, 0, "z01_ender")); $pdf->Text($X + 130, $Y + 12, pg_result($dados, 0, "z01_numero")); $pdf->Text($X + 180, $Y + 12, pg_result($dados, 0, "z01_compl")); $pdf->Text($X + 18, $Y + 16, pg_result($dados, 0, "z01_munic")); $pdf->Text($X + 18 + 45, $Y + 16, pg_result($dados, 0, "z01_uf")); $pdf->SetXY(5, 60); $cabec = true; } $pdf->SetFont('arial', 'B', 6); $pdf->Cell(2, 5, " ", 0, 0, "C", 0); $pdf->Cell($TamNumpar, 5, "P", 1, 0, "C", 0); $pdf->Cell($TamNumtot, 5, "T", 1, 0, "C", 0); $pdf->Cell(13, 5, "OPER.", 1, 0, "C", 0); $pdf->Cell(13, 5, "VENC.", 1, 0, "C", 0);
</th> <th> Data de emissão </th> <th> </th> </tr> <?php $result = $cldb_dairetido->sql_record($cldb_dairetido->sql_query("", "*", "w15_mes", "w15_dai = {$codigo}")); $linhas = $cldb_dairetido->numrows; for ($i = 0; $i < $linhas; $i++) { db_fieldsmemory($result, $i); echo "\n\t\t\t\t<tr class=\"texto\">\n\t\t\t\t<td>\n\t\t\t\t\t" . db_mes($w15_mes) . "\n\t\t\t\t</td>\n\t\t\t\t<td>\n\t\t\t\t\t" . db_cgccpf($w15_cnpj) . " \n\t\t\t\t</td>\n\t\t\t\t<td>\n\t\t\t\t\t{$w15_nota}\n\t\t\t\t</td>\n\t\t\t\t<td>\n\t\t\t\t\t{$w15_serie}\n\t\t\t\t</td>\n\t\t\t\t<td>\n\t\t\t\t\t" . db_formatar($w15_valreceita, 'f') . "\n\t\t\t\t</td>\n\t\t\t\t<td>\n\t\t\t\t\t" . ($w15_data != "" ? db_formatar($w15_data, 'd') : 'não efetuado') . "\n"; if ($w15_data != "") { $data = split("-", $w15_data); $diadt[$i] = $data[2]; $mesdt[$i] = $data[1]; $anodt[$i] = $data[0]; } echo "\t\t\t\t\t\n\t\t\t\t</td>\n\t\t\t\t<td width= \"140px\">\n\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\t\n\t\t\t\t <input name=\"alterar\" type=\"button\" value=\"Alterar\" onClick=\"js_alterar('{$w15_sequencial}','{$w15_mes}','{$w15_valreceita}','{$w15_nota}','{$w15_serie}','{$w15_cnpj}','{$diadt[$i]}','{$mesdt[$i]}','{$anodt[$i]}')\">\n\t\t\t\t\t\t\n\t\t\t\t\t<input name=\"excluir\" type=\"submit\" value=\"Excluir\" onClick=\"js_excluir('{$w15_sequencial}')\">\n \t\t\t \n\t\t\t\t \t\t\t\t\t \n\t\t\t\t</td>\n\t\t\t</tr>\n"; } //do for ?> </table> </td> </tr> </table>