<?php 
require_once(dirname(dirname(__FILE__))."/funcoes.php");
protegeArquivo(basename(__FILE__));
loadJS('jquery-validate');
loadJS('jquery-validate-messages');
$sessao = new sessao();
$amostraLong=$sessao->getVar('amostraLong');
$senhaCli=$sessao->getVar('iduser');
$idLabo=$sessao->getVar('idLabo');
$nomeOperador=$sessao->getVar('nomeuser');
$finalidade=$sessao->getVar('finalidade');
$verificador = 1;
//echo("Operador: $nomeOperador idlabo=$idLabo tela=$tela<br>");
//vai capturar a ida da ultima amostrs 
//quando ele entrar aqui ele ja vai ler o numero da amostra a partir de uma session 
//vai ter um modulo perfeito onde ele vai selecionar amostra
//prieira ultima segunte anterior, aleatoria ao localizar vai voltar para o edit trazendo o numero da amostra na session 
$objetocalculo = new calculos(); //calcula todos valores finais
///quando entra direto sem passar pelo gerla ou registro de amostra//////////
if($amostraLong>0)
{
	//echo "nao nulo<br>";
	$userAmostra = new amostras();
    $userAmostra->extras_select =  " where fic_id=".$amostraLong;
    $userAmostra->selecionaCampos($userAmostra);
    while ($resAmostra = $userAmostra->retornaDados()):
        $amostraLong=$resAmostra->fic_id;
        $idCultivar=$resAmostra->fic_cultivar;
        $idProdutor=$resAmostra->fic_produtor;
        $idAmostrador=$resAmostra->fic_amostrador;
        $ultima=$resAmostra->fic_amostra;
    endwhile;		
	$sessao->setVar('amostraLong', $amostraLong);
	$sessao->setVar('idCultivar',$idCultivar);
	$sessao->setVar('idProdutor',$idProdutor);
	$sessao->setVar('idAmostrador',$idAmostrador);
	$sessao->setVar('ultima',$ultima);
}
else
{
     $amostraLong=$objetocalculo->achaUltima();
	 $idCultivar=$sessao->getVar($idCultivar);
	 $idProdutor=$sessao->getVar($idProdutor);
	 $idAmostrador=$sessao->getVar($idAmostrador);
}

//captura o vetor de nomes de analistas
$user = new usuarios();
$user->extras_select = "WHERE  nivel='OPERADOR' && id_lab=".$idLabo;
$user->selecionaTudo($user);
$conta=0;
while ($res = $user->retornaDados()):
    $vetorAnalistas[$conta]=substr($res->nome,0,10);
	$conta++;
endwhile;     




$finalidade=$sessao->getVar('finalidade');


$userAmostra = new amostras();
$userAmostra->extras_select =  " where fic_id=".$amostraLong;  //fucnciona perfeito
$userAmostra->selecionaCampos($userAmostra);
while ($resAmostra = $userAmostra->retornaDados()):
    $idCultivar=$resAmostra->fic_cultivar;
    $idProdutor=$resAmostra->fic_produtor;
	if($finalidade=='PREVIA'):
	    $ultima=$resAmostra->fic_mostra_previa;
		$amostra=$resAmostra->fic_amostra_previa;
	else:
	    $ultima=$resAmostra->fic_amostra;
		$amostra=$resAmostra->fic_amostra;
	endif;
	$finalizada=$resAmostra->fic_finalizada_nocivas;
	$lote=$resAmostra->fic_lote;
endwhile;		

