<?php 
/*
Copyright (c) 2007-2011 The web2Project Development Team <w2p-developers@web2project.net>
Copyright (c) 2003-2007 The dotProject Development Team <core-developers@dotproject.net>
Copyright [2011] -  Sérgio Fernandes Reinert de Lima - INPI 11802-5
Este arquivo é parte do programa gpweb
O gpweb é um software livre; você pode redistribuí-lo e/ou modificá-lo dentro dos termos da Licença Pública Geral GNU como publicada pela Fundação do Software Livre (FSF); na versão 2 da Licença.
Este programa é distribuído na esperança que possa ser  útil, mas SEM NENHUMA GARANTIA; sem uma garantia implícita de ADEQUAÇÃO a qualquer  MERCADO ou APLICAÇÃO EM PARTICULAR. Veja a Licença Pública Geral GNU/GPL em português para maiores detalhes.
Você deve ter recebido uma cópia da Licença Pública Geral GNU, sob o título "licença GPL 2.odt", junto com este programa, se não, acesse o Portal do Software Público Brasileiro no endereço www.softwarepublico.gov.br ou escreva para a Fundação do Software Livre(FSF) Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301, USA
*/
require BASE_DIR.'/incluir/validar_autorizado.php';
if (!defined('BASE_DIR')) die('Você não deveria acessar este arquivo diretamente.');

global $Aplic;

$plano_acao_item=getParam($_REQUEST, 'plano_acao_item_custos_plano_acao_item', 0);
if (!$plano_acao_item) $plano_acao_item=getParam($_REQUEST, 'plano_acao_item_gastos_plano_acao_item', 0);

$tipo=getParam($_REQUEST, 'tipo', '');
if (!$podeAcessar) $Aplic->redirecionar('m=publico&a=acesso_negado&err=noedit');
$nd=array(0 => '');
$nd+= getSisValorND();
$unidade=getSisValor('TipoUnidade');
echo '<center><h1>Histórico dos '.($tipo=='estimado' ? 'Custos Estimados' : 'Gastos').'  - '.link_acao_item($plano_acao_item).'</h1></center>';
echo estiloTopoCaixa();
echo '<table width="100%" border=0 cellpadding=0 cellspacing=0 class="std2">';
echo '<tr><td valign="top" align="center">';
$q = new BDConsulta;
if ($tipo=='estimado'){
	$q->adTabela('plano_acao_item_h_custos');
	$q->adCampo('plano_acao_item_h_custos.*,(h_custos_quantidade1*h_custos_custo1) AS valor1,(h_custos_quantidade2*h_custos_custo2) AS valor2 ');
	$q->adOnde('h_custos_plano_acao_item ='.$plano_acao_item);
	$q->adOrdem('h_custos_data2');	
	}
else {
	$q->adTabela('plano_acao_item_h_gastos');
	$q->adCampo('plano_acao_item_h_gastos.*,(h_gastos_quantidade1*h_gastos_custo1) AS valor1,(h_gastos_quantidade2*h_gastos_custo2) AS valor2 ');
	$q->adOnde('h_gastos_plano_acao_item ='.$plano_acao_item);
	$q->adOrdem('h_gastos_data2');	
	}

