<?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.');


class CFator extends CAplicObjeto {

	public $fator_id = null;
	public $fator_cia = null;
	public $fator_dept = null;
	public $fator_nome = null;
	public $fator_data = null;
	public $fator_usuario = null;
	public $fator_principal_indicador = null;
	public $fator_ordem = null;
	public $fator_objetivo = null;
	public $fator_acesso = null;
	public $fator_cor = null;
	public $fator_oque = null;
	public $fator_descricao = null;
	public $fator_onde = null;
	public $fator_quando = null;
	public $fator_como = null;
	public $fator_porque = null;
	public $fator_quanto = null;
	public $fator_quem = null;
	public $fator_controle = null;
	public $fator_melhorias = null;
	public $fator_metodo_aprendizado = null;
	public $fator_desde_quando = null;
	public $fator_ativo = null;
	public $fator_tipo = null;
	public $fator_tipo_pontuacao = null;
	public $fator_percentagem = null;
  public $fator_ponto_alvo = null;
	public $fator_aprovado = null;
	public $fator_moeda = null;

	public function __construct() {
		parent::__construct('fator', 'fator_id');
		}


	public function armazenar( $atualizarNulos = false) {
		global $Aplic;
		$sql = new BDConsulta();
		if ($this->fator_id) {
			$ret = $sql->atualizarObjeto('fator', $this, 'fator_id');
			$sql->limpar();
			}
		else {
			$ret = $sql->inserirObjeto('fator', $this, 'fator_id');
			$sql->limpar();
			}

		require_once ($Aplic->getClasseSistema('CampoCustomizados'));
		$campos_customizados = new CampoCustomizados('fatores', $this->fator_id, 'editar');
		$campos_customizados->join($_REQUEST);
		$campos_customizados->armazenar($this->fator_id);


		$fator_usuarios=getParam($_REQUEST, 'fator_usuarios', null);
		$fator_usuarios=explode(',', $fator_usuarios);
		$sql->setExcluir('fator_usuario');
		$sql->adOnde('fator_usuario_fator ='.(int)$this->fator_id);
		$sql->exec();
		$sql->limpar();
		foreach($fator_usuarios as $chave => $usuario_id){
			if($usuario_id){
				$sql->adTabela('fator_usuario');
				$sql->adInserir('fator_usuario_fator', $this->fator_id);
				$sql->adInserir('fator_usuario_usuario', $usuario_id);
				$sql->exec();
				$sql->limpar();
				}
			}

		$depts_selecionados=getParam($_REQUEST, 'fator_depts', null);
		$depts_selecionados=explode(',', $depts_selecionados);
		$sql->setExcluir('fator_dept');
		$sql->adOnde('fator_dept_fator ='.(int)$this->fator_id);
		$sql->exec();
		$sql->limpar();
		foreach($depts_selecionados as $chave => $dept_id){
			if($dept_id){
				$sql->adTabela('fator_dept');
				$sql->adInserir('fator_dept_fator', $this->fator_id);
				$sql->adInserir('fator_dept_dept', $dept_id);
				$sql->exec();
				$sql->limpar();
				}
			}

		if ($Aplic->profissional){
			$sql->setExcluir('fator_cia');
			$sql->adOnde('fator_cia_fator='.(int)$this->fator_id);
			$sql->exec();
			$sql->limpar();
			$cias=getParam($_REQUEST, 'fator_cias', '');
			$cias=explode(',', $cias);
			if (count($cias)) {
				foreach ($cias as $cia_id) {
					if ($cia_id){
						$sql->adTabela('fator_cia');
						$sql->adInserir('fator_cia_fator', $this->fator_id);
						$sql->adInserir('fator_cia_cia', $cia_id);
						$sql->exec();
						$sql->limpar();
						}
					}
				}
			}


		$uuid=getParam($_REQUEST, 'uuid', null);
		if ($uuid){
			$sql->adTabela('fator_gestao');
			$sql->adAtualizar('fator_gestao_fator', (int)$this->fator_id);
			$sql->adAtualizar('fator_gestao_uuid', null);
			$sql->adOnde('fator_gestao_uuid=\''.$uuid.'\'');
			$sql->exec();
			$sql->limpar();
			}
		if ($uuid){
			$sql->adTabela('fator_media');
			$sql->adAtualizar('fator_media_fator', (int)$this->fator_id);
			$sql->adAtualizar('fator_media_uuid', null);
			$sql->adOnde('fator_media_uuid=\''.$uuid.'\'');
			$sql->exec();
			$sql->limpar();

			$sql->adTabela('plano_acao_observador');
			$sql->adAtualizar('plano_acao_observador_fator', (int)$this->fator_id);
			$sql->adAtualizar('plano_acao_observador_uuid', null);
			$sql->adOnde('plano_acao_observador_uuid=\''.$uuid.'\'');
			$sql->exec();
			$sql->limpar();

			$sql->adTabela('projeto_observador');
			$sql->adAtualizar('projeto_observador_fator', (int)$this->fator_id);
			$sql->adAtualizar('projeto_observador_uuid', null);
			$sql->adOnde('projeto_observador_uuid=\''.$uuid.'\'');
			$sql->exec();
			$sql->limpar();

			$sql->adTabela('estrategia_observador');
			$sql->adAtualizar('estrategia_observador_fator', (int)$this->fator_id);
			$sql->adAtualizar('estrategia_observador_uuid', null);
			$sql->adOnde('estrategia_observador_uuid=\''.$uuid.'\'');
			$sql->exec();
			$sql->limpar();
			
			
			$sql->adTabela('assinatura');
			$sql->adAtualizar('assinatura_fator', (int)$this->fator_id);
			$sql->adAtualizar('assinatura_uuid', null);
			$sql->adOnde('assinatura_uuid=\''.$uuid.'\'');
			$sql->exec();
			$sql->limpar();

			$sql->adTabela('priorizacao');
			$sql->adAtualizar('priorizacao_fator', (int)$this->fator_id);
			$sql->adAtualizar('priorizacao_uuid', null);
			$sql->adOnde('priorizacao_uuid=\''.$uuid.'\'');
			$sql->exec();
			$sql->limpar();

			}


		//verificar aprovacao
		if ($Aplic->profissional) {
			$sql->adTabela('assinatura');
			$sql->esqUnir('assinatura_atesta_opcao', 'assinatura_atesta_opcao', 'assinatura_atesta_opcao_id=assinatura_atesta_opcao');
			$sql->adCampo('count(assinatura_id)');
			$sql->adOnde('assinatura_fator='.(int)$this->fator_id);
			$sql->adOnde('assinatura_atesta_opcao_aprova!=1 OR assinatura_atesta_opcao_aprova IS NULL');
			$sql->adOnde('assinatura_aprova=1');
			$sql->adOnde('assinatura_atesta_opcao > 0');
			$nao_aprovado1 = $sql->resultado();
			$sql->limpar();
			
			
			$sql->adTabela('assinatura');
			$sql->adCampo('count(assinatura_id)');
			$sql->adOnde('assinatura_fator='.(int)$this->fator_id);
			$sql->adOnde('assinatura_aprova=1');
			$sql->adOnde('assinatura_atesta IS NULL');
			$sql->adOnde('assinatura_data IS NULL OR (assinatura_data IS NOT NULL AND assinatura_aprovou=0)');
			$nao_aprovado2 = $sql->resultado();
			$sql->limpar();
			
			//assinatura que tem despacho mas nem assinou
			$sql->adTabela('assinatura');
			$sql->adCampo('count(assinatura_id)');
			$sql->adOnde('assinatura_fator='.(int)$this->fator_id);
			$sql->adOnde('assinatura_aprova=1');
			$sql->adOnde('assinatura_atesta IS NOT NULL');
			$sql->adOnde('assinatura_atesta_opcao IS NULL');
			$nao_aprovado3 = $sql->resultado();
			$sql->limpar();
			
			$nao_aprovado=($nao_aprovado1 || $nao_aprovado2 || $nao_aprovado3);
			
			$sql->adTabela('fator');
			$sql->adAtualizar('fator_aprovado', ($nao_aprovado ? 0 : 1));
			$sql->adOnde('fator_id='.(int)$this->fator_id);
			$sql->exec();
			$sql->limpar();
			}

		if (!$ret) return get_class($this).'::armazenar falhou '.db_error();
		else return null;
		}