//echo("Operador: $nomeOperador idlabo=$idLabo tela=$tela<br>");
switch ($tela):
    case 'editar':
		//ENTRA DE QUAKQUER MANEIRA
 	 	$generica=new tabelagenerica();
		$generica->tabela=" contaminantes";
		$generica->campos_valores = array(
				"con_nome_cientifico" => NULL,
			);
		$generica->extras_select =" order by con_nome_cientifico";
	    $generica->selecionaCampos($generica);
		$contador=0;
		while ($resgenerica = $generica->retornaDados()):
		   // $vetorContaminantesConcatenado[$contador]=$resgenerica->con_nome_cientifico;
		    $contador++;
	    endwhile;
	
	
		if (isset($_POST['acharDigitada'])):
		    //echo '<h2>xxxxxxxxxxxAchar uma amostra</h2>';
			    $objetocalculo=new calculos(); 
			   	$registro=$_POST["amostra"];
				if($registro!=0):
                    $amostraLong=$objetocalculo->AchaIdAmostraTendoRegistro($registro);
                endif;//testou se o registro é diferente de zero. se for zero nao faz nada ficando na mesma amostra	
        endif;//fim da busca de amostra (botao achar))




	   $objetocalculoRaioX = new calculosFichaVirtual(); 
	   $vetorRaioX=$objetocalculoRaioX->capturaGeralRaioX($amostraLong); 
       $pesoNocivas=trim($vetorRaioX[105]);
	   if($pesoNocivas=='-')$pesoNocivas="";
       $pesoComplemento=trim($vetorRaioX[106]);
       if($pesoComplemento=='-')$pesoComplemento="";
	   $pesoSilvestres=trim($vetorRaioX[220]);  
	   if($pesoSilvestres=='-')$pesoSilvestres=""; 
	   $dataComplemento=trim($vetorRaioX[216]);  
	   $balancaComplemento=trim($vetorRaioX[283]); 
	   if($balancaComplemento=='-')$balancaComplemento=""; 
	   $operadorSalvado=trim($vetorRaioX[215]);  
	   $rea_id_pureza=trim($vetorRaioX[98]);  
	   $dataPureza=trim($vetorRaioX[154]);  
	   //echo("105pesoComplemento=$pesoComplemento pesoNocivas=$pesoNocivas<br>");

         /*/pega os dados para colocar no topo da tela para ver categoria lote,amostra etc
	     $sql="select fic_lote, fic_amostra,esp_nome,fic_categoria,esp_grupo2011,esp_id from especies, ficha ,cultivar   where  fic_cultivar=ctv_id &&   esp_id=ctv_especie &&  fic_id=" . $amostraLong;
	     $vetorFicha=achacampos($sql);
		 //echo $sql;
          */

        if (isset($_POST['casosEspeciais'])):
            //echo("Box testes a realizar<br>");
            echo '<iframe src="casosEspeciais.php" style="border:0" width="110%" height="180"></iframe>';	 //funciona  
        endif;
		if(isset($_POST['manual'])):
           echo '<iframe src="manual2010.php?opcaoManual=casosEspeciais" style="border:0" width="100%" height="350"></iframe>';//funciona
        endif;	



		//$finalizada=$_POST['finalizada'];		
			if(isset($_POST['fechar'])):
			  if(isset($_POST['cb_fechar'])):
			       $finalizada='s';
	    		   //GRAVA AS LEITURAS DiRETO NA REAN
				   $sql="update ficha set fic_finalizada_nocivas='s' where  fic_id=".$amostraLong;
  	 	           $generica=new tabelagenerica();
				   $generica->grava_registro_com_retorno($sql); 
		           printMSG('Esta amostra foi fechada e so podera ser reaberta se entrar com uma senha de administrador. Ok. Gravação normal.' ,'alerta');	
			   else:
			   		printMSG('Não houve fechamento, porque antes precisa marcar SIM. ' ,'alerta');
			   endif;//confirma se clicou em sim		
			endif;//isset do botao fechar
			
			if(isset($_POST['reabre'])):
			  $master=$sessao->getVar('master');
			  //echo("nomeTeste= $nomeTeste master  $master<br>");
			  if($master=='s'):
	    		   //GRAVA AS LEITURAS DiRETO NA REAN
				   $sql="update ficha set fic_finalizada_nocivas='n' where  fic_id=".$amostraLong;
  	 	           $generica=new tabelagenerica();
				   $generica->grava_registro_com_retorno($sql); 
		           printMSG('Teste foi reaberto! Ok. Gravação normal.' ,'alerta');
				   $finalizada='n';	
				   //grava ocorrencia
				   $finalidade="Reabrir DOSN";
	               $valor='-O-';				   
				   $objetocalculo->registroDeOcorrencias($amostraLong,0,$nomeOperador,$finalidade,$valor,$idLabo);
				   printMSG('Gravou Ok. Gravou também uma ocorrência.' ,'alerta');	
			   else:
			   		printMSG('Para reabrir este teste, desta amostra, precisa entrar no programa com a senha do ADMINISTRADOR. ' ,'alerta');
			   endif;//confirma se clicou em sim		
			endif;//isset do botao fechar

			
		 	//salvar nocivas +complemento
			if(isset($_POST['bt_salvar_peso_nocivas'])):
               //echo("alvando noc+comp");
			   //$pesoComplemento1=$_POST['peso_complemento'];//CONVERTE VIRGULA EM PONTO
			   //$pesoComplemento=str_replace(",",".",$_POST['peso_complemento']);//CONVERTE VIRGULA EM PONTO
               //$pesoPureza=$_POST['peso_pureza'];
               $pesoSilvestres=trim($_POST['pesoSilvestres']);
	           //$pesoNocivas=$_POST['peso_nocivas'];
		       //$pesoSilvestres=$objetocalculoRaioX->pesosAjustaCasasDecimais($pesoSilvestres);//pesosilvestres e oesp
               //$pesoNocivas=$objetocalculoRaioX->pesosAjustaCasasDecimais($pesoNocivas);//peso nocivas
               //$pesoNocivas=$pesoComplemento+$pesoPureza;//peso nocivas
	           //$pesoComplemento=$objetocalculoRaioX->pesosAjustaCasasDecimais($pesoComplemento);//complemento
			   ////////////
			   $pesoComplementoLido=trim($_POST['pesoComplemento']);
			   $pesoComplemento=str_replace(",",".",$pesoComplementoLido);//CONVERTE VIRGULA EM PONTO

			   $pesquisa=$pesoComplemento;			   
			   $pos= strpos($pesquisa,".");
			   $tama=strlen($pesquisa);
			   $casas1=$tama-$pos-1;
			   
               $pesoPureza=trim($_POST['pesoPureza']);

			   $pesquisa=$pesoPureza;			   
			   $pos= strpos($pesquisa,".");
			   $tama=strlen($pesquisa);
			   $casas2=$tama-$pos-1;
			   $maior=0;
			   if($casas1>$maior)$maior=$casas1;
			   if($casas2>$maior)$maior=$casas2;
			   
			   //echo("176 pesquisa=$pesquisa maior=$maior <br>"); 
            

			   $pesoNocivas=$pesoPureza+$pesoComplemento;
			   $pesoNocivas=number_format($pesoNocivas,$maior,'.','.');
			   
			   //$pesoNocivas=$objetocalculo->calculaPesoNocivas($pesoPureza,$complemento);
			   $balancaComplemento=trim($_POST['balancaComplemento']);
			   ///////////////	
               //vai gravar so a balanca complemento na tabela rean1			   
               ////////////
			   $rea_id_pureza=$vetorRaioX[98];  
			   if($rea_id_pureza>0):
				   $user = new rean1(array(
		                'rea_validade'=>$balancaComplemento,				
		            ));
		            $user->valorpk = $rea_id_pureza;
		            $user->extras_select = "WHERE rea_id=$rea_id_pureza";
		            $user->selecionaTudo($user);
		            $res = $user->retornaDados();
		            $user->atualizar($user);
					//echo("salvou rea_id_pureza= $rea_id_pureza<br>");
               endif; 			   
	
			   $dataComplemento=trim($_POST['dataComplemento']);
			   $user = new amostras(array(
                 'fic_complemento'=>$pesoComplemento,
                 'fic_pesodet_nocivas'=> $pesoNocivas,
                 'fic_pesodet_dosn'=> $pesoSilvestres,
                 'fic_operador_contaminante'=> $nomeOperador,
                 'fic_data_contaminante'=> $dataComplemento,
		        ));
		        $user->valorpk = $amostraLong;
		        $user->atualizar($user);
			    printMSG('Salvou nocivas, complemento, operador e data digitada.' .$amostraLong .' pn=' . $pesoNocivas,'alerta');
			endif;
		
		 
		  
		//vai inserir contaminante 
		//verifica tipo de submissao di formulario 
		
		
		if ($_SERVER['REQUEST_METHOD'] == 'POST' && $verificador == 1){
			
    	//vai inserir contaminante 
		if (isset($_POST['bt_gravarFracaoPureza'])):
           //primeira coisa: deletar o que tem 
           $contaminante=$_POST["contaminante"];
           list($nomeCientifico, $codigo, $limite) = explode("*", $contaminante);
		   if($codigo=='NOCT')$codigoSalvar='3NOT';
		   if($codigo=='NOCP')$codigoSalvar='4NOP';
		   if(substr($codigo,0,2)=='NO'):

			   $quantiaPureza=$_POST["quantiaPureza"];
	           echo("nomecinetifico=$nomeCientifico  quantiaPureza=$quantiaPureza codigo=$codigo<br>");
	           //VAI DELETAR O QUE TIVER DESTE CONTAMINANTE
			   //PRIMEIRO VAI ACHAR A ID DO CONTAMINANTE
			   //acha o id do contaminante
			 	//ENTRA DE QUAKQUER MANEIRA
				$idContaminante=0;
		 	 	$generica=new tabelagenerica();
				$generica->tabela="contaminantes";
				$generica->campos_valores = array(
						"con_id" => NULL,
					);
				$generica->extras_select =" where con_nome_cientifico='".$nomeCientifico."'";
			    $generica->selecionaCampos($generica);
				while ($resgenerica = $generica->retornaDados()):
				    $idContaminante=$resgenerica->con_id;
			    endwhile;
				//echo("NOME= $contaminante QT= $quantiaTotal  QP=$quantiaPureza  QC=$quantiaComplemento NC=$nomeCientifico ID=$idContaminante<br>");
			   
			   //deleta os registros anteriores desta especie no codigo 5FRA   
			   $sqld="delete from invasoras where inv_codigo='5FRA' &&  inv_cod_praga=" .$idContaminante." && inv_amostra=".$amostraLong;
			   $generica=new tabelagenerica();//chama a rotina generica de execução de sql insertt delete update
			   $generica->grava_registro_com_retorno($sqld);
			   
			   
               //VAI INCLUIR O REGISTRO DO CONTAMINANTE na QUANTIDADE TOTAL
			   $quantiaTotal=$quantiaPureza;
		       $sqli="insert into invasoras(inv_amostra,inv_cod_praga,inv_qtd,inv_codigo) values('$amostraLong','$idContaminante','$quantiaTotal','$codigoSalvar')";
			   $generica=new tabelagenerica();//chama a rotina generica de execução de sql insertt delete update
			   $generica->grava_registro_com_retorno($sqli);
		   	   printMSG('Gravação efetuada. Foi atualizada a quantidade total.' ,'alerta'); 
               

			   //VAI INCLUIR O REGISTRO DO CONTAMINANTE na fracao pureza
			   $sqli="insert into invasoras(inv_amostra,inv_cod_praga,inv_qtd,inv_codigo) values('$amostraLong','$idContaminante','$quantiaPureza','5FRA')";
			   $generica=new tabelagenerica();//chama a rotina generica de execução de sql insertt delete update
			   $generica->grava_registro_com_retorno($sqli);
		   	   printMSG('Gravação efetuada, de uma nociva na fração pureza.' ,'alerta'); 
           else:
		       printMSG('Não houve gravação, pois o contaminante selecionado não era uma nociva.' ,'alerta'); 
		   endif;  

		endif;	
		
		
		////bt_gravar2023////bt_gravar2023////bt_gravar2023////bt_gravar2023////bt_gravar2023////bt_gravar2023////bt_gravar2023////
		////bt_gravar2023////bt_gravar2023////bt_gravar2023////bt_gravar2023////bt_gravar2023////bt_gravar2023////bt_gravar2023////
		////bt_gravar2023////bt_gravar2023////bt_gravar2023////bt_gravar2023////bt_gravar2023////bt_gravar2023////bt_gravar2023////
		////bt_gravar2023////bt_gravar2023////bt_gravar2023////bt_gravar2023////bt_gravar2023////bt_gravar2023////bt_gravar2023////
		////bt_gravar2023////bt_gravar2023////bt_gravar2023////bt_gravar2023////bt_gravar2023////bt_gravar2023////bt_gravar2023////
		if (isset($_POST['bt_gravar2023'])):
           $contaminante=$_POST["contaminante"];
		   $quantidadePurezaDigitada=$_POST["quantidadePureza2023"];
		   $quantidadeComplementoDigitada=$_POST["quantidadeComplemento2023"];
		   $quantidadeTotal=$quantidadePurezaDigitada+$quantidadeComplementoDigitada;
           list($nomeCientifico, $codigo, $limite) = explode("*", $contaminante);
		   if($codigo=='NOCT')$codigoGravacao='3NOT';
		   if($codigo=='NOCP')$codigoGravacao='4NOP';
		   if($codigo=="OESP") $codigoGravacao="1OES";
		   if($codigo=="SILV") $codigoGravacao="2SIL";
		   $caso='brancos';//deixou ambos em branco
        
		   //VAI PROCEDER AS GRAVACOES DOS REGISTROS,DELETANDO,INCLUINDO,EDITANDO,IGNORANDO
    	 	//ENTRA DE QUAKQUER MANEIRA  para capturar a id do contaminantes
	 	 	$idContaminante=0;
			$generica=new tabelagenerica();
			$generica->tabela="contaminantes";
			$generica->campos_valores = array(
					"con_id" => NULL,
				);
			$generica->extras_select =" where con_nome_cientifico='".$nomeCientifico."'";
		    $generica->selecionaCampos($generica);
			while ($resgenerica = $generica->retornaDados()):
			    $idContaminante=$resgenerica->con_id;
		    endwhile;

		 //SE ACHOU O CONTAMINANTES ENTAO FAZ ALGUMA COISA 	//VAI INCLUIR O REGISTRO DO CONTAMINANTE  editar deletar etc
		 if($idContaminante>0):
           //AQUI VAI PESQUISAR ID E A  QUANTIDADE TOTAL QUE JA FOI GRAVADO , NO CASO DE NOCIVAS E ORYZA
		   	$idTotal=0;
			$quantidadeTotalGravado=0;
			$generica=new tabelagenerica();
			$generica->tabela="invasoras";
			$generica->campos_valores = array(
					"inv_qtd" => NULL,
					"inv_id" => NULL,

				);
			$generica->extras_select =" where inv_cod_praga=".$idContaminante." and inv_codigo='".$codigoGravacao."' and inv_amostra=".$amostraLong;
		    $generica->selecionaCampos($generica);
			$achouGravacao="NAO";
			while ($resgenerica = $generica->retornaDados()):
			    $quantidadeTotalGravado=$resgenerica->inv_qtd;
			    $idTotal=$resgenerica->inv_id;
			    $achouGravacaoTotal="SIM";
		    endwhile;

          //AQUI VAI PESQUISAR ID E A  QUANTIDADE COMPLEMENTO QUE JA FOI GRAVADO , NO CASO DE NOCIVAS E ORYZA
		   	$idPureza=0;
			$quantidadePurezaGravado=0;
			$generica=new tabelagenerica();
			$generica->tabela="invasoras";
			$generica->campos_valores = array(
					"inv_qtd" => NULL,
					"inv_id" => NULL,
				);
			$generica->extras_select =" where  inv_cod_praga=".$idContaminante." and inv_codigo='5FRA' and inv_amostra=".$amostraLong;
		    $generica->selecionaCampos($generica);
			$achouGravacao="NAO";
			while ($resgenerica = $generica->retornaDados()):
			    $quantidadePurezaGravado=$resgenerica->inv_qtd;
			    $idPureza=$resgenerica->inv_id;
			    $achouGravacaoPureza="SIM";
		    endwhile;
           //echo("375 gravadoNaPureza=$quantidadePurezaGravado  <br>");


           //aqui eu vou gravar a quantidade total se for o caso de nocivas e oriza
           //if($codigo=='SILV' || $codigo=='OESP') $quantidadeTotal=$quantidadePureza2023;
           //if($codigo=='NOCT') $quantidadeTotal=$quantidadePureza2023+$quantidadeComplemento2023;
           //if(substr($contaminante,0,5)=='Oryza') $quantidadeTotal=$quantidadePureza2023+$quantidadeComplemento2023;

           //MATEMATICA
		   //atribui para ambos, os valores  digitados se forem maior que zero
		   if($quantidadePurezaDigitada>0)$quantidadeTotalGravar=$quantidadePurezaDigitada;
		   if($quantidadeComplementoDigitada>0) $quantidadeTotalGravar=$quantidadeComplementoDigitada;
		   if($quantidadePurezaDigitada>0)$quantidadePurezaGravar=$quantidadePurezaDigitada;

           //se digitou ambos ele vai somar  ambos como valores para lancar em quantidade total
		   if($quantidadePurezaDigitada>0  && $quantidadeComplementoDigitada>0):
		       $quantidadeTotalGravar=$quantidadePurezaDigitada+$quantidadeComplementoDigitada;
		       $quantidadePurezaGravar=$quantidadePurezaDigitada;
		   endif;	   
           //se digitou so pureza ele pega o valor capturado do complemento(se existir) para criar o valor total
		   if($quantidadePurezaDigitada>0  && $quantidadeComplementoDigitada<1 && $quantidadeComplementoGravado>0):
		      $quantidadeTotalGravar=$quantidadePurezaDigitada+$quantidadeComplementoGravado;
		   endif;
           //se digitou so complemento, ele pega o valor capturado do total(se existir) para criar o valor total
		   if($quantidadePurezaDigitada<1  && $quantidadeComplementoDigitada>1 && $quantidadeTotalGravado>0):
		      //vai deduzir qual era pureza que foi gravada pegando o totalgravado menos o complemento gravado
			  //echo("401 ebtrou aqui quantidadeTotalGravado=$quantidadeTotalGravado  quantidadePurezaGravado=$quantidadePurezaGravado<br>");
		      $quantidadePurezaGravar=$quantidadePurezaGravado;
			  $quantidadeTotalGravar=$quantidadePurezaGravado+$quantidadeComplementoDigitada;
           endif;

           //echo("405quantidadeTotalGravar=$quantidadeTotalGravar  quantidadepurezaGravar=$quantidadePurezaGravar<br>");

		   //AQUI GRAVA E EDITA A QUANTIDADE TOTAL
	         if($quantidadeTotalGravar>0):
	           if($idTotal==0): 
				   $sqli="insert into invasoras(inv_amostra,inv_cod_praga,inv_qtd,inv_codigo) values('$amostraLong','$idContaminante','$quantidadeTotalGravar','$codigoGravacao')";
				   //echo("411sqli=$sqli<br>");
				   $generica=new tabelagenerica();//chama a rotina generica de execução de sql insertt delete update
				   $generica->grava_registro_com_retorno($sqli);
				   echo("Salvou no total =$quantidadeTotalGravar<br>");
                   //echo("414 Salvou quantidadeTotalGravar=$quantidadeTotalGravar<br>");
			   else://perguntou se idTotal>0  e se a $quantidadeTotal>0	   
				   $sqli="update invasoras set inv_qtd='$quantidadeTotalGravar' where inv_id=".$idTotal ;
				   //echo("417sqli=$sqli<br>");
				   $generica=new tabelagenerica();//chama a rotina generica de execução de sql insertt delete update
				   $generica->grava_registro_com_retorno($sqli);
	               //echo("420 Editou o registro gravadoNaPureza=$quantidadeTotalGravar  idComplemento=$idComplemento<br>");
			   endif;  
	         endif;//se for $quantidadeTotalGravar >0 ele inclui ou edita dependendo se tem o registro ou nao 


             //AQUI GRAVA E EDITA a PUREZA
	         if($quantidadePurezaGravar>0):
	           if($idPureza==0): 
				   $sqli="insert into invasoras(inv_amostra,inv_cod_praga,inv_qtd,inv_codigo) values('$amostraLong','$idContaminante','$quantidadePurezaGravar','5FRA')";
				   //echo("429sqli=$sqli<br>");
				   $generica=new tabelagenerica();//chama a rotina generica de execução de sql insertt delete update
				   $generica->grava_registro_com_retorno($sqli);
				   echo("Salvou na PUREZA =$quantidadePurezaGravar<br>");
			   else://perguntou se $idComplemento>0 E SE A QUANTIDADE COMPLEMENTO>0    
				   $sqli="update invasoras set inv_qtd='$quantidadePurezaGravar' where inv_id=".$idPureza ;
				   //echo("435 sqli=$sqli<br>");
				   $generica=new tabelagenerica();//chama a rotina generica de execução de sql insertt delete update
				   $generica->grava_registro_com_retorno($sqli);
	               //echo("438aqui vai editar o registro $quantidadePurezaGravar  idPUREZA=$idPureza<br>");
			   endif;  
	         endif;//se for $quantidadeComplementoGravar >0 ele  editar dependendo se tem o registro

             //se digitou ambos=0
			 if($quantidadePurezaDigitada=="0" && $quantidadeComplementoDigitada=="0"):
               if($idTotal>0):
				   //$sqli="delete from invasoras  where inv_id=".$idTotal ;
				   //echo("462 sqli=$sqli<br>");
				   $generica=new tabelagenerica();//chama a rotina generica de execução de sql insertt delete update
				   $generica->grava_registro_com_retorno($sqli);
			   endif;
               if($idPureza>0):
				   $sqli="delete from invasoras  where inv_id=".$idPureza ;
				   //echo("468 sqli=$sqli<br>");
				   $generica=new tabelagenerica();//chama a rotina generica de execução de sql insertt delete update
				   $generica->grava_registro_com_retorno($sqli);
			   endif;
			 endif;//se digitou ambos =0
			 echo("Ok. Salvou!");



		 else://SE NAO SELECIONOU CONTAMINANTE
		    printMSG('Precisa selecionar o contaminante, antes de salvar.' ,'alerta'); 
		 endif;// SE SELECIONOU CONTAMINANTE 
           //echo("entrou dos2023  contaminante=$contaminante nomeCientifico=$nomeCientifico codigo=$codigo quantidadePureza2023=$quantidadePureza2023 quantidadeComplemento2023=$quantidadeComplemento2023<br>");  
           //echo("entrou dos2023  nomeCientifico=$nomeCientifico $codigo QP=$quantidadePureza2023 QC=$quantidadeComplemento2023  CASO=$caso  casoTipo=$casoTipo<br>");  
        endif;//FINAL DO ISSET bt_gravar2023
		////FINAL DO  BOTAO bt_gravar2023////3////FINAL DO  BOTAO bt_gravar2023////FINAL DO  BOTAO bt_gravar2023////FINAL DO  BOTAO bt_gravar2023////FINAL DO  BOTAO bt_gravar2023////
		////FINAL DO  BOTAO bt_gravar2023////3////FINAL DO  BOTAO bt_gravar2023////FINAL DO  BOTAO bt_gravar2023////FINAL DO  BOTAO bt_gravar2023////FINAL DO  BOTAO bt_gravar2023////
		////FINAL DO  BOTAO bt_gravar2023////3////FINAL DO  BOTAO bt_gravar2023////FINAL DO  BOTAO bt_gravar2023////FINAL DO  BOTAO bt_gravar2023////FINAL DO  BOTAO bt_gravar2023////
		////FINAL DO  BOTAO bt_gravar2023////3////FINAL DO  BOTAO bt_gravar2023////FINAL DO  BOTAO bt_gravar2023////FINAL DO  BOTAO bt_gravar2023////FINAL DO  BOTAO bt_gravar2023////
		////FINAL DO  BOTAO bt_gravar2023////3////FINAL DO  BOTAO bt_gravar2023////FINAL DO  BOTAO bt_gravar2023////FINAL DO  BOTAO bt_gravar2023////FINAL DO  BOTAO bt_gravar2023////
		

		if (isset($_POST['bt_gravarFracaoComplemento'])):
           //primeira coisa: deletar o que tem 
           $contaminante=$_POST["contaminante"];
           list($nomeCientifico, $codigo, $limite) = explode("*", $contaminante);
		   echo("LINHA 292 nomecinetifico=$nomeCientifico  quantiaPureza=$quantiaComplemento codigo=$codigo<br>");
		   if($codigo=='NOCT')$codigoGravacao='3NOT';
		   if($codigo=='NOCP')$codigoGravacao='4NOP';
		   
		   
		   if(substr($codigo,0,2)=='NO'):
			   $quantiaComplemento=$_POST["quantiaComplemento"];
	           //echo("nomecinetifico=$nomeCientifico  quantiaPureza=$quantiaComplemento codigo=$codigo<br>");
	           //VAI DELETAR O QUE TIVER DESTE CONTAMINANTE
			   //PRIMEIRO VAI ACHAR A ID DO CONTAMINANTE
			   //acha o id do contaminante
			 	//ENTRA DE QUAKQUER MANEIRA
		 	 	$generica=new tabelagenerica();
				$generica->tabela="contaminantes";
				$generica->campos_valores = array(
						"con_id" => NULL,
					);
				$generica->extras_select =" where con_nome_cientifico='".$nomeCientifico."'";
			    $generica->selecionaCampos($generica);
				while ($resgenerica = $generica->retornaDados()):
				    $idContaminante=$resgenerica->con_id;
			    endwhile;
			   //deleta os registros anteriores desta especie no codigo 3NOT  
			   $sqld="delete from invasoras where inv_codigo='".$codigoGravacao."' &&  inv_cod_praga=" .$idContaminante." && inv_amostra=".$amostraLong;
			   $generica=new tabelagenerica();//chama a rotina generica de execução de sql insertt delete update
			   $generica->grava_registro_com_retorno($sqld);

	           //aqui deve achar a quantidade encontrada na pureza para poder fazer a esquacao    total=puraza+complemento
			   $quantiaPureza=0;
			   //ENTRA DE QUAKQUER MANEIRA
		 	   $generica=new tabelagenerica();
			   $generica->tabela="invasoras";
			   $generica->campos_valores = array(
						"inv_qtd" => NULL,
					);
			   $generica->extras_select =" where inv_codigo='5FRA' && inv_cod_praga=".$idContaminante." && inv_amostra=".$amostraLong;
			   $generica->selecionaCampos($generica);
			   while ($resgenerica = $generica->retornaDados()):
				   $quantiaPureza=$resgenerica->inv_qtd;
			   endwhile;
		       $quantiaTotal=$quantiaComplemento+$quantiaPureza;
			   //echo("generica->extras_select=$generica->extras_select<br>");
			   
			   
			   //VAI INCLUIR O REGISTRO DO CONTAMINANTE 
			   $sqli="insert into invasoras(inv_amostra,inv_cod_praga,inv_qtd,inv_codigo) values('$amostraLong','$idContaminante','$quantiaTotal','$codigoGravacao')";
			   //echo("sqli=$sqli<br>");
			   $generica=new tabelagenerica();//chama a rotina generica de execução de sql insertt delete update
			   $generica->grava_registro_com_retorno($sqli);
	           
			   //echo("NOME= $contaminante QT= $quantiaTotal  QP=$quantiaPureza  QC=$quantiaComplemento  Qt=$quantiaTotal NC=$nomeCientifico ID=$idContaminante<br>");
			   printMSG('Gravação efetuada, de uma nociva na fração complemento.' ,'alerta'); 
          else:
		       printMSG('Não houve gravação, pois o contaminante selecionado não era uma nociva.' ,'alerta'); 
		  endif;
		endif;	

		if (isset($_POST['bt_eliminar'])):
		   if(isset($_POST['cb_eliminar'])):
			   $sqld="delete from invasoras where  inv_amostra=".$amostraLong;
			   $generica=new tabelagenerica();//chama a rotina generica de execução de sql insertt delete update
			   $generica->grava_registro_com_retorno($sqld);
		   else:	   
			   echo("Para eliminar, deve marcar SIM<br>");  
		   endif;	   
		endif;


			 
		if (isset($_POST['GravarFracionada_deletaraaaaaaa'])):
             echo("xxxxxxxxxxxxxesta no gravar<br>");
			 //forma o vetor nocivas toleradas
	         $vetorNOCT=array();
			 //echo("passou por aqui <br>");
			 $vetorNOCT=$objetocalculo-> captura_registros_invasoras("3NOT",$amostraLong);
			 //foreach($vetorNOCT aS $vlr)  { $quantosNOCT=$vlr; }
			 // $vetorNOCT[1]="kkks";
			 foreach($vetorNOCT aS $vlr):
			   echo("vlr= $vlr<br>");
		     endforeach;  
			 
	         $quantiaPureza=$_POST["quantiaPureza"];
	         $quantiaComplemento=$_POST["quantiaComplemento"];
			 $quantidadeTotal=0;
			 if($quantiaPureza>0 || $quantiaComplemento>0):
                $quantiaTotal=$quantiaPureza+$quantiaComplemento;
			 endif;
			 //unset($_POST);
	         $contaminante=$_POST["contaminante"];
			 echo("xxxxxxxxxxxxxesta no gravar   contaminante $contaminante<br>");
	         list($nomeCientifico, $codigo, $limite) = explode("*", $contaminante);
			 //vai deleta NOCT, PARA EM SEGUIDA GRAVAR DE NOVO  PRIMEIRO DETECTA SE TEM OU NAO
		     if($quantiaTotal=="1000" ):
			    $sqld="delete from invasoras where inv_cod_praga=" .$idContaminante." && inv_amostra=".$amostraLong;
			    $generica=new tabelagenerica();//chama a rotina generica de execução de sql insertt delete update
		        $generica->grava_registro_com_retorno($sqld);
	     	 endif;
		 
			 
			   

         //se o codigo nao for nociva ele nao vai fazer nada 
         if(substr($codigo,0,2)=='NO' && $quantiaTotal>0):
         //if(substr($codigo,0,2)=='NO' ):

	        //echo("quantidadeTotal= $quantiaTotal $quantiaPureza $quantiaComplemento nomeCientifico=$nomeCientifico<br>");
            //acha o id do contaminante
		 	//ENTRA DE QUAKQUER MANEIRA
	 	 	$generica=new tabelagenerica();
			$generica->tabela="contaminantes";
			$generica->campos_valores = array(
					"con_id" => NULL,
				);
			$generica->extras_select =" where con_nome_cientifico='".$nomeCientifico."'";
		    $generica->selecionaCampos($generica);
			while ($resgenerica = $generica->retornaDados()):
			    $idContaminante=$resgenerica->con_id;
		    endwhile;
			//echo("NOME= $contaminante QT= $quantiaTotal  QP=$quantiaPureza  QC=$quantiaComplemento NC=$nomeCientifico ID=$idContaminante<br>");

			
			 //aqui fazer a rotina de inclusao e exclusao
			 if($quantiaTotal>0 && $contaminante!=""):
		         //se digitou 0 vai dar um comando para deletar
			     if($quantiaTotal=="0" ):
				    $sqld="delete from invasoras where inv_cod_praga=" .$idContaminante." && inv_amostra=".$amostraLong;
				    $generica=new tabelagenerica();//chama a rotina generica de execução de sql insertt delete update
			        $generica->grava_registro_com_retorno($sqld);
		     	 endif;
				 //VAI DELETAR, PARA EM SEGUIDA GRAVAR DE NOVO
			     $sqld="delete from invasoras where inv_cod_praga=" .$idContaminante." && inv_codigo='3NOT' && inv_amostra=".$amostraLong;
			     echo("sqld=$sqld<br>");

				 $generica=new tabelagenerica();//chama a rotina generica de execução de sql insertt delete update
		         $generica->grava_registro_com_retorno($sqld);
				 
		         //se digitou >0 vai incluir
			     if($quantiaTotal>0 ):
                       //aqui prepara para gravar 						
					   //echo("transferencia=$amostraLong.$nomeCientifico.$quantia.$codigo<br>");
					   //aqui faz um ajuste para que estes 4 identificadores fiquem na ordem(OESP,SILV,NOCT,NOCP) para viabiliazar a impressao do boletim em ordem das codigos 10,11,12,13
					   if($codigo=="NOCT") $codigo="3NOT";
					   if($codigo=="NOCP") $codigo="4NOP";

                       //vai gravar o total no codigo certo
					   $sqli="insert into invasoras(inv_amostra,inv_cod_praga,inv_qtd,inv_codigo) values('$amostraLong','$idContaminante','$quantiaTotal','$codigo')";
				       $generica=new tabelagenerica();//chama a rotina generica de execução de sql insertt delete update
			           $generica->grava_registro_com_retorno($sqli);
                       //echo("sqli= $sqli<br>"); 


                       //vai gravar o so a fracao pureza ou seja a parte reduzida
					 if($quantiaPureza>0):  
					   $codigo="5FRA";
					   $sqli="insert into invasoras(inv_amostra,inv_cod_praga,inv_qtd,inv_codigo) values('$amostraLong','$idContaminante','$quantiaPureza','$codigo')";
				       $generica=new tabelagenerica();//chama a rotina generica de execução de sql insertt delete update
			           $generica->grava_registro_com_retorno($sqli);
					 endif;  
                       //echo("sqli= $sqli<br>"); 
					   printMSG('Gravou Ok.' ,'alerta');	

				 endif;//perguntou se a quantidade maior que zer
			   endif;//peguntou se realmente é nociva
			 endif;
		endif;//comando gravar fracionada


        //vai gravar na completa 
		if (isset($_POST['GravarCO'])):
            //echo("xxxxxxxxxxxxxesta no gravar<br>");
	        $quantia=$_POST["quantia"];
			//unset($_POST);
	        $contaminante=$_POST["contaminante"];
	        list($nomeCientifico, $codigo, $limite) = explode("*", $contaminante);
			if(substr($codigo,0,2)!='NO'):
	        //echo("quantia= $quantia nomeCientifico=$nomeCientifico<br>");
            //acha o id do contaminante
		 	//ENTRA DE QUAKQUER MANEIRA
	 	 	$generica=new tabelagenerica();
			$generica->tabela="contaminantes";
			$generica->campos_valores = array(
					"con_id" => NULL,
				);
			$generica->extras_select =" where con_nome_cientifico='".$nomeCientifico."'";
		    $generica->selecionaCampos($generica);
			while ($resgenerica = $generica->retornaDados()):
			    $idContaminante=$resgenerica->con_id;
		    endwhile;
			 //aqui fazer a rotina de inclusao e exclusao
			 if($quantia!="" && $contaminante!=""):
		         //se digitou 0 vai dar um comando para deletar
			     if($quantia=="0" )
				 {
				    $sqld="delete from invasoras where inv_cod_praga=" .$idContaminante." && inv_amostra=".$amostraLong;
				    $generica=new tabelagenerica();//chama a rotina generica de execução de sql insertt delete update
			        $generica->grava_registro_com_retorno($sqld);
		     	 }
		         //se digitou >0 vai incluir
			     if($quantia>0 ):
                       //aqui prepara para gravar 						
					   // echo("transferencia=$amostraLong.$nomeCientifico.$quantia.$codigo<br>");
					   //aqui faz um ajuste para que estes 4 identificadores fiquem na ordem(OESP,SILV,NOCT,NOCP) para viabiliazar a impressao do boletim em ordem das codigos 10,11,12,13
					   if($codigo=="OESP") $codigo="1OES";
					   if($codigo=="SILV") $codigo="2SIL";

	
					   $sqli="insert into invasoras(inv_amostra,inv_cod_praga,inv_qtd,inv_codigo) values('$amostraLong','$idContaminante','$quantia','$codigo')";
					   //$resultado=mysql_query($sqli);//nao apagar isso poi ele executa desta maneira tambem
					   //echo("contaminante caçado na gravacao = $idContaminante sql= $sqli<br>");
				       $generica=new tabelagenerica();//chama a rotina generica de execução de sql insertt delete update
			           $generica->grava_registro_com_retorno($sqli);
					   //grava ocorrencia
					   $finalidade="DOSN"." Tipo=".substr($codigo,1,3)." Qtd=".$quantia;
                       $valor=	substr($contaminante,0,10);				   
					   $objetocalculo->registroDeOcorrencias($amostraLong,0,$nomeOperador,$finalidade,$valor,$idLabo);
					   printMSG('Gravou Ok. Gravou também uma ocorrência.' ,'alerta');	
				 endif;//PERGUNTA SE A QUANTIDADE É MAIOR QUE ZERO
			   endif;//FECHA O IF QUE PERGUNTA SE INFORMOU QUANTIDADE E SE INFORMOU O CONTAMINANTE
           else:
     		   printMSG('Nao houve gravacao pois foi selecionada um contaminante que não é 	NOCIVA.' ,'alerta');	
		   endif;//PERGUNTA SE SELECIONOU CONTAMINANTE DIFERENTE DE NOCT OU NOCP 			 
		endif;//comando gravar na completa

		
		
		
		//MANTER ISSO NA RESERVA
		if(isset($_POST['GravarREx']) || isset($_POST['GravarCOx']) ):
		     echo("os dois vem aqui2<br>");
		     $fracao="C";
		     if(isset($_POST['GravarRE']))$fracao="R";
             //echo("xxxxxxxxxxxxxesta no gravar<br>");
	         $quantia=$_POST["quantia"];
	         $quantiaPureza=$_POST["quantiaPureza"];
	         $quantiaComplemento=$_POST["quantiaComplemento"];
             if($quantiaPureza>0 && $quantiaComplemento>0):
			    $quantiaTotal=$quantiaPureza+$quantiaComplemento;
			 endif;

			 //unset($_POST);
	         $contaminante=$_POST["contaminante"];
	         list($nomeCientifico, $codigo, $limite) = explode("*", $contaminante);
	         //echo("quantia= $quantia nomeCientifico=$nomeCientifico<br>");
            //acha o id do contaminante
		 	//ENTRA DE QUAKQUER MANEIRA
	 	 	$generica=new tabelagenerica();
			$generica->tabela="contaminantes";
			$generica->campos_valores = array(
					"con_id" => NULL,
				);
			$generica->extras_select =" where con_nome_cientifico='".$nomeCientifico."'";
		    $generica->selecionaCampos($generica);
			while ($resgenerica = $generica->retornaDados()):
			    $idContaminante=$resgenerica->con_id;
		    endwhile;
			 //aqui fazer a rotina de inclusao e exclusao
			 if($quantia!="" && $contaminante!="")
			 {
		         //se digitou 0 vai dar um comando para deletar
			     if($quantia=="0" )
				 {
				    $sqld="delete from invasoras where inv_cod_praga=" .$idContaminante." && inv_amostra=".$amostraLong;
				    $generica=new tabelagenerica();//chama a rotina generica de execução de sql insertt delete update
			        $generica->grava_registro_com_retorno($sqld);
		     	 }
		         //se digitou >0 vai incluir
			     if($quantia>0 ):
                       //aqui prepara para gravar 						
					   // echo("transferencia=$amostraLong.$nomeCientifico.$quantia.$codigo<br>");
					   //aqui faz um ajuste para que estes 4 identificadores fiquem na ordem(OESP,SILV,NOCT,NOCP) para viabiliazar a impressao do boletim em ordem das codigos 10,11,12,13
					   if($codigo=="OESP") $codigo="1OES";
					   if($codigo=="SILV") $codigo="2SIL";
					   if($codigo=="NOCT") $codigo="3NOT";
					   if($codigo=="NOCP") $codigo="4NOP";
					   //if($codigo=="FRAC") $codigo="5FRA";
					   if($fracao=='R'):
					     echo("fracao dentro do ra=$fracao codigo=$codigo<br>");
					     if($codigo=="3NOT"  || $codigo=="4NOP")$codigo="5FRA";
;					   endif;
					   //echo("fracao=$fracao codigo=$codigo<br>");
					   //ENTRA DE QUAKQUER MANEIRA
				 	 	$genericaV=new tabelagenerica();
						$genericaV->tabela="invasoras";
						$genericaV->campos_valores = array(
								"inv_id" => NULL,
								"inv_codigo" => NULL,
							);
						$genericaV->extras_select =" where  inv_amostra=" .$amostraLong. " and inv_cod_praga = " . $idContaminante;
					    $genericaV->selecionaCampos($genericaV);
						$contador=0;
						while ($resgenericaV = $genericaV->retornaDados()):
						    //se for 5fra ai nao conta 
						    if($resgenericaV->inv_codigo !="5FRA")$contador++;
					    endwhile;
					   
						if ($contador == 0):
						   echo("$contador vai gravar<br>");
						   $generica=new tabelagenerica();//chama a rotina generica de execução de sql insertt delete update
						   $sqli="insert into invasoras(inv_amostra,inv_cod_praga,inv_qtd,inv_codigo) values('$amostraLong','$idContaminante','$quantia','$codigo')";
				           $generica->grava_registro_com_retorno($sqli);
						   //grava ocorrencia
						   $finalidade="DOSN"." Tipo=".substr($codigo,1,3)." Qtd=".$quantia;
	                       $valor=	substr($contaminante,0,10);				   
						   $objetocalculo->registroDeOcorrencias($amostraLong,0,$nomeOperador,$finalidade,$valor,$idLabo);
						   printMSG('Gravou Ok. Gravou também uma ocorrência.' ,'alerta');	
						
						else:
						   
						   printMSG('Não vai  gravar pois ja tem. ' ,'alerta');
						endif;
						
				 endif;
			 }
		endif;//comando gravar
		} //fim do post
  