$linhas=$q->Lista();
$qnt=0;
echo '<table width="100%" cellpadding=0 cellspacing=0 class="tbl1">';
echo '<tr><th>'.dica('Nome', 'Nome do item.').'Nome'.dicaF().'</th>
<th>'.dica('Descrição', 'Descrição do item.').'Descrição'.dicaF().'</th>
<th>'.dica('Unidade', 'A unidade de referência para o item.').'Un.'.dicaF().'</th>
<th width="40">'.dica('Quantidade', 'A quantidade demandada do ítem').'Qnt.'.dicaF().'</th>
<th>'.dica('Valor Unitário', 'O valor de uma unidade do item.').'Valor Unit.'.dicaF().'</th>
<th>'.dica('Natureza da Despesa', 'A natureza de despesa (ND) do item.').'ND'.dicaF().'</th>
<th width="100">'.dica('Valor Total', 'O valor total é o preço unitário multiplicado pela quantidade.').'Total'.dicaF().'</th>
<th>'.dica('Responsável', 'O '.$config['usuario'].' que inseriu ou alterou o item.').'Responsável'.dicaF().'</th></tr>';
$total=0;
$custo=array();
if ($tipo=='estimado') $prefixo='h_custos_';
else $prefixo='h_gastos_';
foreach ($linhas as $linha) {
$data = new CData($linha[$prefixo.'data2']);
	if ($linha[$prefixo.'excluido']){
		echo '<tr><td colspan="8" align="left">Excluído por '.link_usuario($linha[$prefixo.'usuario2'],'','','esquerda').' em '.$data->format('%d/%m/%Y %H:%M').'</td></tr>';
		echo '<tr><td align="left">'.++$qnt.' - '.$linha[$prefixo.'nome1'].'</td><td align="left">'.(isset($linha[$prefixo.'descricao1']) ? $linha[$prefixo.'descricao1'] : '&nbsp;').'</td><td style="white-space: nowrap" align="center">'.$unidade[$linha[$prefixo.'tipo1']].'</td><td style="white-space: nowrap" align="center">'.$linha[$prefixo.'quantidade1'].'</td><td align="right" style="white-space: nowrap" align="center">'.number_format($linha[$prefixo.'custo1'], 2, ',', '.').'</td><td style="white-space: nowrap" align="center">'.dica('Natureza da Despesa', $nd[$linha[$prefixo.'nd1']]).$linha[$prefixo.'nd1'].dicaF().'</td><td align="right" style="white-space: nowrap">'.number_format($linha['valor1'], 2, ',', '.').'</td><td align="left" style="white-space: nowrap">'.link_usuario($linha[$prefixo.'usuario1'],'','','esquerda').'</td><tr>';
		}
	else {
		echo '<tr><td colspan="8" align="left">Alterado por '.link_usuario($linha[$prefixo.'usuario2'],'','','esquerda').' em '.$data->format('%d/%m/%Y %H:%M').'</td></tr>';
		echo '<tr><td align="left">'.++$qnt.' - '.$linha[$prefixo.'nome1'].'</td><td align="left">'.(isset($linha[$prefixo.'descricao1']) ? $linha[$prefixo.'descricao1'] : '&nbsp;').'</td><td style="white-space: nowrap" align="center">'.$unidade[$linha[$prefixo.'tipo1']].'</td><td style="white-space: nowrap" align="center">'.$linha[$prefixo.'quantidade1'].'</td><td align="right" style="white-space: nowrap" align="center">'.number_format($linha[$prefixo.'custo1'], 2, ',', '.').'</td><td style="white-space: nowrap" align="center">'.dica('Natureza da Despesa', (isset($nd[$linha[$prefixo.'nd1']]) ? $nd[$linha[$prefixo.'nd1']] : '')).$linha[$prefixo.'nd1'].dicaF().'</td><td align="right" style="white-space: nowrap">'.number_format($linha['valor1'], 2, ',', '.').'</td><td align="left" style="white-space: nowrap">'.link_usuario($linha[$prefixo.'usuario1'],'','','esquerda').'</td><tr>';
		echo '<tr><td align="left" style="color:'.($linha[$prefixo.'nome1'] !=$linha[$prefixo.'nome2'] ? 'blue' : 'black').'">'.$qnt.' - '.$linha[$prefixo.'nome2'].'</td><td align="left" style="color:'.(isset($linha[$prefixo.'descricao1']) && isset($linha[$prefixo.'descricao2']) && $linha[$prefixo.'descricao1']!=$linha[$prefixo.'descricao2'] ? 'blue' : 'black').'">'.($linha[$prefixo.'descricao2'] ? $linha[$prefixo.'descricao2'] : '&nbsp;').'</td><td style="white-space: nowrap" align="center" style="color:'.($linha[$prefixo.'tipo1'] !=$linha[$prefixo.'tipo2'] ? 'blue' : 'black').'">'.$unidade[$linha[$prefixo.'tipo2']].'</td><td style="white-space: nowrap" align="center" style="color:'.($linha[$prefixo.'quantidade1'] !=$linha[$prefixo.'quantidade2'] ? 'blue' : 'black').'">'.$linha[$prefixo.'quantidade2'].'</td><td align="right" style="white-space: nowrap" align="center" style="color:'.($linha[$prefixo.'custo1']!=$linha[$prefixo.'custo2'] ? 'blue' : 'black').'">'.number_format($linha[$prefixo.'custo2'], 2, ',', '.').'</td><td style="white-space: nowrap" align="center" style="color:'.($linha[$prefixo.'nd1']!=$linha[$prefixo.'nd2'] ? 'blue' : 'black').'">'.dica('Natureza da Despesa', (isset($nd[$linha[$prefixo.'nd2']]) ? $nd[$linha[$prefixo.'nd2']] : '')).$linha[$prefixo.'nd2'].dicaF().'</td><td align="right" style="white-space: nowrap;color:'.($linha['valor1'] !=$linha['valor2'] ? 'blue' : 'black').'">'.number_format($linha['valor2'], 2, ',', '.').'</td><td align="left" style="white-space: nowrap">'.link_usuario($linha[$prefixo.'usuario2'],'','','esquerda').'</td><tr>';
		}		
	}