	public function check() {
		return null;
		}


	public function podeAcessar() {
		$valor=permiteAcessarFator($this->fator_acesso, $this->fator_id);
		return $valor;
		}

	public function podeEditar() {
		$valor=permiteEditarFator($this->fator_acesso, $this->fator_id);
		return $valor;
		}


	public function calculo_percentagem(){
		$tipo=$this->fator_tipo_pontuacao;

		$sql = new BDConsulta;
		$porcentagem=null;
		if (!$tipo) $porcentagem=$this->fator_percentagem;
		elseif($tipo=='media_ponderada'){
			$sql->adTabela('fator_media');
			$sql->esqUnir('estrategias', 'estrategias', 'pg_estrategia_id=fator_media_estrategia');
			$sql->esqUnir('projetos', 'projetos', 'projeto_id=fator_media_projeto');
			$sql->esqUnir('plano_acao', 'plano_acao', 'plano_acao_id=fator_media_acao');
			$sql->adCampo('
			pg_estrategia_percentagem,
			projeto_percentagem,
			plano_acao_percentagem,
			fator_media_estrategia,
			fator_media_projeto,
			fator_media_acao,
			fator_media_peso
			');

			$sql->adOnde('fator_media_fator ='.(int)$this->fator_id);
			$sql->adOnde('fator_media_tipo =\'media_ponderada\'');
			$lista = $sql->lista();
			$sql->limpar();
			$numerador=0;
			$denominador=0;

			foreach($lista as $linha){
				if ($linha['fator_media_estrategia']) $numerador+=($linha['pg_estrategia_percentagem']*$linha['fator_media_peso']);
				elseif ($linha['fator_media_projeto']) $numerador+=($linha['projeto_percentagem']*$linha['fator_media_peso']);
				elseif ($linha['fator_media_acao']) $numerador+=($linha['plano_acao_percentagem']*$linha['fator_media_peso']);
				$denominador+=$linha['fator_media_peso'];
				}
			$porcentagem=($denominador ? $numerador/$denominador : 0);
			}
		elseif($tipo=='pontos_completos'){


			$sql->adTabela('fator_media');
			$sql->esqUnir('estrategias', 'estrategias', 'pg_estrategia_id=fator_media_estrategia');
			$sql->adCampo('SUM(fator_media_ponto)');
			$sql->adOnde('fator_media_fator ='.(int)$this->fator_id);
			$sql->adOnde('fator_media_tipo =\'pontos_completos\'');
			$sql->adOnde('pg_estrategia_percentagem = 100');
			$sql->adOnde('fator_media_estrategia > 0');
			$pontos3 = $sql->Resultado();
			$sql->limpar();

			$sql->adTabela('fator_media');
			$sql->esqUnir('projetos', 'projetos', 'projeto_id=fator_media_projeto');
			$sql->adCampo('SUM(fator_media_ponto)');
			$sql->adOnde('fator_media_fator ='.(int)$this->fator_id);
			$sql->adOnde('fator_media_tipo =\'pontos_completos\'');
			$sql->adOnde('projeto_percentagem = 100');
			$sql->adOnde('fator_media_projeto > 0');
			$pontos4 = $sql->Resultado();
			$sql->limpar();

			$sql->adTabela('fator_media');
			$sql->esqUnir('plano_acao', 'plano_acao', 'plano_acao_id=fator_media_acao');
			$sql->adCampo('SUM(fator_media_ponto)');
			$sql->adOnde('fator_media_fator ='.(int)$this->fator_id);
			$sql->adOnde('fator_media_tipo =\'pontos_completos\'');
			$sql->adOnde('plano_acao_percentagem = 100');
			$sql->adOnde('fator_media_acao > 0');
			$pontos5 = $sql->Resultado();
			$sql->limpar();


			$porcentagem=($this->fator_ponto_alvo ? (($pontos3+$pontos4+$pontos5)/$this->fator_ponto_alvo)*100 : 0);
			}
		elseif($tipo=='pontos_parcial'){
			$sql->adTabela('fator_media');
			$sql->esqUnir('estrategias', 'estrategias', 'pg_estrategia_id=fator_media_estrategia');
			$sql->adCampo('SUM(fator_media_ponto*(pg_estrategia_percentagem/100))');
			$sql->adOnde('fator_media_fator ='.(int)$this->fator_id);
			$sql->adOnde('fator_media_tipo =\'pontos_parcial\'');
			$sql->adOnde('fator_media_estrategia > 0');
			$pontos3 = $sql->Resultado();
			$sql->limpar();

			$sql->adTabela('fator_media');
			$sql->esqUnir('projetos', 'projetos', 'projeto_id=fator_media_projeto');
			$sql->adCampo('SUM(fator_media_ponto*(projeto_percentagem/100))');
			$sql->adOnde('fator_media_fator ='.(int)$this->fator_id);
			$sql->adOnde('fator_media_tipo =\'pontos_parcial\'');
			$sql->adOnde('fator_media_projeto > 0');
			$pontos4 = $sql->Resultado();
			$sql->limpar();

			$sql->adTabela('fator_media');
			$sql->esqUnir('plano_acao', 'plano_acao', 'plano_acao_id=fator_media_acao');
			$sql->adCampo('SUM(fator_media_ponto*(plano_acao_percentagem/100))');
			$sql->adOnde('fator_media_fator ='.(int)$this->fator_id);
			$sql->adOnde('fator_media_tipo =\'pontos_parcial\'');
			$sql->adOnde('fator_media_acao > 0');
			$pontos5 = $sql->Resultado();
			$sql->limpar();

			$porcentagem=($this->fator_ponto_alvo ? (($pontos3+$pontos4+$pontos5)/$this->fator_ponto_alvo)*100 : 0);
			}
		elseif($tipo=='indicador'){
			if ($this->fator_principal_indicador) {
				include_once BASE_DIR.'/modulos/praticas/indicador_simples.class.php';
				$obj_indicador = new Indicador($this->fator_principal_indicador);
				$porcentagem=$obj_indicador->Pontuacao();
				}
			else $porcentagem=0;
			}

		else $porcentagem=0; //caso nao previsto

		if ($porcentagem > 100) $porcentagem=100;
		if ($porcentagem!=$this->fator_percentagem){
			$sql->adTabela('fator');
			$sql->adAtualizar('fator_percentagem', $porcentagem);
			$sql->adOnde('fator_id ='.(int)$this->fator_id);
			$sql->exec();
			$sql->limpar();
			$this->disparo_observador('fisico');
			}
		return $porcentagem;
		}

	public function disparo_observador( $acao='fisico'){
		//Quem faz uso deste fator em cálculos de percentagem
		$sql = new BDConsulta;

		$sql->adTabela('fator_observador');
		$sql->adCampo('fator_observador.*');
		$sql->adOnde('fator_observador_fator ='.(int)$this->fator_id);
		if ($acao) $sql->adOnde('fator_observador_acao =\''.$acao.'\'');
		$lista = $sql->lista();
		$sql->limpar();
		$qnt_objetivo=0;
		$qnt_me=0;
		foreach($lista as $linha){
			if ($linha['fator_observador_objetivo']){
				if (!($qnt_objetivo++)) require_once BASE_DIR.'/modulos/praticas/obj_estrategico.class.php';
				$obj= new CObjetivo();
				$obj->load($linha['fator_observador_objetivo']);
				if (method_exists($obj, $linha['fator_observador_metodo'])){
					$obj->{$linha['fator_observador_metodo']}();
					}
				}
			elseif ($linha['fator_observador_me']){
				if (!($qnt_me++)) require_once BASE_DIR.'/modulos/praticas/me_pro.class.php';
				$obj= new CMe();
				$obj->load($linha['fator_observador_me']);
				if (method_exists($obj, $linha['fator_observador_metodo'])){
					$obj->{$linha['fator_observador_metodo']}();
					}
				}
			}

		}


	public function notificar( $post=array()){
		global $Aplic, $config, $localidade_tipo_caract;

		require_once ($Aplic->getClasseSistema('libmail'));

		$sql = new BDConsulta;

		$sql->adTabela('fator');
		$sql->adCampo('fator_nome');
		$sql->adOnde('fator_id ='.(int)$this->fator_id);
		$nome = $sql->Resultado();
		$sql->limpar();



		$usuarios =array();
		$usuarios1=array();
		$usuarios2=array();
		$usuarios3=array();
		$usuarios4=array();

		if (isset($post['fator_usuarios']) && $post['fator_usuarios'] && isset($post['email_designados']) && $post['email_designados']){
			$sql->adTabela('usuarios');
			$sql->esqUnir('contatos', 'contatos', 'contato_id = usuario_contato');
			$sql->adCampo('DISTINCT usuarios.usuario_id, '.($config['militar'] < 10 ? 'concatenar_tres(contato_posto, \' \', contato_nomeguerra)' : 'contato_nomeguerra').' AS nome_usuario, contato_email');
			$sql->adOnde('usuario_id IN ('.$post['fator_usuarios'].')');
			$usuarios1 = $sql->Lista();
			$sql->limpar();
			}
		if (isset($post['email_outro']) && $post['email_outro']){
			$sql->adTabela('usuarios');
			$sql->esqUnir('contatos', 'contatos', 'contato_id = usuario_contato');
			$sql->adCampo('DISTINCT usuarios.usuario_id, '.($config['militar'] < 10 ? 'concatenar_tres(contato_posto, \' \', contato_nomeguerra)' : 'contato_nomeguerra').' AS nome_usuario, contato_email');
			$sql->adOnde('contato_id IN ('.$post['email_outro'].')');
			$usuarios2=$sql->Lista();
			$sql->limpar();
			}

		if (isset($post['email_responsavel']) && $post['email_responsavel']){
			$sql->adTabela('usuarios');
			$sql->esqUnir('contatos', 'contatos', 'contato_id = usuario_contato');
			$sql->esqUnir('fator', 'fator', 'fator.fator_usuario = usuarios.usuario_id');
			$sql->adCampo('DISTINCT usuarios.usuario_id, '.($config['militar'] < 10 ? 'concatenar_tres(contato_posto, \' \', contato_nomeguerra)' : 'contato_nomeguerra').' AS nome_usuario, contato_email');
			$sql->adOnde('fator_id='.(int)$this->fator_id);
			$usuarios3=$sql->Lista();
			$sql->limpar();
			}

		if (isset($post['email_extras']) && $post['email_extras']){
			$extras=explode(',',$post['email_extras']);
			foreach($extras as $chave => $valor) $usuarios4[]=array('usuario_id' => 0, 'nome_usuario' =>'', 'contato_email'=> $valor);
			}



		$usuarios = array_merge((array)$usuarios1, (array)$usuarios2);
		$usuarios = array_merge((array)$usuarios, (array)$usuarios3);
		$usuarios = array_merge((array)$usuarios, (array)$usuarios4);


		$usado_usuario=array();
		$usado_email=array();

		if (isset($post['del']) && $post['del'])$tipo='excluido';
		elseif (isset($post['fator_id']) && $post['fator_id']) $tipo='atualizado';
		else $tipo='incluido';

		foreach($usuarios as $usuario){
			if (!isset($usado[$usuario['usuario_id']]) && !isset($usado[$usuario['contato_email']])){

				if ($usuario['usuario_id']) $usado[$usuario['usuario_id']]=1;
				if ($usuario['contato_email']) $usado[$usuario['contato_email']]=1;
				$email = new Mail;
                $email->De($config['email'], $Aplic->usuario_nome);

                if ($Aplic->usuario_email && $email->EmailValido($Aplic->usuario_email)){
                    $email->ResponderPara($Aplic->usuario_email);
                    }
                else if($Aplic->usuario_email2 && $email->EmailValido($Aplic->usuario_email2)){
                    $email->ResponderPara($Aplic->usuario_email2);
                    }

				if ($tipo == 'excluido') $titulo='Fator crítico de sucesso excluído';
				elseif ($tipo=='atualizado') $titulo='Fator crítico de sucesso atualizado';
				else $titulo='Fator crítico de sucesso inserido';

				$email->Assunto($titulo, $localidade_tipo_caract);

				if ($tipo=='atualizado') $corpo = 'Atualizado '.$config['genero_fator'].' '.$config['fator'].': '.$nome.'<br>';
				elseif ($tipo=='excluido') $corpo = 'Excluído '.$config['genero_fator'].' '.$config['fator'].': '.$nome.'<br>';
				else $corpo = 'Inserido '.$config['genero_fator'].' '.$config['fator'].': '.$nome.'<br>';

				if ($tipo=='excluido') $corpo .= '<br><br><b>Responsável pela exclusão d'.$config['genero_fator'].' '.$config['fator'].':</b> '.$Aplic->usuario_posto.' '.$Aplic->usuario_nomeguerra;
				elseif ($tipo=='atualizado') $corpo .= '<br><br><b>Responsável pela edição d'.$config['genero_fator'].' '.$config['fator'].':</b> '.$Aplic->usuario_posto.' '.$Aplic->usuario_nomeguerra;
				else $corpo .= '<br><br><b>Criador d'.$config['genero_fator'].' '.$config['fator'].':</b> '.$Aplic->usuario_posto.' '.$Aplic->usuario_nomeguerra;


				$corpo_interno=$corpo;
				$corpo_externo=$corpo;

				if ($tipo!='excluido') {
					$corpo_interno .= '<br><a href="javascript:void(0);" onclick="url_passar(0, \'m=praticas&a=fator_ver&fator_id='.(int)$this->fator_id.'\');"><b>Clique para acessar '.$config['genero_fator'].' '.$config['fator'].'</b></a>';

					if ($Aplic->profissional){
						require_once BASE_DIR.'/incluir/funcoes_principais_pro.php';
						$endereco=link_email_externo($usuario['usuario_id'], 'm=praticas&a=fator_ver&fator_id='.(int)$this->fator_id);
						$corpo_externo.='<br><a href="'.$endereco.'"><b>Clique para acessar '.$config['genero_fator'].' '.$config['fator'].'</b></a>';
						}
					}

				$email->Corpo($corpo_externo, (isset($GLOBALS['locale_char_set']) ? $GLOBALS['locale_char_set'] : $localidade_tipo_caract));
				if ($usuario['usuario_id']!=$Aplic->usuario_id && $usuario['usuario_id']) {
					if ($usuario['usuario_id']) msg_email_interno('', $titulo, $corpo_interno,'',$usuario['usuario_id']);
					if ($email->EmailValido($usuario['contato_email']) && $config['email_ativo']) {
						$email->Para($usuario['contato_email'], true);
						$email->Enviar();
						}
					}
				}
			}
		}


	public function fisico_previsto($data=null){
		if ($this->fator_tipo_pontuacao=='media_ponderada'){
			require_once BASE_DIR.'/modulos/projetos/projetos.class.php';
			require_once BASE_DIR.'/modulos/praticas/plano_acao.class.php';
			require_once BASE_DIR.'/modulos/praticas/estrategia.class.php';
			$sql = new BDConsulta;
			$sql->adTabela('fator_media');
			$sql->adCampo('fator_media_projeto, fator_media_acao, fator_media_estrategia, fator_media_peso');
			$sql->adOnde('fator_media_fator ='.(int)$this->fator_id);
			$sql->adOnde('fator_media_tipo =\''.$this->fator_tipo_pontuacao.'\'');
			
			$lista = $sql->lista();
			$sql->limpar();
			
			$numerador=0;
			$denominador=0;
			
			foreach($lista as $linha){
				if ($linha['fator_media_projeto']){
					$obj = new CProjeto();
					$obj->load($linha['fator_media_projeto']);
					$numerador+=$obj->fisico_previsto($data)*$linha['fator_media_peso'];
					$denominador+=$linha['fator_media_peso'];
					}
				elseif ($linha['fator_media_acao']){
					$obj = new CPlanoAcao();
					$obj->load($linha['fator_media_acao']);
					$numerador+=$obj->fisico_previsto($data)*$linha['fator_media_peso'];
					$denominador+=$linha['fator_media_peso'];
					}
				elseif ($linha['fator_media_estrategia']){
					$obj = new CEstrategia();
					$obj->load($linha['fator_media_estrategia']);
					$numerador+=$obj->fisico_previsto($data)*$linha['fator_media_peso'];
					$denominador+=$linha['fator_media_peso'];
					}		
				}
			return ($denominador ? $numerador/$denominador : 0);
			}
		elseif ($this->fator_tipo_pontuacao=='pontos_parcial' || $this->fator_tipo_pontuacao=='pontos_completos'){
			require_once BASE_DIR.'/modulos/projetos/projetos.class.php';
			require_once BASE_DIR.'/modulos/praticas/plano_acao.class.php';
			require_once BASE_DIR.'/modulos/praticas/estrategia.class.php';
			$sql = new BDConsulta;
			$sql->adTabela('fator_media');
			$sql->adCampo('fator_media_projeto, fator_media_acao, fator_media_estrategia, fator_media_ponto');
			$sql->adOnde('fator_media_fator ='.(int)$this->fator_id);
			$sql->adOnde('fator_media_tipo =\''.$this->fator_tipo_pontuacao.'\'');
			$lista = $sql->lista();
			$sql->limpar();
			
			$numerador=0;
			$denominador=0;
			
			foreach($lista as $linha){
				if ($linha['fator_media_projeto']){
					$obj = new CProjeto();
					$obj->load($linha['fator_media_projeto']);
					$numerador+=$obj->fisico_previsto($data)*$linha['fator_media_ponto'];
					$denominador+=$linha['fator_media_ponto'];
					}
				elseif ($linha['fator_media_acao']){
					$obj = new CPlanoAcao();
					$obj->load($linha['fator_media_acao']);
					$numerador+=$obj->fisico_previsto($data)*$linha['fator_media_ponto'];
					$denominador+=$linha['fator_media_ponto'];
					}
				elseif ($linha['fator_media_estrategia']){
					$obj = new CEstrategia();
					$obj->load($linha['fator_media_estrategia']);
					$numerador+=$obj->fisico_previsto($data)*$linha['fator_media_ponto'];
					$denominador+=$linha['fator_media_ponto'];
					}		
				}
			return ($denominador ? $numerador/$denominador : 0);
			}	
		else return $this->fator_percentagem;	
		}





	public function fisico_executado($data=null){
		if ($this->fator_tipo_pontuacao=='media_ponderada'){
			require_once BASE_DIR.'/modulos/projetos/projetos.class.php';
			require_once BASE_DIR.'/modulos/praticas/plano_acao.class.php';
			require_once BASE_DIR.'/modulos/praticas/estrategia.class.php';
			$sql = new BDConsulta;
			$sql->adTabela('fator_media');
			$sql->adCampo('fator_media_projeto, fator_media_acao, fator_media_estrategia, fator_media_peso');
			$sql->adOnde('fator_media_fator ='.(int)$this->fator_id);
			$sql->adOnde('fator_media_tipo =\''.$this->fator_tipo_pontuacao.'\'');
			
			$lista = $sql->lista();
			$sql->limpar();
			
			$numerador=0;
			$denominador=0;
			
			foreach($lista as $linha){
				if ($linha['fator_media_projeto']){
					$obj = new CProjeto(null, null, $data, $linha['fator_media_projeto']);
					$obj->load($linha['fator_media_projeto']);
					$numerador+=$obj->projeto_percentagem*$linha['fator_media_peso'];
					$denominador+=$linha['fator_media_peso'];
					}
				elseif ($linha['fator_media_acao']){
					$obj = new CPlanoAcao();
					$obj->load($linha['fator_media_acao']);
					$numerador+=$obj->plano_acao_percentagem*$linha['fator_media_peso'];
					$denominador+=$linha['fator_media_peso'];
					}
				elseif ($linha['fator_media_estrategia']){
					$obj = new CEstrategia();
					$obj->load($linha['fator_media_estrategia']);
					$numerador+=$obj->fisico_executado($data)*$linha['fator_media_peso'];
					$denominador+=$linha['fator_media_peso'];
					}		
				}
			return ($denominador ? $numerador/$denominador : 0);
			}
		elseif ($this->fator_tipo_pontuacao=='pontos_parcial' || $this->fator_tipo_pontuacao=='pontos_completos'){
			require_once BASE_DIR.'/modulos/projetos/projetos.class.php';
			require_once BASE_DIR.'/modulos/praticas/plano_acao.class.php';
			require_once BASE_DIR.'/modulos/praticas/estrategia.class.php';
			$sql = new BDConsulta;
			$sql->adTabela('fator_media');
			$sql->adCampo('fator_media_projeto, fator_media_acao, fator_media_estrategia, fator_media_ponto');
			$sql->adOnde('fator_media_fator ='.(int)$this->fator_id);
			$sql->adOnde('fator_media_tipo =\''.$this->fator_tipo_pontuacao.'\'');
			$lista = $sql->lista();
			$sql->limpar();
			
			$numerador=0;
			$denominador=0;
			
			foreach($lista as $linha){
				if ($linha['fator_media_projeto']){
					$obj = new CProjeto(null, null, $data, $linha['fator_media_projeto']);
					$obj->load($linha['fator_media_projeto']);
					$numerador+=$obj->projeto_percentagem*$linha['fator_media_ponto'];
					$denominador+=$linha['fator_media_ponto'];
					}
				elseif ($linha['fator_media_acao']){
					$obj = new CPlanoAcao();
					$obj->load($linha['fator_media_acao']);
					$numerador+=$obj->plano_acao_percentagem*$linha['fator_media_ponto'];
					$denominador+=$linha['fator_media_ponto'];
					}
				elseif ($linha['fator_media_estrategia']){
					$obj = new CEstrategia();
					$obj->load($linha['fator_media_estrategia']);
					$numerador+=$obj->fisico_executado($data)*$linha['fator_media_ponto'];
					$denominador+=$linha['fator_media_ponto'];
					}		
				}
			return ($denominador ? $numerador/$denominador : 0);
			}	
		else return $this->fator_percentagem;	
		}






	public function fisico_velocidade($data=null){
		$fisico_previsto=$this->fisico_previsto($data);
		$fisico_executado=$this->fisico_executado($data);
		return ($fisico_previsto ? $fisico_executado/$fisico_previsto : 0);
		}
		
	}


?>