/////////////////////////////////////
 //deixei isso aqui pois serve para alguma conferencia 03/05/2020
 //ao usar o comado que limoa o array(corrigi hoje 03/05/2020 la na classe) o numero
 // de elementos do arrau  é sizeof -1  ir arrumando gradativamente nos locais onde isso é usado principalmente fichas virual
 $vetorRXOESP=$objetocalculoRaioX-> captura_registros_invasorasRX("1OES",$amostraLong);
 $vetorRXSILV=$objetocalculoRaioX-> captura_registros_invasorasRX("2SIL",$amostraLong);
 $vetorRXNOCT=$objetocalculoRaioX-> captura_registros_invasorasRX("3NOT",$amostraLong);
 $vetorRXNOCP=$objetocalculoRaioX-> captura_registros_invasorasRX("4NOP",$amostraLong);
 $vetorRXFRAC=$objetocalculoRaioX-> captura_registros_invasorasRX("5FRA",$amostraLong);

 $limiteOESP=sizeof($vetorRXOESP)-1;
 $limiteSILV=sizeof($vetorRXSILV)-1;
 $limiteNOCT=sizeof($vetorRXNOCT)-1;
 $limiteNOCP=sizeof($vetorRXNOCP)-1;
////////////////////////////////////		  
		  
		  
		  
		  
 	 	$generica=new tabelagenerica();
		$generica->tabela="especies, ficha,cultivar";
		$generica->campos_valores = array(
				"fic_lote" => NULL,
				"fic_amostra" => NULL,
				"fic_amostra_previa" => NULL,
				"esp_nome" => NULL,
				"esp_id" => NULL,
				"fic_categoria" => NULL,
				"esp_grupo2011" => NULL,
				"fic_finalizada_nocivas" => NULL,

			);
		$generica->extras_select =" where  fic_cultivar=ctv_id &&  esp_id=ctv_especie &&  fic_id=" . $amostraLong;
	    $generica->selecionaCampos($generica);
		while ($resgenerica = $generica->retornaDados()):

            if($finalidade=='PREVIA'):
 			    $vetorFicha[1]=$resgenerica->fic_amostra_previa;
			else:
 			    $vetorFicha[1]=$resgenerica->fic_amostra;
			endif;  
			$finalizada=$resgenerica->fic_finalizada_nocivas;
			$vetorFicha[0]=$resgenerica->fic_lote;
			$vetorFicha[2]=$resgenerica->esp_nome;
			$vetorFicha[3]=$resgenerica->fic_categoria;
			$vetorFicha[4]=$resgenerica->esp_grupo2011;
			$vetorFicha[5]=$resgenerica->esp_id;
			$grupo2011=$resgenerica->esp_grupo2011;
	    endwhile;
		
		
		
  	    //echo("eeeeeeeeeeeeeeeeespecie= $vetorFicha[2]<br>"); 
		  
     //enche vetor contaminantes
	 //aqui em vez destes if para cada categoria coloca um lowcase e soma com lim
	 $campoLimite="lim_s2";        //aqui vai o valor deful. se ele usar semente propria ou o descambau ele pega da s1 s[e fini
	 if($vetorFicha[3]=="C1") $campoLimite="lim_c1";
	 if($vetorFicha[3]=="C2") $campoLimite="lim_c2";
	 if($vetorFicha[3]=="S1") $campoLimite="lim_s1";
	 if($vetorFicha[3]=="S2") $campoLimite="lim_s2";
	 if($vetorFicha[3]=="GENETICA") $campoLimite="lim_genetica";
	 if($vetorFicha[3]=="IMPORTADA") $campoLimite="lim_importada";
	 if($vetorFicha[3]=="BASICA") $campoLimite="lim_basica";
	 //define o codigo da cultura
	 $codigoCultura=$vetorFicha[5];//se nao pertencer a um grupo entao pega o id da cultura
	 $codigoCulturaValoroso=$vetorFicha[5];//se nao pertencer a um grupo entao pega o id da cultura
     //$grupo2011=$vetorFicha[4]; //pega o grupo pode ser grupo indefinido dai fica codigo da cultura = id da cultura
	 //acha o id do grupo
	 //$codigoCultura=$vetorFicha[4];
     $codigoCulturaPescado=$objetocalculo->capturaIDGrupo($grupo2011);
	 $codigoCultura=$codigoCulturaPescado;
	 if($codigoCultura<1)$codigoCultura=$codigoCulturaValoroso;
	 
	 //echo("xxxxxxxxxx   codigoCultura=   $codigoCultura  codigoCulturaValoroso=$codigoCulturaValoroso<br>");
	 
	 
	 
	 
	 
	 //echo("xxxxxxxxxxxxxxxxxxxxcodigoCulturaPescado= $codigoCulturaPescado   grupo2011=$grupo2011  codigoCulturaPescado= $codigoCulturaPescado<br>");
     /*
	 $codigoCulturaPescado=capturaIDGrupo($grupo2011);//busca num lugar so o codigo numerico verdadeiro
	 if($codigoCulturaPescado>0)$codigoCultura=$codigoCulturaPescado;
	 */
	 
	 /*
	 $vetorContaminantesConcatenado= captura_registros_contaminantes($campoLimite,$codigoCultura);
	 $vetorTransito= $vetorContaminantesConcatenado;
	 */
	 
	 
	 
	 
	 //adiciona todos outros nomes na lista mas como silvestres ESTE VETOR TEM APENA O NOME CIENTIFICO. o propósito É CRIAR UM VETOR ONDE  
     //OS CONTAMINANTES QUE NAO ESTAO NA LISTA CONCATENADA FIQUEM TODOS COMO SILV	 
	 //este vetor tem o nome e o enquadramento concatenado exemplo Boreria alata*NOCT