if (!$qnt) echo '<tr><td colspan="8" class="std" align="left"><p>Nenhum item encontrado.</p></td></tr>';	
echo '</table></td></tr>';
if ($tipo=='estimado'){
	$v = new BDConsulta;
	$v->adCampo('sum(tg.tarefa_gastos_custo) as total_gastos');
	$v->adTabela('tarefa_gastos', 'tg');
	$v->adTabela('tarefas', 't');
	$v->adOnde('t.tarefa_id = tg.tarefa_gastos_tarefa and tg.tarefa_gastos_tarefa='.$plano_acao_item);
	$gasto= $v->Resultado();
	$v->limpar();
	}
else {
	$v = new BDConsulta;
	$v->adCampo('sum(tc.tarefa_custos_custo) as total_custos');
	$v->adTabela('tarefa_custos', 'tc');
	$v->adTabela('tarefas', 't');
	$v->adOnde('t.tarefa_id = tc.tarefa_custos_tarefa and tc.tarefa_custos_tarefa='.$plano_acao_item);
	$custo= $v->Resultado();
	$v->limpar();
	}	
echo '<tr><td><table width="100%"><tr><td align="left">'.botao('fechar', 'Fechar','Fechar esta tela.','','window.opener = window; window.close();').'</td>';
$link='';
	if ($tipo=='estimado') {
		$link='window.open(\'./index.php?m=praticas&a=historico&dialogo=1&plano_acao_item_custos_plano_acao_item='.$plano_acao_item.'&tipo=efetivo\', \'Planilha\',\'height=500,width=1024,resizable,scrollbars=yes\')';
		echo '<td align="right">'.botao('gasto', 'Histórico dos Gastos','Clique para ver o histórico das alterações na planilha de gastos.','',$link).'</td>';
		}
	else { 
		$link='window.open(\'./index.php?m=praticas&a=historico&dialogo=1&plano_acao_item_custos_plano_acao_item='.$plano_acao_item.'&tipo=estimado\', \'Planilha\',\'height=500,width=1024,resizable,scrollbars=yes\')';
		echo '<td align="right">'.botao('estimado', 'Histórico dos Custos Estimados','Clique para ver o histórico das alterações na planilha de custos estimados.','',$link).'</td>';
		}
echo '</tr></table></td></tr>';
echo '</td></tr></table>';
echo estiloFundoCaixa();
?>
