* QUALQUER GARANTIA; sem mesmo a garantia implicita de * COMERCIALIZACAO ou de ADEQUACAO A QUALQUER PROPOSITO EM * PARTICULAR. Consulte a Licenca Publica Geral GNU para obter mais * detalhes. * * Voce deve ter recebido uma copia da Licenca Publica Geral GNU * junto com este programa; se nao, escreva para a Free Software * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA * 02111-1307, USA. * * Copia da licenca no diretorio licenca/licenca_en.txt * licenca/licenca_pt.txt */ include 'fpdf151/pdfdbpref.php'; 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);
}
$resultender = pg_exec("select * from db_daeend where w05_codigo = {$codigo}");
if (pg_numrows($resultender) != 0) {
db_fieldsmemory($resultender, 0);
}
$resultsocios = pg_exec("select * from db_daesocios where w06_codigo = {$codigo}");
$resultval = pg_exec("select * from db_daevalores where w07_codigo = {$codigo} order by w07_mes");
$data = getdate();
$mes = db_formatar($data['month'], 's', 0, 2, 'e');
$mes1 = db_formatar($data['mon'], 's', 0, 2, 'e');
$dia = db_formatar($data['mday'], 's', 0, 2, 'e');
$ano = db_formatar($data['year'], 's', 0, 2, 'e');
$hora = db_formatar($data['hours'], 's', 0, 2, 'e');
$min = db_formatar($data['minutes'], 's', 0, 2, 'e');
$sec = db_formatar($data['seconds'], 's', 0, 2, 'e');
$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);
include "classes/db_listainscr_classe.php";
include "classes/db_listainscrcab_classe.php";
include "classes/db_cgm_classe.php";
include "classes/db_issbase_classe.php";
include "dbforms/db_funcoes.php";
parse_str($HTTP_SERVER_VARS['QUERY_STRING']);
$cllistainscr = new cl_listainscr();
$cllistainscrcab = new cl_listainscrcab();
$clcgm = new cl_cgm();
$clissbase = new cl_issbase();
$clrotulo = new rotulocampo();
$clrotulo->label('nome');
$result = $cllistainscr->sql_record($cllistainscr->sql_query($p12_codigo));
//die($cllistainscr->sql_query($p12_codigo));
$numrows = $cllistainscr->numrows;
$pdf = new PDF1();
$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);
/**
* 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}";
$rsNomePromitente = db_query($sSqlNomePromitente);
db_fieldsmemory($rsNomePromitente, 0);
}
if (isset($cadrecibo) && $cadrecibo == 't') {
$pdf = new scpdf();
// abre a classe
} else {
$pdf = new PDF1();
// abre a classe
}
$sqlparag = "select db02_texto ";
$sqlparag .= " from db_documento ";
$sqlparag .= " inner join db_docparag on db03_docum = db04_docum ";
$sqlparag .= "\t inner join db_tipodoc on db08_codigo = db03_tipodoc ";
$sqlparag .= " inner join db_paragrafo on db04_idparag = db02_idparag ";
$sqlparag .= " where db03_tipodoc = 1017 ";
$sqlparag .= " and db03_instit = " . db_getsession("DB_instit") . " order by db04_ordem ";
$resparag = db_query($sqlparag);
if (pg_numrows($resparag) != 0) {
db_fieldsmemory($resparag, 0);
$head1 = $db02_texto;
}
$pdf->Open();