////////////////cria o vetorcontaminantesconcatnado////////////////////////////////////
/*
function captura_registros_contaminantes($campoLimite,$codigoCultura)
{
       include "conecta_mysql.php";
       $sql="select con_nome_cientifico,". $campoLimite . " from contaminantes,limites where lim_cod_contaminante=con_id and lim_cod_cultura=". $codigoCultura." order by con_nome_cientifico";
       //echo("linha 387 $sql<br>");
 	   $_res = mysql_query($sql,$conexao);//linha de comando sql
	   $vetorgenerico['dados']="";//limpa o array
	   $soma=0;
	   
	   While($tbl=mysql_fetch_array($_res))
       {  
	
		  $enquadramentoTabela=$tbl[$campoLimite];
		  $letraInicial=substr($enquadramentoTabela,0,1);
          //echo("emquadramento= $enquadramentoTabela letra=$letraInicial<br>");
          if(substr($enquadramentoTabela,1,1)=="P")  $enquadramento="NOCP";	 //vem assim -P- 
          if(substr($enquadramentoTabela,1,1)=="S")  $enquadramento="SILV";	 //vem assim -S-
          //no caso de toleradas vai trazer o limite associado
          if(substr($enquadramentoTabela,0,1)=="T")
          {
    		  $limitex=substr($enquadramentoTabela,1);
     		  $enquadramento="NOCT*(L=".$limitex.")";	 //estava tentando colocar o limite do lado direito mas ai precisaria 
     		  //$enquadramento="NOCT";	 //vem T10 
		  }
          //no caso de Outra Especie Cultivada, vai trazer o limite associado
          if(substr($enquadramentoTabela,0,1)=="E")
          {
    		  $limitex=substr($enquadramentoTabela,1);
     		  $enquadramento="OESP*(L=".$limitex.")";	 //estava tentando colocar o limite do lado direito mas ai precisaria 
     		  //$enquadramento="NOCT";	 //vem T10 
		  }

          if(substr($enquadramentoTabela,0,1)=="Q")  $enquadramento="QUAR";//NAO USAR PQUA POIS PROIBIDA COMECA COM P TAMBEM	  
          //if(substr($enquadramentoTabela,0,1)=="E")  $enquadramento="OESP";	// vem E12   
		  $vetorgenerico[]=$tbl["con_nome_cientifico"]."*". $enquadramento;//joga dentro do ARRAY os elementos da tabela
	   }//fecha o while
*/
	 	 //ENTRA DE QUAKQUER MANEIRA
 	 	$generica=new tabelagenerica();
		$generica->tabela=" contaminantes,limites";
		$generica->campos_valores = array(
				"con_nome_cientifico" => NULL,
				 $campoLimite => NULL,
				 "con_id" => NULL,
			);
		$generica->extras_select =" where lim_cod_contaminante=con_id and lim_cod_cultura=". $codigoCultura." order by con_nome_cientifico";
		//echo("tttttttttttttttttextra select=$generica->extras_select<br>");
	    $generica->selecionaCampos($generica);
		$contador=1;
        $vetorContaminantesConcatenado[0]='LISTA GERAL DE CONTAMINANTES';		
		while ($resgenerica = $generica->retornaDados()):
		  $enquadramentoTabela=$resgenerica->$campoLimite;
		  $codigo=$resgenerica->con_id;
		  $letraInicial=substr($enquadramentoTabela,0,1);
		  
         // echo("xxxxxxxxxxenquadramento= $enquadramentoTabela letra=$letraInicial<br>");
          if($letraInicial=="P")  $enquadramento="NOCP";	 //vem assim -P- 
          if($letraInicial=="S")  $enquadramento="SILV";	 //vem assim -S-
          //no caso de toleradas vai trazer o limite associado
          if($letraInicial=="T")
          {
    		  $limitex=substr($enquadramentoTabela,1);
     		  $enquadramento="NOCT*(L=".$limitex.")";	 //estava tentando colocar o limite do lado direito mas ai precisaria 
     		  //$enquadramento="NOCT";	 //vem T10 
		  }
          //no caso de Outra Especie Cultivada, vai trazer o limite associado
          if($letraInicial=="E")
          {
    		  $limitex=substr($enquadramentoTabela,1);
     		  $enquadramento="OESP*(L=".$limitex.")";	 //estava tentando colocar o limite do lado direito mas ai precisaria 
     		  //$enquadramento="NOCT";	 //vem T10 
		  }

          if($letraInicial=="Q")  $enquadramento="QUAR";//NAO USAR PQUA POIS PROIBIDA COMECA COM P TAMBEM	  
          //if(substr($enquadramentoTabela,0,1)=="E")  $enquadramento="OESP";	// vem E12   
		  $vetorContaminantesConcatenado[$contador]=$resgenerica->con_nome_cientifico."*". $enquadramento;//joga dentro do ARRAY os elementos da tabela
		  $contador++;
	    endwhile;
		//echo("cccccccccccccccccccccccccccccccontador = $contador<br>");
		
