<?php
/* 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 $sql, $perms, $Aplic, $tab, $status_id, $dialogo, $estado_sigla, $estado, $municipios_superintendencia, $relatorio_id, $municipio_id , $social_id, $acao_id, $social_comunidade_id, $social_familia_id, $opcao_id;

//problema_tipo==0 nas Familias
//problema_tipo==1 no Comitê Nacional
//problema_tipo==2 no Comitê Estaduais
//problema_tipo==3 no Comitê Municipais
//problema_tipo==4 no Comitê Comunitários


if ($opcao_id=='problema_nacional_beneficiario') $tipo=0;
elseif ($opcao_id=='problema_nacional_comunidade') $tipo=4;
elseif ($opcao_id=='problema_nacional_municipio') $tipo=3;
elseif ($opcao_id=='problema_nacional_estado') $tipo=2;
elseif ($opcao_id=='problema_nacional_nacional') $tipo=1;

echo '<table cellpadding=0 cellspacing=0 align=center>';
echo '<tr><td align=center><h1>Lista dos Problemas '.($tipo==0 ? 'n'.$config['genero_beneficiario'].'s '.ucfirst($config['beneficiarios']) : '').($tipo==4 ? 'nas Comissões Comunitárias' : '').($tipo==3 ? 'nos Comitês Municipais' : '').($tipo==2 ? 'nas Coordenações Regionais' : '').($tipo==1 ? 'no Comitê Nacional' : '').'</h1><br></td></tr>';

$sql->adTabela('social_acao_problema');
$sql->adCampo('DISTINCT social_acao_problema_id, social_acao_problema_descricao');
$sql->adOnde('social_acao_problema_tipo='.(int)$tipo);
$sql->adOnde('social_acao_problema_acao_id='.(int)$acao_id);
$sql->adOrdem('social_acao_problema_ordem');
$tipos_problema=$sql->lista();
$sql->limpar();


$qnt=count($tipos_problema);
$resultado=array();

foreach($tipos_problema as $problema){
	if ($tipo==0){
		//familia
		$sql->adTabela('social_familia_problema');
		$sql->esqUnir('social_familia','social_familia', 'social_familia_problema_familia=social_familia_id');
		$sql->esqUnir('social_familia_acao', 'social_familia_acao', 'social_familia_acao_familia=social_familia_id');
		$sql->esqUnir('social_acao', 'social_acao', 'social_acao_id=social_familia_acao_acao');
		$sql->adCampo('count(social_familia_problema_tipo) AS total');
		$sql->adOnde('social_acao_social='.(int)$social_id);
		$sql->adOnde('social_familia_acao_acao='.(int)$acao_id);
		if ($status_id) $sql->adOnde('social_familia_problema_status='.(int)$status_id);
		$sql->adOnde('social_familia_problema_tipo='.(int)$problema['social_acao_problema_id']);
		$vetor_comunidade=$sql->lista();
		$sql->limpar();
		foreach($vetor_comunidade as $linha) $resultado['Nacional'][$problema['social_acao_problema_id']]=$linha['total'];
		}
		
	if ($tipo==4||$tipo==3||$tipo==2||$tipo==1){
		//comitês
		$sql->adTabela('social_comite_problema');
		$sql->esqUnir('social_comite','social_comite', 'social_comite_problema_comite=social_comite_id');
		$sql->esqUnir('social_comite_acao', 'social_comite_acao', 'social_comite_acao_comite=social_comite_id');
		$sql->esqUnir('social_acao', 'social_acao', 'social_acao_id=social_comite_acao_acao');
		$sql->adCampo('count(social_comite_problema_tipo) AS total');
		$sql->adOnde('social_acao_social='.(int)$social_id);
		$sql->adOnde('social_comite_acao_acao='.(int)$acao_id);
		if ($status_id) $sql->adOnde('social_comite_problema_status='.(int)$status_id);
		$sql->adOnde('social_comite_problema_tipo='.(int)$problema['social_acao_problema_id']);
		$vetor_comunidade=$sql->lista();
		$sql->limpar();
		foreach($vetor_comunidade as $linha) $resultado['Nacional'][$problema['social_acao_problema_id']]=$linha['total'];
		}		
	}

if (count($resultado)){
	//cabeçalho
	$cabecalho='';
	foreach($tipos_problema as $chave => $problema) $cabecalho.= '<td>'.($chave+1).'</td>';
	echo '<tr><td><table cellpadding=0 cellspacing=0 class="tbl1" align=center>';
	foreach($tipos_problema as $chave => $problema) echo '<tr><td align=right colspan='.($chave+2).' >'.$problema['social_acao_problema_descricao'].'</td></tr>';
	foreach ($resultado as $uf => $linha){
		echo '<tr><td align="left" >'.$uf.'</td>';
		foreach($tipos_problema as $problema) echo '<td width="15" align="center">'.(isset($linha[$problema['social_acao_problema_id']]) ? $linha[$problema['social_acao_problema_id']] : '0').'</td>';
		echo '</tr>';
		}
	}	
else echo '<tr><td align=center>Não foi encontrado nenhum problema baseado nos parâmetros passados</td></tr>';	

echo '</table></td></tr></table>';


function texto_vertical1($legenda){
	$saida='';
	for ($i=0; $i< strlen($legenda); $i++) $saida.=$legenda[$i].'<br>';
	return $saida;
	}
?>