///////////////fim d cia vetor contaminado////////////////////////////////////////
	 //$vetorContaminantesConcatenado= captura_registros_contaminantes($campoLimite,$codigoCultura);
	 $vetorTransito= $vetorContaminantesConcatenado;


  	    //echo("eeeeeeeeeeeeeeeeespecie= $especie<br>"); 

	 
	 /*
     $sql="select con_nome_cientifico from contaminantes order by con_nome_cientifico";
     $vetorNomesContaminantes=$objetocalculo-> captura_registros_contaminantes($campoLimite,$codigoCulturaPescado);
	 //pega a lista geral de  contaminantes
     $conta=count($vetorContaminantesConcatenado);//conta o numero de registros inicial
     for($i=0;$i<count($vetorNomesContaminantes);$i++)
     {
         $teste="nao achou";
     	 $contaminante=$vetorNomesContaminantes[$i]; 
		 //faz a varredura em toda lista de contaminantes concatenados para ver se ja tem o contaminante da lista geral
         for($j=0;$j<count($vetorTransito);$j++) //este vetor transito tem sempre o mesmo tamanho e impede de entrr em loop
		 {
         	 $contaminanteConcatenado=$vetorTransito[$j]; 
		  	 $tama=strlen($contaminanteConcatenado)-5;
		     $nomeCientifico1=substr($contaminanteConcatenado,0,$tama);	
		     if($nomeCientifico1==$contaminante) $teste="achou";
		 }
         if($teste=="nao achou")
		 {
		     $conta++;//incrementa um novo item no array final mas o vwetor transito fica intacto
		     //echo("dentro do nao achou vai incrementar nome do contami=$nomeCientifico1<br>");
		     $vetorContaminantesConcatenado[$conta]=$contaminante."*SILV";		 
		 }
     }

	 
	 
	 */
	 //$amostraLong=10;
	 $vetorSILV=array();
	 $vetorNOCT=array();
	 $vetorOESP=array();
	 $vetorNOCP=array();
	 $vetorFRAC=array();
	 //echo("passou por aqui <br>");
     $vetorOESP=$objetocalculo-> captura_registros_invasoras("1OES",$amostraLong);
     $vetorSILV= $objetocalculo->captura_registros_invasoras("2SIL",$amostraLong);
     $vetorNOCT=$objetocalculo-> captura_registros_invasoras("3NOT",$amostraLong);
     $vetorNOCP=$objetocalculo-> captura_registros_invasoras("4NOP",$amostraLong);
     //$vetorFRAC=$objetocalculo-> captura_registros_invasoras("5FRA",$amostraLong);
   	 foreach($vetorSILV aS $vlr)  { $quantosSILV=$vlr; }
   	 foreach($vetorNOCT aS $vlr)  { $quantosNOCT=$vlr; }
   	 foreach($vetorOESP aS $vlr)  { $quantosOESP=$vlr; }
   	 foreach($vetorNOCP aS $vlr)  { $quantosNOCP=$vlr; }
	
	//MONTA O VETOR RESUMO DE NOCIVAS
	//ENTRA DE QUAKQUER MANEIRA
	$generica=new tabelagenerica();
	$generica->tabela="invasoras,contaminantes";
	$generica->campos_valores = array(
	"inv_qtd" => NULL,
	"con_nome_cientifico" => NULL,
	"inv_codigo" => NULL,
	);
	$generica->extras_select =" where (inv_codigo='3NOT' || inv_codigo='4NOP') AND inv_cod_praga=con_id &&  inv_amostra=".$amostraLong." order by con_nome_cientifico,inv_codigo" ;
	$generica->selecionaCampos($generica);
	$contador=0;
    $codigoAnterior="@";
    $nomeAnterior="@";
	//percorrer todas nocivas 
	while ($resgenerica = $generica->retornaDados()):
	  $contador++;
	  $quantidadeTotalContaminante=$resgenerica->inv_qtd;
      $codigo=$resgenerica->inv_codigo;
      $contaminanteNociva=$resgenerica->con_nome_cientifico;
      //roda o vetrorzinho da fracao pureza  
	  $complemento=$quantidadeTotalContaminante; 
	  $quantidadeFRAC=0;
	  for($conta=0;$conta<=5;$conta++):
		   $contaminanteFrac= $vetorRXFRAC[$conta][0];
		   //pergunta se o contaminante principal é igual ao contaminante encontrado na fracao
		   if($contaminanteFrac==$contaminanteNociva):
		     $quantidadeFRAC=$vetorRXFRAC[$conta][1];
			 $complemento=$quantidadeTotalContaminante-$quantidadeFRAC;
		   endif;
	  endfor;	

	  $vetorFRAC[$contador]=$contaminanteNociva."(".$quantidadeFRAC.")+(".$complemento.")";
  

	endwhile;

	 
	 
   	 //foreach($vetorFRAC aS $vlr)  { $quantosFRAC=$vlr; }
	 

	 
	 
	 
//echo("o dia que for testar a interface, ativar esta parte de padrao nacional<br>");
//$vetorRepInvasoras= $objetocalculo->padrao2012_invasoras($amostraLong);
 $bgcolor1="cyan";
 $bgcolor2="silver";
 $bgcolor3="cyan";
 $bgcolor4="silver";
 $bgcolor5="cyan";
 if($vetorRepInvasoras[0]=="OES") $bgcolor1="red";
 if($vetorRepInvasoras[1]=="SIL") $bgcolor2="red";
 if($vetorRepInvasoras[2]=="NTO") $bgcolor3="red";
 if($vetorRepInvasoras[3]=="NPR") $bgcolor4="red";
 if($vetorRepInvasoras[4]=="QUA") $bgcolor5="red";
 
 
//$imagemContaminante="ContaminantesIlustracoes/Rumex crispus.JPG";
//echo("????????????????????/nome do contaminante  $nomeCientifico<br>");
$imagemContaminante="ContaminantesIlustracoes/".$nomeCientifico.".JPG";
//echo("?????????caminho???????????/nome do contaminante  $imagemContaminante<br>");
if($finalizada=='s'):
  $desabilita='disabled';

endif;
 
 
 ?>
<form class="userform" method="POST" action="#">
<h2 align="center">SilasNet - Informar presença de contaminante na amostra.</h2>

<h5 align="center">[Amostra:<?php echo($vetorFicha[1]);?>] [ Lote: <?php echo($vetorFicha[0]);?>] [Espécie: <?php echo($vetorFicha[2])?>][Categoria: <?php echo($vetorFicha[3])?>][Grupo: <?php echo($vetorFicha[4])?>][ID: <?php echo $amostraLong; ?>]</h5>
<?php
if($vetorFicha[4]=='GRUPO INDEFINIDO'):
  printMSG('Não deixe a especie cultivada no grupo INDEFINIDO, pois isso impede aparecer os contaminantes do grupo. Vai EM CADASTRIS-->ESPECIE(HABILITAR E PADROES) e faça o enquadramento correto em grandes culturas, forrageiras etc, e depois repare se tem realmente contaminantes cadastrados neste grupo.' ,'alerta');	
endif;
?>
<fieldset>
<table width="98%" border="1" cellspacing="1" cellpadding="1">

  <tr>
    <td bgcolor="<?php echo($bgcolor3)?>">OUTRAS ESPÉCIES</td>
    <td bgcolor="<?php echo($bgcolor3)?>">SILVESTRES</td>
    <td bgcolor="<?php echo($bgcolor3)?>">TOLERADAS(Na pureza+Compl.)</td>
    <td bgcolor="<?php echo($bgcolor3)?>">PROIBIDAS(Na pureza+Compl.)</td>
    <td bgcolor="<?php echo($bgcolor3)?>">RESUMO NOCIVAS</td>
  </tr>
  
  <tr>
    <td><select name="contaminante1"  onchange="ClikButton(11)">  
    <?php
	 foreach($vetorOESP aS $vlr)
     {
	  ?>
	  <option><?php echo($vlr)?></option>
	  <?php
     }
	 ?>
	</td>
	
    <td><select name="contaminante2"  onchange="ClikButton(11)">  
    <?php
	 foreach($vetorSILV aS $vlr)
     {
	  ?>
	  <option><?php echo($vlr)?></option>
	  <?php
     }
	 ?>
	</td>

    <td><select name="contaminante3"  onchange="ClikButton(11)">  
    <?php
	 foreach($vetorNOCT aS $vlr)
     {
	  ?>
	  <option><?php echo($vlr)?></option>
	  <?php
     }
	 ?>
	</td>
	
    <td><select name="contaminante4"  onchange="ClikButton(11)">  
    <?php
	 foreach($vetorNOCP aS $vlr)
     {
	  ?>
	  <option><?php echo($vlr)?></option>
	  <?php
     }
	 ?>
	</td>

    <td bgcolor="#ff7575"><select name="contaminante5"  onchange="ClikButton(11)">  
    <?php
	 foreach($vetorFRAC aS $vlr)
     {
	  ?>
	  <option "><?php echo($vlr)?></option>
	  <?php
     }
	 ?>
	</td>



  </tr>
<tr><td>
</table>



<h3 align="center">
<hr>
<table width="1000"   bgcolor="#06f49b">
<!--primeira linha-->
<tr>
<td align="left">
Contaminante sendo informado--></td>
<td>
<select name="contaminante"  onchange="ClikButton(11)">  
<?php
foreach($vetorContaminantesConcatenado aS $vlr)
{
  ?>
  <option><?php echo($vlr)?></option>
  <?php
}
?>
</select>
</td>
<td>{----Use esta seta para abrir a lista de contaminantes</td>

</tr>
</table>

<hr>

<!--segunda linhas-->


<!--grade ano 2023-->
<table  bgcolor="<?php echo($bgcolor3)?>">

<!--Primeira linha-->
<tr>
<td>.</td>
<td>Quantidade</td>
<td>encontrada</td>
<td>.</td>
</tr>

<!--Segunda linha-->
<tr>
<td>Aqui vais lançar o que encontrou na fração:</td>
<td>Pureza</td>
<td>Complemento</td>
<td>.</td>
</tr>

<!--Terceira linha-->
<td>Digite aqui o que foi encontrado---></td>  
<td> <input type="text" name="quantidadePureza2023" value="<?php echo $quantidadePurezaGravar;?>"  size="1" /></td>
<td> <input type="text" name="quantidadeComplemento2023" value="<?php echo $quantidadeComplementoDigitada;?>"  size="1" /></td>
<td> <input type="submit"name="bt_gravar2023" <?php echo $desabilita; ?>  value="Salvar."  /></td>
</tr>
</table>
<tr>
<td>Digite o que tiver encontrado em cada fração. Se quiser remover o contaminante, informe ambas frações=0.</td>
</tr>
<hr>
<table>
 <tr>
	<td>
	<label3>Amostra:</label3>
	<input type="text"    style="font-size:200%"  style="font-family:Arial"  style="height: 20px"  size="3"  maxlength="5" name="amostra" value="<?php echo $vetorFicha[1]; ?>" />
	<input type="submit" name="acharDigitada" value="<--Achar" />
	<!--<input type="submit"name="casosEspeciais"  value="Casos especiais"  />-->
	<input type="submit"name="manual"  value="Ajuda"  /></td>
	<td bgcolor="silver">
<?php
if($finalizada=="s"):
?>
	<input type="submit" name="reabre" value="Reabre" />
<?php	
else:
?>
	<input type="submit" name="fechar" value="Fechar" />Sim
	<input type="checkbox"   name="cb_fechar" />
<?php	
endif;
?>  			
<input type="submit" name="bt_eliminar" <?php echo $desabilita; ?> value="Eliminar todos contaminantes já informados nesta amostra" />Sim
<input type="checkbox"   name="cb_eliminar" />
<input type="hidden" name="finalizada" value="<?php echo($finalizada)?>" size=1 />
</td>

</td>

	
	
 </td>
 </tr>
</table> 

</fieldset>

<hr>

 <fieldset>
Orientação importante:<br>
Este box inferior, salva de forma independente,com comando próprio para isso. <br>
O operador a ser salvo, é aquele que foi logado.<br>

 
<table width="1000">
<tr>
<td>
(a)Peso Pureza:
<input type="text" name="pesoPureza" size="8" value=" <?php echo $vetorRaioX[21];?>"  size="3" />
</td>
<td  align="left">
(b)Complemento
 <input type="text" name="pesoComplemento" size="8" value=" <?php echo $pesoComplemento;?>"  size="3" />
</td>
<td align="left">
(c)Peso Nocivas
<input type="text" name="pesoNocivas" size="8" value=" <?php echo $pesoNocivas;?>"  size="3" />g
</td>

</tr>
<!--segunda linha-->
<tr>
<td>
(a)Peso SILV/OESP:
<input type="text" name="pesoSilvestres" size="6" maxlength="10"  value=" <?php echo $pesoSilvestres;?>"  size="3" />
</td>
<td>
Analista:
<input type="text" name="operadorSalvado"  value=" <?php echo $operadorSalvado;?>"  size="9" />
</td>

<td>
Data pureza:
<input type="text" name="dataPureza" maxlength="10"  value=" <?php echo $dataPureza;?>"  size="7" />
</td>

</tr>
<tr>
<td>Data Complemento
<input type="text" name="dataComplemento" maxlength="10"   value=" <?php echo $dataComplemento;?>"  size="10" />
</td>
<td>Balança Complemento:
<input type="text" name="balancaComplemento"  maxlength="10"  value=" <?php echo $balancaComplemento;?>"  size="7" />
</td>




<td>
<input type="submit" name="bt_salvar_peso_nocivas" maxlength="10" <?php echo $desabilita; ?>  value="SALVAR pesos, operador e data" /> 
</td>
</tr>
</table>

<table>
<tr>
<td>
O silas faz soma do peso da pureza mais o peso do complemento. Preenche-os com a devida atenção.
</td>
</tr>
</table>



</fieldset>
 <input type="button" onclick="location.href='?m=amplo2023&t=registroAmostra'" value="Versão 2023" />
 
 
 </form>  

</td></tr>
</h3>


<?php

 
    break;





	default:
		  echo '<p>A tela solicitada não existe.</p>';
		break;
endswitch;
?>