<?php 
require_once(dirname(dirname(__FILE__))."/funcoes.php");
protegeArquivo(basename(__FILE__);
loadJS('jquery-validate');
loadJS('jquery-validate-messages');


$objetocalculo=new calculos();
$sessao = new sessao();
$senhaCli=$sessao->getVar('iduser');
$idLabo=$sessao->getVar('idLabo');
$cliente=strtoupper($sessao->getVar('cliente' ?? "");

$legendaBotaoFicha="Ficha";
$legendaBotaoOutra="Outra";
if($cliente=="SEMPRE"):
    $legendaBotaoOutra="TRR";
	$legendaBotaoFicha="Vago";
endif;	
if($cliente=="DIMICRON CUIABA"):
    $legendaBotaoOutra="Branca";
	$legendaBotaoFicha="Vago";
endif;	
//$numeroOrdemFicha=1;
if(substr(strtoupper($cliente ?? ""),0,8)=='DIMICRON')$cliente="DIMICRON";//este casuismo é necessario pois a ricetec é RiceTec......


$finalidade=$sessao->getVar('finalidade');
$nomeOperador=$sessao->getVar('nomeuser');
$anoCorrente=$sessao->getVar('anocorrente');
$legendaRequerente=$sessao->getVar('controle2');
$anoAmostra=$anoCorrente;
$legendaGeral="Registro de amostra(Incluir,alterar,excluir,localizar) ".$legendaRequerente ;
//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 

$nivel=$sessao->getVar('nivel');
$codprodutor=$sessao->getVar('codprodutor');

//echo("41cod produtor sessao=$codprodutor<br>");
$clausulaProdutorFixo="";
$desabilitadoParaProdutor="";
if($nivel=='PRODUTOR'):
    $desabilitadoParaProdutor='disabled';
    $sqlProdutor="select prd_apelido,prd_id from remetente where prd_id=".$codprodutor;
    //ENTRA DE QUAKQUER MANEIRA
    $generica=new tabelagenerica();
    $generica->extras_select =$sqlProdutor;
	$generica->selecionaCamposEspecial($generica);
    while ($resgenerica= $generica->retornaDados()):
		$apelido=$resgenerica->prd_apelido;
		$idProdutorLogado=$resgenerica->prd_id;
        $clausulaProdutorFixo=" and prd_id=".$idProdutorLogado ;

        //echo("idProdutorlogado=$idProdutorLogado<br>"); 
    endwhile; 
endif;

$amostraLong=$sessao->getVar('amostraLong');
//echo("linha 64 modulo amostra_long  Operador: $nomeOperador idlabo=$idLabo tela=$tela finalidade=$finalidade  Ano amostra=$anoAmostra amostralong=$amostraLong<br>");
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;	
	//echo('passando na 38<br>');	
	$sessao->setVar('amostraLong', $amostraLong);
	$sessao->setVar('inicio', $ultima);
	$sessao->setVar('final', $ultima);
	//$sessao->setVar('idCultivar',$idCultivar);
	//$sessao->setVar('idProdutor',$idProdutor);
	//$sessao->setVar('idAmostrador',$idAmostrador);
	$sessao->setVar('ultima',$ultima);
	//$sessao->setVar('final',$ultima);//precisa isso pois ao voltar da gestao de fichas o intervalo fica memorizado na sessao
}
else
{
    //ELE ENTRA AQUI QUANDO ESTA ENTRANDO PELA PRIMEIRA VEZ NO PROGRAMA 
     $amostraLong=$objetocalculo->achaUltima();
	 $sessao->setVar('amostraLong', $amostraLong);
	 if($amostraLong<1):
	   printMSG('Inicio de um ano novo. Precisa ser criada uma amostra. Repare no canto direito inferior está aparecendo um botão ANO NOVO. Clique nele agora.');   
	 endif;
	 //echo("91 Comando dirigindo para ACHA ULTIMA-->amostralong=".$amostraLong);
	 //$idCultivar=$sessao->getVar($idCultivar);
	 //$idProdutor=$sessao->getVar($idProdutor);
	 //$idAmostrador=$sessao->getVar($idAmostrador);
	 //$amostraLong=73532;
	 //$amostraLong=73532;
     //$sessao->setVar('amostraLong', $amostraLong);
}





//$amostraLong=139168;
$sessao->setVar('amostraLong', $amostraLong);


switch ($tela):

    case 'nova':
      echo"esta no nova";
	  $tela='editar';
    break;

    case 'capturarBarra':
	   $captura=post('cod_barra2');
	   $identificador="P";
       $varx=$sessao->getVar('amostraLong');	   
	   $sessao->setVar('finalidade','PREVIA');
	   $sessao->setVar('amostraLong',39277);
	   //$finalidade=$sessao->setVar('finalidade','PREVIA');
	   echo("79ccccccccccaptura=$captura    varx=$varx<br>");
	
	break;


  case 'fazVinculacaoRealx':
	    //aqui vai pegar o id do campo PARA MOSTRAR NA TABELA EMBAIXO
	    if (get('campo_id') !== ""):
	        $campoLong = get('campo_id');
			//vai capturar o nomo do campo/////////////////////////////////
		    $userbd = new camposproducao();
            $userbd->extras_select = "WHERE cpr_id=" . $campoLong;
            $userbd->selecionaTudo($userbd);
			$nomeCampo="Nome campo provisório";
            while($resbdListagem = $userbd->retornaDados()):
			    $nomeCampo=$resbdListagem->cpr_nome_do_campo;
                $cultivarCampo= $resbdListagem->cpr_cultivar;
                $safraCampo= $resbdListagem->cpr_safra;
                $categoriaCampo= $resbdListagem->cpr_categoria;
	        endwhile;
	        ////////////////////////////////////////////////////////////		
	        $sessao = new sessao();
			$loteFicha=$sessao->getVar('controle3');
			$safraFichaOto=$sessao->getVar('controle10');
			$cultivarFicha=$sessao->getVar('controle8');
			$cultivarFichaID=$sessao->getVar('controle9');
			$categoriaFicha=$sessao->getVar('controle7');
            

            echo("152 safraCampo=$safraCampo safraFicha=$safrafichaOto cultivarFichaID=$cultivarFichaID cultivarFicha=$cultivarFicha  cultivarCampo =$cultivarCampo loteFicha=$loteFicha<br>");
            $concatenadoMotivos=""; 
            if($cultivarFichaID!=$cultivarCampo):
              $concatenadoMotivos='Cultivar'; 
			endif;

            if($safraFicha!=$safraCampo):
              $concatenadoMotivos=$concatenadoMotivos.' Safra'; 
			endif;

            if($categoriaFicha!=$categoriaCampo):
              $concatenadoMotivos=$concatenadoMotivos.' Categoria'; 
			endif;

          if(strlen($concatenadoMotivos)==""):  
			$sql="update ficha set fic_campo='$campoLong', fic_campo_string='$nomeCampo' where fic_id=".$amostraLong;
	        echo("fazVinculacaoReal   xxxxxcampoLong=$campoLong amostraLong=$amostraLong  nomeCampo =$nomeCampo sql=$sql <br>");


			$generica=new tabelagenerica();
            $generica->grava_registro_com_retorno($sql);
            printMSG('Vinculou lote [' .$loteFicha. '] ao campo	['.$nomeCampo."].  Clique em registro de amostra para conferir esta vinculação.");

         else:
           printMSG('Não houve gravação pois ' . $concatenadoMotivos.' não concide. ','alerta');

         endif;
	    endif;		
  break;//fazVinculacaoReal
  
  
  
    case 'listarRemetentes':
	    salvarDados2016($idLabo,$finalidade,$nomeOperador,$amostraLong);  

        echo '<h2>Requerentes cadastrados</h2>';
        loadCSS('data-table',NULL,TRUE);
        loadJS('jquery-datatable'); 
		$sessao->setVar('controle',1);       
        ?>
        <script type="text/javascript">
            $(document).ready(function(){
               $("#listausers").dataTable({
                "oLanguage": {
                    "sZeroRecords": "Nenhum dado econtrado para exibição",
                    "sInfo": "Mostrando _START_ a _END_ de _TOTAL_ de registros",
                    "sInfoEmpty": "Nenhum registro para ser exibido",
                    "sInfoFiltered": "(filtrado de _MAX_ registros no total)",
                    "sSearch": "Pesquisar",
                },
                "sScrollY": "400px",
                "bPaginate": false,
                "aaSorting": [[0, "asc"]] 
               }); 
            });
        </script>
        <table cellspacing="0" cellpadding="0" border="0" class="display" id="listausers">
            <thead>
                <tr>
                    <th>Nome</th><th>Ações</th><th>Endereco</th><th>Município</th><th>Cadastro</th>
                </tr>
            </thead>
            <tbody>
                <?php 
                $user = new remetentes();
				$user->extras_select = "WHERE prd_id_lab=".$idLabo;

                $user->selecionaTudo($user);
                while ($res = $user->retornaDados()):
                    echo '<tr>';
                    printf('<td>%s</td>',$res->prd_nome);
					printf('<td class="center">
					</a> <a href="?m=amostras_2&t=editar&prd_idUnico=%s" title="Selecionar"><img src="images/edit.png" alt="Selecionar" /></a>
					</td>',$res->prd_id);
                    printf('<td>%s</td>',$res->prd_endereco);
                    printf('<td>%s</td>',$res->prd_municipio);
                    printf('<td class="center">%s</td>',date("d/m/Y",strtotime($res->prd_datacad));
					
                   
                    echo '</tr>';
                endwhile;                
                ?>
            </tbody>
        </table>
        
        <?php        
    break;


///LISTAR CULTIVARES NO MODELO QUE PODE PESQUISAR/////////////////
    case 'listarCultivares':
	    salvarDados2016($idLabo,$finalidade,$nomeOperador,$amostraLong);  
        echo '<h2>Cultivares cadastradas</h2>';
        loadCSS('data-table',NULL,TRUE);
        loadJS('jquery-datatable'); 
		$sessao->setVar('controle',1);       
        ?>
        <script type="text/javascript">
            $(document).ready(function(){
               $("#listausers").dataTable({
                "oLanguage": {
                    "sZeroRecords": "Nenhum dado econtrado para exibição",
                    "sInfo": "Mostrando _START_ a _END_ de _TOTAL_ de registros",
                    "sInfoEmpty": "Nenhum registro para ser exibido",
                    "sInfoFiltered": "(filtrado de _MAX_ registros no total)",
                    "sSearch": "Pesquisar",
                },
                "sScrollY": "400px",
                "bPaginate": false,
                "aaSorting": [[0, "asc"]] 
               }); 
            });
        </script>
        <table cellspacing="0" cellpadding="0" border="0" class="display" id="listausers">
            <thead>
                <tr>
                    <th>Nome da cultivarxy</th><th>Ações</th><th>Espécie </th><th>Nome cientifico</th>
                </tr>
            </thead>
            <tbody>
                <?php 
///////////////////////////////////
            $user = new cultivaresespecies();
			//$user->extras_select = "where ctv_especie =   esp_id && hac_id_labo=".$idLabo." && hac_id_cultivar=ctv_id  order by esp_nome,ctv_nome  ";
			$user->extras_select = "where ctv_especie =   esp_id  order by esp_nome,ctv_nome  ";
            $user->selecionaTudo($user);
			  $contador=0;  
            while ($res = $user->retornaDados()):
                echo '<tr>';
                printf('<td>%s</td>',$res->ctv_nome);
				printf('<td class="center">
				</a> <a href="?m=amostras_2&t=editar&ctv_idUnico=%s" title="Selecionar"><img src="images/edit.png" alt="Selecionar" /></a>
				</td>',$res->ctv_id);
                printf('<td>%s</td>',$res->esp_nome);
                printf('<td>%s</td>',$res->esp_nome_cientifico);
                echo '</tr>';
            endwhile;                
///////////////////////////////////
            ?>
            </tbody>
        </table>
        <?php        
    break;

	
	//lista de amostras	
    case 'buscar':
    //echo '<h2>Achar uma amostra</h2>';
    $idLabo=$sessao->getVar('idLabo');
    $amostraLong=$sessao->getVar('amostraLong');
     //echo("amostraLongaaxxxaaaaaaaaa  $amostraLong<br>") ; 
//////////////////
        loadCSS('data-table',NULL,TRUE);
        loadJS('jquery-datatable');        
        ?>
        <script type="text/javascript">
            $(document).ready(function(){
               $("#listausers").dataTable({
                "oLanguage": {
                    "sZeroRecords": "Nenhum dado econtrado para exibição",
                    "sInfo": "Mostrando _START_ a _END_ de _TOTAL_ de registros",
                    "sInfoEmpty": "Nenhum registro para ser exibido",
                    "sInfoFiltered": "(filtrado de _MAX_ registros no total)",
                    "sSearch": "Pesquisar",
                },
                "sScrollY": "400px",
                "bPaginate": false,
                "aaSorting": [[0, "asc"]] 
               }); 
            });
        </script>
		
		
		
		
		

        <table cellspacing="0" cellpadding="0" border="0" class="display" id="listausers">
            <thead>
                <tr>
                    <th>Numero</th><th>Ações</th><th>Função</th><th>Categoria</th><th>Apelidoxxx</th><th>Cultivar</th><th>Entrada</th>
                </tr>
            </thead>
            <tbody>
            <?php 
     		//ENTRA DE QUAKQUER MANEIRA
			$generica=new tabelagenerica();
			$generica->tabela="ficha,remetente,cultivar";
			$generica->campos_valores = array(
					"fic_id" => NULL,
					"fic_funcao" => NULL,
					"fic_categoria" => NULL,
					"prd_apelido" => NULL,
					"fic_amostra" => NULL,
					"ctv_nome" => NULL,
					"fic_dt_entrada" => NULL,
				);
			if($finalidade=='DEFINITIVA'):
			     $generica->extras_select =" where prd_id=fic_produtor && fic_cultivar=ctv_id and fic_ano='".$anoCorrente."'  && fic_labo=" . $idLabo;
		    else:
			     $generica->extras_select =" where prd_id=fic_produtor && fic_cultivar=ctv_id and fic_ano='".$anoCorrente."'  && fic_labo=" . $idLabo;
			endif;		 
				 
				 
			$generica->selecionaCampos($generica);
			echo("xxxxxxxxxxxxxxxxxxxxxxxxxxxextraselect= $generica->extras_select <br>");
			while ($resgenerica= $generica->retornaDados()):
                    echo '<tr>';
                    printf('<td>%s</td>',$resgenerica->fic_amostra);
					printf('<td class="center">
					<a href="?m=amostras_2&t=editar&achar_id=%s" title="Selecionar"><img src="images/selection1.png" alt="Selecionar" />
					</a></td>',$resgenerica->fic_id);
                    printf('<td>%s</td>',$resgenerica->fic_funcao);
                    printf('<td>%s</td>',$resgenerica->fic_categoria);
                    printf('<td>%s</td>',$resgenerica->prd_apelido);
                    printf('<td>%s</td>',$resgenerica->ctv_nome);
                    printf('<td class="center">%s</td>',date("d/m/Y",strtotime($resgenerica->fic_dt_entrada));
                   
                    echo '</tr>';
                endwhile;                
                ?>
            </tbody>
        </table>
        
        <?php        
/////////
    break;



 

    case 'editar':
	    if (post('bt_anoNovo') !== ""):
           //echo('385 modumo editar cria amostra ano novoxxxxxxxxxxxxxxxxxxxxxxxxxxx<br>'); 		
		   $amostraLong=$objetocalculo->anoNovo();
	       $sessao->setVar('amostraLong', $amostraLong);
		   	$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;	
			//echo('passando na 38<br>');	
			$sessao->setVar('amostraLong', $amostraLong);
			$sessao->setVar('inicio', $ultima);
			$sessao->setVar('final', $ultima);
			//$sessao->setVar('idCultivar',$idCultivar);
			//$sessao->setVar('idProdutor',$idProdutor);
			//$sessao->setVar('idAmostrador',$idAmostrador);
			$sessao->setVar('ultima',$ultima);
		endif;//ano novo
	
        //pus aqui o conteudo da vinculacao
	    if (get('campo_id') !== ""):
		  $controladorGravacao=$sessao->getVar('controle11');
          if($controladorGravacao=="aberto"):
			$sessao->setVar('controle11','fechado'); // se esta aberto vai logo fechar
			//$sessao->getVar('controle11');
			//echo("419 controle11  $controle11 ENCHEU A LISTA <br>");				
	        $campoLong = get('campo_id');
			//vai capturar o nomo do campo/////////////////////////////////
		    $userbd = new camposproducao();
            $userbd->extras_select = "WHERE cpr_id=" . $campoLong;
            $userbd->selecionaTudo($userbd);
			$nomeCampo="Nome campo provisório";
			//echo("391  campoLong  $campoLong<br>");
            while($resbdListagem = $userbd->retornaDados()):
			    $nomeCampo=$resbdListagem->cpr_nome_do_campo;
                $cultivarCampo= $resbdListagem->cpr_cultivar;
                $safraCampo= $resbdListagem->cpr_safra;
                $categoriaCampo= $resbdListagem->cpr_categoria;
				//echo("396  safraCampo-$safraCampo<br>");
	        endwhile;
	        ////////////////////////////////////////////////////////////		
	        $sessao = new sessao();
			$loteFicha=$sessao->getVar('controle3');
			$safraFicha=$sessao->getVar('controle10');
			$categoriaFicha=$sessao->getVar('controle7');
			$cultivarFicha=$sessao->getVar('controle8');
			$cultivarFichaID=$sessao->getVar('controle9');
	
            //echo("433 safraCampo=$safraCampo safraFicha=$safraFicha categoriaCampo=$categoriaCampo  categoriaFicha=$categoriaFicha   cultivarFichaID=$cultivarFichaID cultivarFicha=$cultivarFicha  cultivarCampo =$cultivarCampo loteFicha=$loteFicha<br>");
            $concatenadoMotivos=""; 
            if($cultivarFichaID!=$cultivarCampo):
              $concatenadoMotivos='Cultivar'; 
			endif;

            if($safraFicha!=$safraCampo):
              $concatenadoMotivos=$concatenadoMotivos.' Safra'; 
			endif;
            if($categoriaCampo=="BÁSICA")$categoriaCampo="BASICA";
            if($categoriaFicha!=$categoriaCampo):
              $concatenadoMotivos=$concatenadoMotivos.' Categoria'; 
			endif;

          if(strlen($concatenadoMotivos)==""):  
			$sql="update ficha set fic_campo='$campoLong', fic_campo_string='$nomeCampo' where fic_id=".$amostraLong;
	        //echo("456 fazVinculacaoReal   xxxxxcampoLong=$campoLong amostraLong=$amostraLong  nomeCampo =$nomeCampo sql=$sql <br>");


			$generica=new tabelagenerica();
            $generica->grava_registro_com_retorno($sql);
            printMSG('Vinculou lote [' .$loteFicha. '] ao campo	['.$nomeCampo."].");

         else:
           printMSG('Não houve gravação pois ' . $concatenadoMotivos.' não concide. ','alerta');

         endif;

         endif;//fecha o teste para ver se esta fechado a sessao controle11, de modo nao gravar duas vezes
	    endif;//fecha o isset da captura doa id do campo		



           
        //fim do conteudo da vinculacao///////// 

        $userAmo = new amostras();
		$userAmo->extras_select = "WHERE fic_id=".$amostraLong;
        $userAmo->selecionaTudo($userAmo);
        $resAmo = $userAmo->retornaDados();
        $legendaFechada=$resAmo->fic_vigor;
		$CultivarAntiga=$resAmo->fic_cultivar;
		//echo("88888888888legeda fechada=$legendaFechada<br>");
		
		
		if (get('prd_idUnico') !== ""):
          $id_produtor=get('prd_idUnico');
		  //echo("passou 357   id_produtor=$id_produtor<br>");
          $sessao = new sessao();
          $associada=$sessao->getVar('associada');
		  $associada="REQUERENTE";
		  if($associada=="REQUERENTE"):
		       if($legendaFechada!="Fechada")salvarDados2016Associados($id_produtor,$associada,$amostraLong);
		       $sessao->setVar('associada','xxx');
               $associada="kkk";
          endif;//testa se associada =reQUERENTE  
	    endif;
		
        //SALVA A CULTIVAR SELECIONADA
		if (get('ctv_idUnico') !== ""):
          $id_cultivar=get('ctv_idUnico');
		  $cultivarNova=$id_cultivar;
          $sessao = new sessao();
          $associada=$sessao->getVar('associada');
		  $associada="CULTIVAR";
		  if($associada=="CULTIVAR"):
		       if($legendaFechada!="Fechada")salvarDados2016Associados($id_cultivar,$associada,$amostraLong);
		       $sessao->setVar('associada','xxx');
               $associada="kkk";
          endif;//testa se associada =reQUERENTE  
		  //AQUI VAI TRABALHAR QUANDO MUDA A CULTIVAR
		  //aqui vai trocara as temperatura,tratamento e substrato quando troca cultivar e especie
		  //echo("422   CultivarAntiga=$CultivarAntiga    cultivarNova=$cultivarNova<br>");
	      if($cultivarNova!=$CultivarAntiga):
	        //captura dados da especie
			$user = new cultivaresespecies();
	        $user->extras_select = "where ctv_especie=esp_id &&  ctv_id=". $cultivarNova;
	        $user->selecionaTudo($user);
	        while ($res = $user->retornaDados()):
	            $esp_id=$res->esp_id;
	            $esp_nome=$res->esp_nome;
	            $esp_temp=$res->esp_temp;
	            $esp_substrato=$res->esp_substrato;
	        endwhile;                

	     //ENTRA DE QUAKQUER MANEIRA
				$generica=new tabelagenerica();
				$generica->tabela="tratamentofrequente";
				$generica->campos_valores = array(
					   "tfg_tratamento" => NULL,
				);
				$generica->extras_select =" where tfg_labo=".$idLabo." and tfg_cultura=".$esp_id;
				$generica->selecionaCampos($generica);
	            $variosDocs='';
				$temRegistro="nao";
				while ($resgenerica= $generica->retornaDados()):
	               $tratamento=$resgenerica->tfg_tratamento;
				   $temRegistro='sim';
	            endwhile;      
	            //echo("452  tratamento=$tratamento substrato=$esp_substrato temperatura=$esp_temp<br>");   
	            //grava na rean os itens especificos ajustando  a tabela REAN./////////////
		       //GRAVA AS LEITURAS DiRETO NA REAN dete germ
			   $sql="update rean1 set rea_campo20a='$esp_temp',rea_campo60a='$tratamento',rea_campo60b='$esp_substrato' where  rea_teste='GERM' and  rea_ficha=".$amostraLong;
	           $generica=new tabelagenerica();
			   $generica->grava_registro_com_retorno($sql); 
			   echo("463  salvou = $sql<br>");
			   //////////////////////////////
	      endif;//AQUI PERGUNTA SE A CULTIVAR É IGUAL A ANTERIROR		
	    endif;//fim do get ctv_unico
	


        //SALVA O AMOSTRADOR SELECIONADO
		if (get('amo_idUnico') !== ""):
          $id_amostrador=get('amo_idUnico');
          $sessao = new sessao();
          $associada=$sessao->getVar('associada');
		  $associada="AMOSTRADOR";
		  if($associada=="AMOSTRADOR"):
		       if($legendaFechada!="Fechada")salvarDados2016Associados($id_amostrador,$associada,$amostraLong);
		       $sessao->setVar('associada','xxx');
               $associada="kkk";
          endif;//testa se associada =reQUERENTE  
	    endif;



	    
	

	    $captura=post('cod_barra2');
		//echo("linha330 codbarrad2 $captura<br>");
	
		if(post('bt_listaRemetente') !== ""):
		    //funcao que salva todos dados do corpo da tela
	        if($legendaFechada!="Fechada")salvarDados2016($idLabo,$finalidade,$nomeOperador,$amostraLong);  
			$sessao = new sessao();
			//$sessao->setVar('associada','xxx');
			$sessao->setVar('controle',1);       
			$sessao->setVar('associada','REQUERENTE');  
			$associada=$sessao->getVar('associada');
			//echo("dentro do bt_listaremetentesalvou sessao associada = $associada idLabo==$idLabo  finalidade=$finalidade nomeOperador=$nomeOperador<br>");


 
	        echo '<h2>Requerentes cadastrados</h2>';
        loadCSS('data-table',NULL,TRUE);
        loadJS('jquery-datatable'); 
		$sessao->setVar('controle',1);       
        ?>
        <script type="text/javascript">
            $(document).ready(function(){
               $("#listausers").dataTable({
                "oLanguage": {
                    "sZeroRecords": "Nenhum dado econtrado para exibição",
                    "sInfo": "Mostrando _START_ a _END_ de _TOTAL_ de registros",
                    "sInfoEmpty": "Nenhum registro para ser exibido",
                    "sInfoFiltered": "(filtrado de _MAX_ registros no total)",
                    "sSearch": "Pesquisar",
                },
                "sScrollY": "200px",
                "bPaginate": false,
                "aaSorting": [[0, "asc"]] 
               }); 
            });
        </script>
        <table cellspacing="0" cellpadding="0" border="0" class="display" id="listausers">
            <thead>
                <tr>
                    <th>Nome(2023)</th><th>Ações</th><th>Endereco</th><th>Município</th><th>Cadastro</th>
                </tr>
            </thead>
            <tbody>
                <?php 
                $user = new remetentes();
				$user->extras_select = "WHERE prd_id_lab=".$idLabo;

                $user->selecionaTudo($user);
                while ($res = $user->retornaDados()):
                    echo '<tr>';
                    printf('<td>%s</td>',$res->prd_nome);
					printf('<td class="center">
					</a> <a href="?m=amostras_2&t=editar&prd_idUnico=%s" title="Selecionar"><img src="images/edit.png" alt="Selecionar" /></a>
					</td>',$res->prd_id);
                    printf('<td>%s</td>',$res->prd_endereco);
                    printf('<td>%s</td>',$res->prd_municipio);
                    printf('<td class="center">%s</td>',date("d/m/Y",strtotime($res->prd_datacad));
					
                   
                    echo '</tr>';
                endwhile;                
                ?>
            </tbody>
        </table>
    <?php
    endif;//testa o isset bt_listaremetente
	
	
    ///////////AGORA VEM CULTIVAR////////////////////////////////////////////
	if(post('bt_listaCultivar') !== ""):
	    //funcao que salva todos dados do corpo da tela
		
        salvarDados2016($idLabo,$finalidade,$nomeOperador,$amostraLong);  
		$sessao = new sessao();
		$sessao->setVar('controle',1);       
		$sessao->setVar('associada','CULTIVAR');  
		$associada=$sessao->getVar('associada');
		//echo("dentro do bt_listaremetentesalvou sessao associada = $associada idLabo==$idLabo  finalidade=$finalidade nomeOperador=$nomeOperador<br>");



        echo '<h2>Cultivares cadastradas</h2>';
        loadCSS('data-table',NULL,TRUE);
        loadJS('jquery-datatable'); 
		$sessao->setVar('controle',1);       
        ?>
        <script type="text/javascript">
            $(document).ready(function(){
               $("#listausers").dataTable({
                "oLanguage": {
                    "sZeroRecords": "Nenhum dado econtrado para exibição",
                    "sInfo": "Mostrando _START_ a _END_ de _TOTAL_ de registros",
                    "sInfoEmpty": "Nenhum registro para ser exibido",
                    "sInfoFiltered": "(filtrado de _MAX_ registros no total)",
                    "sSearch": "Pesquisar",
                },
                "sScrollY": "200px",
                "bPaginate": false,
                "aaSorting": [[0, "asc"]] 
               }); 
            });
        </script>
        <table cellspacing="0" cellpadding="0" border="0" class="display" id="listausers">
            <thead>
                <tr>
                    <th>Nome da cultivar643</th><th>Ref.:</th><th>Especie</th><th>Nome cientifico</th>
                </tr>
            </thead>
            <tbody>
                <?php 
				$user = new cultivaresespecies();
                $user->extras_select = "where ctv_especie=esp_id && hac_id_labo=".$idLabo." && hac_id_cultivar=ctv_id  order by esp_nome,ctv_nome  ";
                //$user->extras_select = "where ctv_especie=esp_id  order by esp_nome,ctv_nome  ";

                $user->selecionaTudo($user);
                while ($res = $user->retornaDados()):
                    echo '<tr>';
                    printf('<td>%s',$res->ctv_nome);
					printf('
					</a> <a href="?m=amostras_2&t=editar&ctv_idUnico=%s" title="Selecionar"><img src="images/edit.png" alt="Selecionar" /></a>
					</td>',$res->ctv_id);
                    printf('<td>%s</td>',$res->ctv_id);
                    printf('<td>%s</td>',$res->esp_nome);
                    printf('<td>%s</td>',$res->esp_nome_cientifico);
                    echo '</tr>';
                endwhile;                
                ?>
            </tbody>
        </table>
    <?php
    endif;//testa o isset bt_cultivar

    ///////////AGORA VEM AMOSTRADOR////////////////////////////////////////////
	if(post('bt_listaAmostrador') !== ""):
	    //funcao que salva todos dados do corpo da tela
        salvarDados2016($idLabo,$finalidade,$nomeOperador,$amostraLong);  
		$sessao = new sessao();
		$sessao->setVar('controle',1);       
		$sessao->setVar('associada','AMOSTRADOR');  
		$associada=$sessao->getVar('associada');
		//echo("dentro do bt_listaremetentesalvou sessao associada = $associada idLabo==$idLabo  finalidade=$finalidade nomeOperador=$nomeOperador<br>");
        echo '<h2>Amostradores cadastrados</h2>';
        loadCSS('data-table',NULL,TRUE);
        loadJS('jquery-datatable'); 
		$sessao->setVar('controle',1);       
        ?>
        <script type="text/javascript">
            $(document).ready(function(){
               $("#listausers").dataTable({
                "oLanguage": {
                    "sZeroRecords": "Nenhum dado econtrado para exibição",
                    "sInfo": "Mostrando _START_ a _END_ de _TOTAL_ de registros",
                    "sInfoEmpty": "Nenhum registro para ser exibido",
                    "sInfoFiltered": "(filtrado de _MAX_ registros no total)",
                    "sSearch": "Pesquisar",
                },
                "sScrollY": "200px",
                "bPaginate": false,
                "aaSorting": [[0, "asc"]] 
               }); 
            });
        </script>
        <table cellspacing="0" cellpadding="0" border="0" class="display" id="listausers">
            <thead>
                <tr>
                    <th>Nome amostrador</th><th>Ações</th><th>Endereço</th><th>Municipio</th>
                </tr>
            </thead>
            <tbody>
                <?php 
                $user = new amostradores();
				//$user->extras_select = "WHERE amt_labo=".$idLabo;
				$user->extras_select = "WHERE amt_lab=".$idLabo ." order by amt_nome";
                $user->selecionaTudo($user);
                while ($res = $user->retornaDados()):
                    echo '<tr>';
                    printf('<td>%s</td>',$res->amt_nome);
					printf('<td class="center">
					</a> <a href="?m=amostras_2&t=editar&amo_idUnico=%s" title="Selecionar"><img src="images/edit.png" alt="Selecionar" /></a>
					</td>',$res->amt_id);
                    printf('<td>%s</td>',$res->amt_endereco);
                    printf('<td>%s</td>',$res->amt_municipio);
                    echo '</tr>';
                endwhile;                
                ?>
            </tbody>
        </table>
    <?php
    endif;//testa o isset bt_cultivar

	
        $sessao = new sessao();
		$finalidade=$sessao->getVar('finalidade');
		$legendaRequerente=$sessao->getVar('controle2');
        //echo("<h2>Registro de amostra(Incluir,alterar ou localizar).$legendaRequerente </h2>");
        if(post('bt_listarRemetentesLetras') !== ""):
		    $letrasDigitadas=post('remetente');
		    $letras='%'.post('remetente').'%';
			$valorLetras=$letrasDigitadas*1;
			echo("Esta função permite informar as primeiras letras do nome do requerente. Foi digitado: $letrasDigitadas<br>");
			salvarDados2016($idLabo,$finalidade,$nomeOperador,$amostraLong);


	        echo '<h2>Requerentes cadastrados</h2>';
			$sessao->setVar('controle',0);       
	        ?>
	
	

		<div style="overflow: auto; width: 1000px; height: 200px; border:solid 1px">          <table bgcolor="white" class="tabela" style="width:1000px">  
 	            <thead>
	                <tr>
	                    <th>Nome</th><th>Endereco</th><th>Município</th><th>Cadastro</th>
	                </tr>
	            </thead>
	            <tbody>
	                <?php 
	                $user = new remetentes();
					if($valorLetras>0):
					   $user->extras_select = "WHERE  prd_id= ".$valorLetras;
					else:
					   $user->extras_select = "WHERE  prd_nome like '$letras' and  prd_id_lab=".$idLabo;
					endif; 
					 
                    //echo("uuuuaqui $user->extras_select<br>");
					$user->selecionaTudo($user);
					$contador=0;
		            while ($res = $user->retornaDados()):
						$contador++;  
						if($contador % 2 !=0):
						   $cor="silver";
						else:
						   $cor="white";
						endif; 
	                    echo '<tr>';
	                    printf('<td bgcolor='.$cor.'>%s',$res->prd_nome);
						printf('
						</a> <a href="?m=amostras_2&t=editar&prd_idLetra=%s" title="Selecionar"><img src="images/edit.png" alt="Selecionar" /></a>
						</td>',$res->prd_id);
	                    printf('<td bgcolor='.$cor.'>%s</td>',$res->prd_endereco);
	                    printf('<td bgcolor='.$cor.'>%s</td>',$res->prd_municipio);
	                    printf('<td class="center" bgcolor='.$cor.'>%s</td>',date("d/m/Y",strtotime($res->prd_datacad));
						
	                    echo '</tr >';
	                endwhile;                
	                ?>
	            </tbody>
	        </table>
			</div>
	        <?php        
		endif;//testa botao listarremetente letra


        if (post('alternar') !== ""):
    		if($finalidade=='PREVIA'):
  			   $finalidade='DEFINITIVA';
			else:
  			   $finalidade='PREVIA';
			endif;
			$sessao->SetVar('finalidade',$finalidade);
			$amostraLong=$objetocalculo->achaUltima();
		endif;
		
		$amostraLong=$sessao->getVar("amostraLong");
        //echo("amostraLongaaaaaaaaaaa dentro de editar  $amostraLong<br>") ; 
			if(post('manual') !== ""):
	           echo '<iframe src="manual2010.php?opcaoManual=registraamostras" style="border:5px dotted red" width="100%" height="350"></iframe>';//funciona
 	        endif;	

            if (get('achar_id') !== ""):
             $amostraLong = get('achar_id');
             $sessao->setVar('amostraLong', $amostraLong);
			endif;
			
		//aqui permite imprimir a ficha em branco	
		 if(post('branco') !== ""):
            $sessao->setVar('controle1', 'branco');		
		 else:	 
		    $sessao->setVar('controle1', 'preenchido');		
		 endif;	
		
        if (post('deletar') !== ""):
            //////////////
			echo '<h2>Exclusão de amostra</h2>';
			if(post('cb_deletar') !== ""):
			    //caso a amostra for daquelas que sao previa e definitivas, dai nao vai deletar
				//mas vai remover a marcacao de definitiva ou de previa
				///////////////
                



	            $userAmo = new amostras();
				$userAmo->extras_select = "WHERE fic_id=".$amostraLong;
                $userAmo->selecionaTudo($userAmo);
                while ($resAmo = $userAmo->retornaDados()):
                    $ficDefinitiva=$resAmo->fic_definitiva;
                    $ficPrevia=$resAmo->fic_previa;
                    $amostraDefinitivaCapturada=$resAmo->fic_amostra; 
                    $amostraPreviaCapturada="P".$resAmo->fic_amostra_previa; 
                endwhile;
				if($ficDefinitiva=='S'):
				   $amostraDeletada=$amostraDefinitivaCapturada;
				else:
				   $amostraDeletada=$amostraPreviaCapturada;
				endif;
                //TESTA SE PORVENTURA NAS DUAS ESTA MARCADO S
                $deletarAmostra='NAO';
                if($ficDefinitiva=='S' && $ficPrevia=='S' ):

                   	if($finalidade=='DEFINITIVA'):
					   //VAI COLOCAR ZERO EM FIC_AMOSTRA E VAI COLOCAR "N" em fic_definitiva
				        $user = new amostras(array(
				            'fic_definitiva'=>'N' ,							
				            'fic_amostra'=>0 ,							
				        );
			            $user->valorpk = $amostraLong;
			            $user->extras_select = "WHERE   fic_id=$amostraLong";
			            $user->atualizar($user);
		                printMSG('A amostra era previa e definitiva e agora passa a ser so previa','alerta');
					endif;			
                   	if($finalidade=='PREVIA'):
					   //VAI COLOCAR ZERO EM FIC_AMOSTRA_PREVIA E VAI COLOCAR "N" em fic_PREVIA
				        $user = new amostras(array(
				            'fic_previa'=>'N' ,							
				            'fic_amostra_previa'=>0 ,							
				        );
			            $user->valorpk = $amostraLong;
			            $user->extras_select = "WHERE   fic_id=$amostraLong";
			            $user->atualizar($user);
		                printMSG('A amostra era previa e definitiva e agora passa a ser so DEFINITIVA','alerta');
					endif;			
                else:
				    //SE MANDOU DELETAR E SE NAO TEM A DUALIDADE NA AMOSTRA) 
                    $deletarAmostra='SIM';
		            printMSG('Ativada a exclusao desta amostra.','alerta');
				endif;
			
			   //echo("finalidade=$finalidade  ficDefinitiva=$ficDefinitiva fic_previa=$fic_previa <br>");
               //aqui vai verificar se o usuario é administrador. Se nao for administrador a variavel $deletarAmostra=N
			    $userADM = new usuarios();
				$userADM->extras_select = "WHERE  nivel='OPERADOR' && id_lab=".$idLabo;
                $userADM->selecionaTudo($userADM);
                while ($resADM = $userADM->retornaDados()):
                    $administrador=$resADM->administrador;//é s minusculo 
                endwhile; 
				 //$administrador="n";
				 // echo("916  administrador=$administrador    deletarAmostra=$deletarAmostra<br>");
				
                 if($administrador!="s")$deletarAmostra=$deletarAmostra='NAO';//se for diferente de s ele nao vai escluir
			     //echo("919 se estiver sim ele vai deletar amostra realmente administrador=$administrador    deletarAmostra=$deletarAmostra<br>");
			   if($deletarAmostra=='SIM'):
		            $userAmo = new amostras();
		            $userAmo->valorpk = $amostraLong;
		            $userAmo->deletar($userAmo);
		            if ($userAmo->linhasafetadas==1):
		                printMSG('Registro excluído com sucesso. <a href="?m=usuarios&t=listar">Exibir cadastros</a>');
						$objetocalculo=new calculos();
                        $objetocalculo->registroDeOcorrencias($amostraLong,0,$nomeOperador,'Removeu amostra '.$amostraDeletada,0,$idLabo);
		                unset($_POST);
						printMSG('Voce é administrador e o registro foi excluído. <a href="?m=usuarios&t=listar">Exibir cadastros</a>','alerta');
		            else:
		                printMSG('Nenhum registro foi excluído. <a href="?m=usuarios&t=listar">Exibir cadastros</a>','alerta');
		            endif;                   
                endif;//TESTA SE ESTA AMOSTRA PODE MESMO DELETAR

				//////////////////////
				$amostraLong=$objetocalculo->achaUltima();
            else:
				printMSG('Excluir amostra é uma operação que precisa confirmação, para evitar deletar acidentalmente. Primeiro clica na caixa de seleção [Sim] depois clica excluir amostra. ','alerta');
			
			endif;//testa o isset da palavra sim
		endif;//testa o deletar
		
//////////COMANDO PARA FECHAR AMOSTRA ////////////////////////////////
        if (post('bt_fechar') !== ""):
			if(post('cb_fechar') !== ""):
			   $user = new amostras(array(
               'fic_vigor'=>'Fechada',
               );
	            $user->valorpk = $amostraLong;
	            $user->extras_select = "WHERE   fic_id=$amostraLong";
	            $user->selecionaTudo($user);
	            $res = $user->retornaDados();
	            $user->atualizar($user);
	  		    echo '<h2>AMOSTRA FOI FECHADA</h2>';
			else:
			   printMSG('Para fecha a amostra, precisa marcar antes a opção FECHAR SIM. ','alerta');
			endif;//testa o deletar
		endif;	
//////////////FIM DO CAOMANDO PARA FECHAR AMOSTRA////////////////////
		
			
       /////#####################################################################################     
			if(post('bt_incluir') !== ""|| post('bt_incluirBranca') !== ""  || post('bt_aleatoria') !== ""):
		       //$sessao = new sessao();
		       //$finalidade=$sessao->getVar('finalidade');
			   //echo("kkkkkkkkkkkkkkknombre del operator= $nomeOperador<br>");

			   
     		   $objetoValidacao=new validacao();
			   $vaiGravar=TRUE;
               //valida a data de entrada
			   $dt_entrada=post('dt_entrada');
               $dt_protocolo=post('dt_protocolo');
			   $retorno=$objetoValidacao->validaDataEntrada($dt_entrada);//esta data vai validar o ano e somente esta
			   if($retorno=='invalida'):
				   printMSG('Preencha corretamente a data de entrada no formato dd/mm/aaaa, e do ano corrente, pois nenhum dado foi alterado. ','alerta');
                   $vaiGravar=FALSE;
			   else:
				   $dt_entrada_americana=$retorno;
				   $y=$sessao->getVar('anocorrente');
			   endif;
               
			   /*
               //valida a data de protocolo
			   $dt_protocolo=post('dt_protocolo');
			   $retorno=$objetoValidacao->validaData($dt_protocolo);
			   if($retorno=='invalida'):
				   printMSG('Amigo, preencha corretamente a data de protocolo no formato dd/mm/aaaa, ou maior que o ano corrente, pois nenhum dado foi alterado. ','alerta');
                   $vaiGravar=FALSE;
			   else:
				   $dt_protocoloGravar=$retorno;
			   endif;

               //valida a data de amostragem
			   $dt_amostragem=post('dt_amostragem');
			   $retorno=$objetoValidacao->validaData($dt_amostragem);
			   if($retorno=='invalida'):
				   printMSG('Amigo, preencha corretamente a data de amostragem no formato dd/mm/aaaa, ou maior que o ano corrente, pois nenhum dado foi alterado. ','alerta');
                   $vaiGravar=FALSE;
			   else:
				   $dt_amostragemGravar=$retorno;
			   endif;

              //$dt_protocolo=date("d/m/Y",strtotime(date();
			   $dt_protocolo=date("Y-m-d");
				echo("data protocolo=$dt_protocolo<br>");
               */
			   
			   
               $dt_protocolo="2013-11-11";
			   
			   
			   
               //validar a representatividade
			   $r1=post('r1');
			   $r2=post('r2');
			   $r3=post('r3');
			   $r4=post('r4');
			   if($r1=="-O-")$r2="-O-";
			   $retornoRep=$objetoValidacao->validaRepresentatividade($r1,$r2,$r3,$r4);
			   if($retornoRep=='invalida'):
				   printMSG('Preencha corretamente a representatividade dentro das possibilidades, pois nenhum dado foi alterado8. ','alerta');
                   $vaiGravar=FALSE;
			   else:
				   $repreGravar=$retornoRep;
			   endif;
			   
			   
			   //aqui vai verificar se a amostra digitada é compativel ou seja nao existe
			   if (post('bt_aleatoria') !== ""):	
                 $amostraAleatoria=post('amostraAleatoria');
				 //testa se é numero valido e testa se a amostra ja existe no mundo das definitivas ou das previas
                 if($amostraAleatoria>1 && $amostraAleatoria<100000):
                    //vai checar se esta amostra porventura ja existe
 				    if($finalidade=='PREVIA'):
					   $sqlAleatoria="select fic_amostra_previa from ficha where fic_ano='".$anoAmostra."' && fic_labo='".$idLabo."' and fic_amostra_previa='".$amostraAleatoria."'";  //fucnciona perfeito
					else:
					   $sqlAleatoria="select fic_amostra from ficha where fic_ano='".$anoAmostra."' && fic_labo='".$idLabo."' and fic_amostra='".$amostraAleatoria."'";  //fucnciona perfeito
					endif;
					$userAleatoria=new amostras();
					$userAleatoria->executaSQL($sqlAleatoria);
                                        
					while($resAleatoria=$userAleatoria->retornaDados()):
 					   //echo("1026 encontrou esta amostra");
					   printMSG('Esta amostra já esiste, por isso não pode ser incluída de modo aleatório. ','alerta');
					
                       $vaiGravar=FALSE;
					endwhile;
                 endif;//fim do teste de avalidade desta aleatoria				 				
               endif;//fim d iset do botao inserir aleatoria				
				
                if($vaiGravar==TRUE):
				    if($finalidade=='PREVIA'):
					   $sqlultimo="select fic_amostra_previa from ficha where fic_ano='".$anoAmostra."' && fic_labo='".$idLabo."' order by fic_amostra_previa desc LIMIT 1";  //fucnciona perfeito
					else:
					   $sqlultimo="select fic_amostra from ficha where fic_ano='".$anoAmostra."' && fic_labo='".$idLabo."' order by fic_amostra desc LIMIT 1";  //fucnciona perfeito
					endif;
				
					$userOto=new amostras();
					$userOto->executaSQL($sqlultimo);
					$resOto=$userOto->retornaDados();
                    //se foi digitado um numero de amostra ele pega o numero e ignora os sequenciais produrados
					$novaAmostraDefini=$resOto->fic_amostra+1;			
					$novaAmostraPrevia=$resOto->fic_amostra_previa+1;			

                    if(substr($cliente,0,4)=='TS L'):
					   echo "amostra defintiva=".$novaAmostraDefini.$sqlultimo;
					
					endif;    

                  

	                $nova = get('nova');
					//echo("Cria uma NOVA AMOSTRA! $finalidade<br>");
					$statusMaiusculo=strtoupper(post('status' ?? "");
				    if($finalidade=='PREVIA'):
                       $novaAmostraDefinitiva= 0;					
                       $novaAmostraPrevia= $novaAmostraPrevia;					
					   $enquadramento_previa="S";
					   $enquadramento_definitiva="N";
					else:
                       $novaAmostraDefinitiva= $novaAmostraDefini;					
					   $novaAmostraPrevia= 0;		
					   $enquadramento_previa="N";
					   $enquadramento_definitiva="S";
					endif;
					
					//$idProdutor=$sessao->getVar('idProdutor');
					//aqui tem que criar o registro de PURE e GERM na tabela rean
                    //criando registro de GERM
					//vai pegar o formato deful 8x50  ou 4x100
				    $userg = new tabeladeful();
					$userg->extras_select =" where   cod_lab=".$idLabo ;
				    $userg->selecionaTudo($userg);
					while ($resg = $userg->retornaDados()):
				        $formato=$resg->formato_germinacao;//4x100  8x50 
						$defulOutrasCultivares=$resg->outras_cultivares;
				    endwhile;
					
					
					//se for analise previa entao o formato padrao é 4x50 seugerido por qualiteste dias 10/09/16
					//$finalidade=$sessao->getVar('finalidade');
					if($finalidade=='PREVIA')$formato='4x50';
					//echo("repeticao=$repeticao=finalidade $finalidade<br>");
					if(substr($cliente,0,8)=='DIMICRON')$formato='4x100';
					//echo("ddddddddddddeful outras cultivares $defulOutrasCultivares<br>");			
					//aqui captura dados da amostra que esta na tela
                    $guardaAmostraLong=$amostraLong;//para replicar testes a realizar
					//	'fic_dt_entrada' => $dt_entrada_americana,//era assim mas mudeipara pgar a data do dia
					//    'fic_dt_entrada' => date('Y-m-d'), //atendendo germinax ele nao quer a data do dia para a data de entrada...
                   //aqui captura dados da amostra anterior ou nao, dependendo se tento criar amostra branca
                   if(post('bt_incluirBranca') !== ""):
				     $mensagemInclusao='Foi criada uma nova amostra! A nova amostra copiou da amostra anterior, apenas REQUERENTE,CULTIVAR e AMOSTRADOR.';
            	     $safra='-O-';
		             $lote='-O-';
		             $funcao='-O-';
					 $registrador= substr($nomeOperador,0,10);
					 $dt_protocolo='-O-';
					 $dt_entrada= date("Y-m-d");
					 $dt_amostragem='-O-';
					 $categoria= '-O-';
	                 $peneira= '-O-';
	                 $previsao= '-O-';
                     $importacao='-O-';
                     $campo_string='-O-';
                     $repre_unid='-O-';
	                 $procedencia=  '-O-';
	                 $validade=  '-O-';
	                 $aparelho='-O-';
	                 $balanca='-O-';
	                 $tratamento='-O-';
	                 $tta='-O-';
	                 $tta_complementar= '-O-';
	                 $status_finalizada='-O-';
	                 $status_pago= '-O-';
	                 $ano   =  $y;
					 $outrasCultivares='-N-';
	               else:
				     $dataProtocoloGravar=date('d/m/Y');
				     if($cliente=='LASSUL'):
					      $dataProtocoloGravar=post('dt_protocolo');
						  //$mingau=post('dt_protocolo');
					      //echo("linha 948 mingau=$mingau<br>");
				     endif;
					 
				     $mensagemInclusao='Foi criada uma nova amostra! A nova amostra é idêntica à amostra que estava na tela. Não deixe de editar Lote e outros dados que possivelmente mudam. A data de entrada e a data do protocolo foi atribuida a data atual, se precisar, edite isso também. A data de amostragem é copiada da amostra anterior. O sistema também traz tratamento,temperatura e substrato, que foi cadastrado para esta especie. Acesse:CADASTROS->HABILITAR ESPECIE->TRATAMENTO MAIS FREQUENTE. ';
            	     $safra=post('safra');
		             $lote='Novo Lote';
		             $funcao=post('funcao');
					 $registrador= substr($nomeOperador,0,10);
					 $dt_protocolo=$dataProtocoloGravar;
					 $dt_entrada= $dt_entrada_americana;
					 $dt_amostragem=post('dt_amostragem');
					 $categoria=  post('categoria');
	                 $peneira=  post('peneira');
	                 $previsao=  post('previsao');
                     $importacao=post('importacao');
                     $campo_string=post('campo');
                     $repre_unid=$repreGravar;
	                 $procedencia=  post('procedencia');
	                 $validade=  post('validade');
	                 $aparelho=post('peso');
	                 $balanca=post('balanca');
	                 $tratamento=post('tratamento');
	                 $tta=post('tta');
	                 $tta_complementar= strtoupper(post('status' ?? "");
	                 $status_finalizada= strtoupper(post('statusFinalizada' ?? "");
	                 $status_pago= strtoupper(post('statusPagamento' ?? "");
	   
	                 $ano   =  $y;
					 $outrasCultivares=$defulOutrasCultivares;
				   endif;


                    $loteTrim=trim($lote);
                    //echo("1001 xxxxxxxxxxx nova amostra definitiva = $novaAmostraDefinitiva  trimlote= $loteTrim) <br>");
                    if($amostraAleatoria>0):
					   if($finalidade=='DEFINITIVA')$novaAmostraDefinitiva=$amostraAleatoria;
					   if($finalidade=="PREVIA")$novaAmostraPrevia=$amostraAleatoria;
					endif;
					//echo("novaAmostraDefinitiva=$novaAmostraDefinitiva<br>");
					
	                $amoNova = new amostras(array(
		                'fic_amostra'=> $novaAmostraDefinitiva,
		                'fic_amostra_previa'=> $novaAmostraPrevia,
		                'fic_previa'=> $enquadramento_previa,
		                'fic_definitiva'=> $enquadramento_definitiva,
		                'fic_lote'   => trim($lote),
		                'fic_funcao' =>  $funcao,
						'fic_registrador' => $registrador,
						'fic_dt_protocolo' => $dt_protocolo,
						'fic_dt_entrada' => $dt_entrada,
						'fic_dt_amostragem' => $dt_amostragem,
						'fic_categoria' =>  $categoria,
		                'fic_peneira' =>  $peneira,
		                'fic_previsao' =>  $previsao,
                        'fic_importacao' =>$importacao,
                        'fic_campo_string' =>$campo_string,
                        'fic_repre_unid' =>$repre_unid,
		                'fic_procedencia' =>  $procedencia,
		                'fic_validade' =>  $validade,
		                'fic_aparelho' =>$aparelho,
		                'fic_balanca' =>$balanca,
		                'fic_tratamento' =>$tratamento,
		                'fic_tta' =>$tta,
		                'fic_tta_complementar' =>$tta_complementar,
		                'fic_status_finalizada' => $status_finalizada,
		                'fic_status_pago' => $status_pago,
		                'fic_safra' =>  $safra,
		                'fic_cultivar' =>  $idCultivar,
		                'fic_produtor' =>  $idProdutor,
		                'fic_amostrador' =>  $idAmostrador,
		                'fic_labo'   =>  $idLabo,
		                'fic_ano'   =>  $y,
						'fic_outrascultivares'=>$outrasCultivares,
						'fic_obs2015_a'=>'-',
						'fic_obs2015_b'=>'-',
						'fic_obs2015_c'=>'-',
						'fic_obs2015_d'=>'-',
						'fic_complemento'=>'-',
						'fic_cultivar_digitada'=>'-',
						
		            );
					//echo("aqui pega o fic id novo $fic_id <br>");
	                printMSG($mensagemInclusao);
					$sessao->setVar('ultima',$novaAmostra);
	                $amostraLong=$amoNova->inserir($amoNova);//esta linha funcionava antes
	                $sessao->setVar('amostraLong', $amostraLong);
					//vai gravar ocorrencia
					$objetocalculo->registroDeOcorrencias($amostraLong,0,$nomeOperador,'Novo registro',0,$idLabo);							

					//aqui vai forcar ele ir para a nova amostra 
					//$amostraLong=$objetocalculo->achaUltima();//com esta linha ele vai para a ultima
					//vai tentar pegar tratemente,temperatura e substrato da tabe
					//la tratamento frequente
					//se nao achar ele vai so avisar que nao achou e que
					//o laboratorio pode cadastrar isso
					$tratamento="-";
					$temperatura="-";
					$substrato="-";
					//aqui vai ler os dados desta especie e deste laboratorio
					//ENTRA DE QUAKQUER MANEIRA
					
					
					
					$generica=new tabelagenerica();
					$generica->tabela="cultivar,tratamentofrequente";
					$generica->campos_valores = array(
							"tfg_cultura" => NULL,
							"tfg_labo" => NULL,
							"tfg_tratamento" => NULL,
							"tfg_substrato" => NULL,
							"tfg_temperatura" => NULL,
							"tfg_germinador" => NULL,
						);
					$generica->extras_select =" where  tfg_labo=".$idLabo." &&  tfg_cultura=ctv_especie  && ctv_id  =" . $idCultivar;;
					$generica->selecionaCampos($generica);
					$encontrou="NAO";
					//echo("1080  zzzzzzzzzzzzz $generica->extras_select<br>");
					while ($resgenerica = $generica->retornaDados()):
					    $encontrou="SIM";
						$tratamento=$resgenerica->tfg_tratamento;
						$substrato=$resgenerica->tfg_substrato;
						$temperatura=$resgenerica->tfg_temperatura;
						$germinador=$resgenerica->tfg_germinador;
					endwhile;
					if($encontrou=='NAO'):
					   printMSG('Orientação importante que deve ser seguida: O programa preenche automaticamente a temperatura, substrato e tratamento laboratorial para germinação, DESDE QUE TENHA SIDO SALVO. Acesse: CADASTROS-->HABILITAR ESPECIE-->CLIQUE EM TRATAMENTO MAIS FREQUENTE. ','alerta');
					
					endif;
					
                    
					
					//$temperatura="cavalo";
					
					
										
					//echo("1102 salvando insercao  temperatura $temperatura tratamento $tratamento<br>");
					
					//vai salvar o formato e outros campos iniciais
					
					//'rea_datainicio'=>date("d/m/Y"), eu mudei esta linha em 22-9/18 pois vinha a data do protocolo ja preenchida 
                    //$dataPreenchida=date("d/m/Y");//se alguem reclamar pedidno que venha a data do dia do cadastrao entao coloco
					//uma condico por exemplo se for tabajata vem a data tal
                    // se for limagrain o computadro ja deixa o campo  rea_terceira_leitura_analista marcado pois significa que fez e esta ativo na coluna GD do relatorio limagrain
					if($cliente=='LIMAGRAINX'):
                      //$marcaAsterisco='*':					
					else:
                      //$marcaAsterisco='';					
					endif;
					
					
                    $dataPreenchida="";
	                $reanNova = new rean1(array(
		                'rea_ficha'=> $amostraLong,
		                'rea_teste'=> 'GERM',
		                'rea_lei4'=> $formato,
						'rea_datageralteste'=>date("Y-m-d"),  
						'rea_datainicio'=>$dataPreenchida,  
						'rea_duracao'=>" ",  
						'rea_campo60a'=>$tratamento,
						'rea_campo20a'=>$temperatura,
						'rea_campo60b'=>$substrato,
						'rea_segunda_leitura'=>'-',
						
		            );
	                $reanLong=$reanNova->inserir($reanNova);
                    //criando registro de PURE  //AQUI JA VOU TRACER O VALOR DO PESO MINIMO PARA PUREZA HIHIHIH
	                $reanNova = new rean1(array(
		                'rea_ficha'=> $amostraLong,
		                'rea_teste'=> 'PURE',
		                'rea_lei1'=> '',
		                'rea_lei2'=> '',
		                'rea_lei3'=> '',
		                'rea_lei4'=> '',
						'rea_segunda_leitura'=>'-',
		            );
	                $reanLong=$reanNova->inserir($reanNova);
					//aquivou pegar os testes da ampostraanterior e vou criar a talela testes a realizar da ficha nova
					//marlon1608/22
					$testesDestaAmostra2022=$sessao->getVar('controle4');
					//echo("1167  testesConcatenados=$testesConcatenados testesdestaamostra2022=$testesDestaAmostra2022  aLong=$amostraLong<br>");
					//1167  testesConcatenados=$testesConcatenados testesdestaamostra=$testesDestaAmostra2022<br>");
                    list($te[1],$te[2],$te[3],$te[4],$te[5],$te[6],$te[7],$te[8],$te[9],$te[10])= explode(";", $testesDestaAmostra2022);
				    //echo("te1=$te1 te2=  $te2=  te3=$te3 <br>");  
                    for($i=1;$i<=10;$i++):
					   $teste=$te[$i];
                       //echo("1145 teste=$teste <br>");  
                       if($teste !=""):
                        //////////////////////////////////////////////					   
   						$userTestes = new testesSolicitados();
 				        $userTestes = new testesSolicitados(array(
					          'tes_ficha'=>$amostraLong,
					          'tes_teste'=>$teste,
					       );
					       $userTestes->inserir($userTestes);
					   ////////////////////
					   endif;//teste se´tem conteudo do teste	
					endfor;	
					/*		
					//echo("1167  testesConcatenados=$testesConcatenados testesdestaamostra=$testesDestaAmostra2022<br>");
					/*
					//aqui vai replicar OU NAO os testes a realizar
					//ver SE É PARA REPLICAR OU NAO
				    $user = new tabeladeful();
					$user->extras_select =" where   cod_lab=".$idLabo ;
				    $user->selecionaTudo($user);
				    $replicarTestes='SIM';// 
					while ($res = $user->retornaDados()):
				        $replicarTestes=$res->replicar_testes;//pode vir com valor =nao
				    endwhile;
					if($replicarTestes=="SIM"):
						$user = new testesSolicitados();
						$user->extras_select = "where tes_ficha=".$guardaAmostraLong;
						$user->selecionaTudo($user);
                        $testesConcatenados='';
						while ($res = $user->retornaDados()):
						   $teste=$res->tes_teste;
                           $testesConcatenados=  $testesConcatenados.$teste.";"; 
					       $userTestes = new testesSolicitados(array(
					          'tes_ficha'=>$amostraLong,
					          'tes_teste'=>$teste,
					       );
					       $userTestes->inserir($userTestes);
						endwhile; 
						//vai calcular e salvar na ficha
						$objetocalculo=new calculos();
					*/
					$replicarTestes='SIM';// 
					$testesConcatenados=$testesDestaAmostra2022;
					if($replicarTestes=="SIM" && $testesConcatenados!=""):
					    $custo=$objetocalculo->calculaCusto($amostraLong);
						//vai gravar na ficha os testes capturados da amostra anterieor
				        $userT = new amostras(array(
				            'fic_testes_realizar'=>$testesConcatenados  ,
				            'fic_custo'=>$custo  ,
				        );
			            $userT->valorpk = $amostraLong;
			            $userT->extras_select = "WHERE   fic_id=$amostraLong";
			            $userT->atualizar($userT);
    					echo("1362 Salvou testes a realizar testesConcatenados=$testesConcatenados testesdestaamostra=$testesDestaAmostra2022<br>");
		            else:
					   echo("1366 testesConcatenados=$testesConcatenados testesdestaamostra=$testesDestaAmostra2022 Nao houve salvamento de teste as realizar.<br>");
                    endif;//testa se é para replicar ou nao 
					/////fim da replicacao dos testes a realizar
                else:
				    printMSG('Preencha corretamente os dados, pois NENHUM dado foi inserido. ','alerta');
				endif;
				unset($_POST);
				unset($_GET);
			endif;//final do get novo	
		
 		
	


			$acao="nenhuma";
		    if (post('acharDigitada') !== "" || post('acharAvanca') !== ""  || post('acharRecua') !== "" || post('acharUltima') !== ""):
				$sessao->setVar('controle',0);
			   	$registro=post('amostra');//se clica em achar digitada ja pega daqui
              	if(post('acharAvanca') !== "")$acao='avanca';
              	if(post('acharRecua') !== "")$acao='recua';
              	if(post('acharUltima') !== "")$acao='ultima';
	            $amostraLong=$objetocalculo->AchaIdAmostra2016($registro,$acao);
				
				//$sessao->setVar('amostraLong',$amostraLong);
		   endif;//fecha o if que acha ammostras pelo avanca-recua ou ultima






		
		    //aqui vai pegar o id do rmetente e ja gravar na amostra
            if($acao=="nenhuma"):
	            if (get('prd_idUnico') !== "" || get('prd_idLetra') !== ""  ):
				  $idProdutor=0;
				  $valorControle=0; 			
				  $valorControle=$sessao->getVar('controle');
	              if (get('prd_idLetra') !== ""):
				     $valorControle=1;
					 $sessao->setVar('controle',0); 
				  endif;
				  //echo("kkkkkkkkkkkkkkkkkkkkkkunico dentro do isset controle= $valorControle <br>");
				 
				  if($valorControle==1):
				  	  //$sessao->setVar('controle',0); 
					  $valorControle=0;      
		              $idProdutor = get('prd_idUnico');
		              if (get('prd_idLetra') !== ""):
					     $idProdutor = get('prd_idLetra');
	                     //echo("kkkkkkkkkkkkkkkkkkkkkkunicocapturou get id letadentro do isset podutor $idProdutor <br>");  
						 
					  endif;
	                  //echo("kkkkkkkkkkkkkkkkkkkkkkunicodentro do isset podutor $idProdutor <br>");  

	                unset($_GET['prd_idUnico']);             
	                unset($_GET['prd_idLetra']);             

	                /*aqui vai capturar o id do amostrador associado
	                se for numero maior que zero ele vai salvar na amostra
	                caso contrario vai ignorar  					
	                */
	                $userReme = new remetentes();
					$userReme->extras_select = "WHERE prd_id=".$idProdutor;
	                $userReme->selecionaTudo($userReme);
	                $codAmostradorVinculado=0;
	                $mensagemExtra="";
	                while ($res = $userReme->retornaDados()):
	                    $codAmostradorVinculado=$res->prd_cod_amostrador;
	                endwhile;
					//se achou um codigo entao grava tambem o codigo   
					echo("sistema antigo   codAmostradorVinculado=$codAmostradorVinculado<br>");           
	                if($codAmostradorVinculado>0):
						$user = new amostras(array(
	                       'fic_produtor'=>$idProdutor,
	                       'fic_amostrador'=>$codAmostradorVinculado,
	                        );
	                    $mensagemExtra="Gravou também o amostrador vinculado a este requerente!";
	                else:
	                    //aqui nao tem amostrador vinculado entao ele tem que achar o amostrador -o-
						//se nao achar deve avisr que crie um, mas neste caso mantem o nome antigo
						//se acheou avisa que esta colocando amostrador -o-
		                $userAmo = new amostradores();
						$userAmo->extras_select = "WHERE amt_lab=".$idLabo." and amt_nome ='-O-'";
		                $userAmo->selecionaTudo($userAmo);
		                $codAmostradorTraco=0;
		                $mensagemExtra="";
		                while ($resAmo = $userAmo->retornaDados()):
		                    $codAmostradorTraco=$resAmo->amt_id;
		                endwhile;
						//se achou o amostrador -O- vai salvar o codigo, cso contrario deixa 
						//deixa o antigo e avisa que deve mudar agora
	                    if($codAmostradorTraco>0): 
							$user = new amostras(array(
		                       'fic_produtor'=>$idProdutor,
		                       'fic_amostrador'=>$codAmostradorTraco,
		                        );
		                    $mensagemExtra="Gravou amostrador -O-, recomendo selecionar o amostrador neste momento, caso exista!";

	                    else:
	                        //so vai gravar o remetente mesmo
							$user = new amostras(array(
		                       'fic_produtor'=>$idProdutor,
		                        );
		                    $mensagemExtra="Não foi encontrado o amostrador -O-. Recomendo gravar um com este pseudo nome para normalizar seus dados. Importante que -O- se ja com um traço, letra O maiúsculo e novamtente traço!";
						endif;//testa se amostrador -0- 
	                endif;//amostrador vinculado
	                    //aqui salva por fim o que foi organizado acima
	                    $user->valorpk = $amostraLong;
	                    $user->extras_select = "WHERE   fic_id=$amostraLong";
	                    $user->selecionaTudo($user);
	                    $res = $user->retornaDados();
	                    $user->atualizar($user);
						$sessao->setVar('controle',0); 
						///////////
	                    $sessao->setVar('idProdutor',$idProdutor);
						//////
						               
	                    $mensagem='Salvou requerente nesta amostra!'.$idProdutor.$mensagemExtra;
						//printMSG('controle='. $valorControle. $mensagem,'alerta');
	               endif;//testa se controle=1
				endif;//testa o isset	
            endif;//testa se nao ativou acao nenhuma 

				if (post('bt_barcode') !== ""):
				   //echo '<iframe src="testeBarcodeFPDF.php" style="border:5px dotted red" width="100%" height="300"></iframe>';	 //funciona 
				   //este ai chama uma classe bem bolada
				   echo '<iframe src="testeBarcodeFPDF_classe.php" style="border:5px dotted red" width="100%" height="300"></iframe>';	 //funciona 
				endif;
				
				//3 FICHAS DA QUALITESTE
				if (post('bt_RQ5_RQ6') !== ""):
				   echo '<iframe src="imprimeFichaVirtualQualiRQ05_RQ06.php" style="border:5px dotted red" width="100%" height="300"></iframe>';
				
				endif;
				if (post('bt_RQ7') !== ""):
				   echo '<iframe src="imprimeFichaVirtualQualitesteRQ7.php" style="border:5px dotted red" width="100%" height="300"></iframe>';
				
				endif;
				
				

				//ESTE É O BOTAO FICHA verso 
				if (post('bt_imprimeFichaVerso2020') !== ""):
				  //para celeiro ficha verso é o env. acelerado

				  if($cliente=="SEMPRE"):
				    $amostraCorrente=post('amostra');
                    $sessao->setVar('inicio',$amostraCorrente);	//para voltar a impirmir uma so
                    $sessao->setVar('final',$amostraCorrente);	//para voltar a impirmir uma so 					
				    echo '<iframe src="imprimeFichaVirtualSEMPRE_TRR.php" style="border:5px dotted red" width="100%" height="200"></iframe>';	 //funciona  
				  endif;
	
				  
				  
				  
				  if($cliente=="DIMICRON"):
				    $amostraCorrente=post('amostra');
                    $sessao->setVar('inicio',$amostraCorrente);	//para voltar a impirmir uma so
                    $sessao->setVar('final',$amostraCorrente);	//para voltar a impirmir uma so 					
				    echo '<iframe src="imprimeFichaBrancaDimicron.php" style="border:5px dotted red" width="100%" height="200"></iframe>';	 //funciona  
				  endif;
				  echo("entrou cliente $cliente<br>");
				  




                endif; //testa o botao ficha verso 
				
				//ESTE É O BOTAO FICHA TZ 
				if (post('bt_imprimeFichaTZ2020') !== ""):
				  //para celeiro ficha verso é o env. acelerado
		
                endif; //testa o botao ficha verso 
				
				
				
				
								
				if (post('bt_imprimefichaTradicional') !== ""):
				    
					//ver qual o tipodeficha(se nao tem ainda,vai para o modelos basico)
				    $user = new tabeladeful();
					$user->extras_select =" where   cod_lab=".$idLabo ;
				    $user->selecionaTudo($user);
					while ($res = $user->retornaDados()):
				        $modelo_ficha=$res->modelo_ficha;//opcao que sempre 
				    endwhile;

                    if(substr($cliente,0,5)=='IAGRO'):
					   $modelo_ficha="IAGRO_CG";
                       $sessao->setVar('controle1','CONVENCIONAL');
                       $sessaoLida=$sessao->getVar('controle1');
					endif;

                    if($cliente=='GERMINAR'):
					   $modelo_ficha="GERMINAR";
                       $sessao->setVar('controle1','CONVENCIONAL');
                       $sessaoLida=$sessao->getVar('controle1');
					endif;
					
                    if($cliente=='UPF'):
					   $modelo_ficha="UPF";
                       $sessao->setVar('controle1','CONVENCIONAL');
                       $sessaoLida=$sessao->getVar('controle1');
					endif;

                    if(substr($cliente,0,5)=='IAGRODOU'):
					   $modelo_ficha="IAGRO_GENERICA";
                       $sessao->setVar('controle1','CONVENCIONAL');
                       $sessaoLida=$sessao->getVar('controle1');
					endif;
                    if($cliente=='IRGA'):
					   $modelo_ficha="IRGA_GENERICA";
                       $sessao->setVar('controle1','CONVENCIONAL');
                       $sessaoLida=$sessao->getVar('controle1');
					endif;


					echo ("1547Modelo= $modelo_ficha Para mudar o modelo acesse:Manutenção->Configurações->modelo de ficha. $sessaoLida <br>");



										
                    //a medida que vou acrescentando modelos vou incluindo aqui
	                if($modelo_ficha!='CA_PUREZA' && $modelo_ficha!='basico' && $modelo_ficha!='CruzAlta' && $modelo_ficha!='Germinacao' && $modelo_ficha!='ADV'  && $modelo_ficha!='DIMICRON'   && $modelo_ficha!='SEEDS'   && $modelo_ficha!='VIGOR'  && $modelo_ficha!='TZO' && $modelo_ficha!='FITO'  && $modelo_ficha!='completo'  && $modelo_ficha!='ANALISAR'   && $modelo_ficha!='Conceito' && $modelo_ficha!='TZO_UFLA'  && $modelo_ficha!='UFLA' && $modelo_ficha!='TABAJARA'  && $modelo_ficha!='TZF' && $modelo_ficha!='IAGRO_GENERICA' && $modelo_ficha!='GERMINAR'  && $modelo_ficha!='UPF'   && $modelo_ficha!='IAGRO_CG' && $modelo_ficha!='IRGA_GENERICA' ):
					    $modelo_ficha='basico';
					endif;
					
					
                    //ISSO AQUI SO DOURADOS
	                if($modelo_ficha=='IAGRO_GENERICA'):				
		                echo '<iframe src="imprimeFichaIAGRO_GENERICA.php" style="border:5px dotted red" width="100%" height="200"></iframe>';	 //funciona  
				    endif;
					
                    //ISSO AQUI CAMPO GRANDE  
	                if($modelo_ficha=='IAGRO_CG'):				
		                echo '<iframe src="imprimeFichaIAGRO_CG.php" style="border:5px dotted red" width="100%" height="200"></iframe>';	 //funciona  
				    endif;


					
	                if($modelo_ficha=='IRGA_GENERICA'):
						$numeroSalvar=post('numeroOrdemFicha');
						$user = new amostras(array(
						'fic_preparo_dosn'=>$numeroSalvar,
						);
						$user->valorpk = $amostraLong;
						$user->extras_select = "WHERE   fic_id=$amostraLong";
						$user->atualizar($user);					    
		                echo '<iframe src="imprimeFichaIRGA_GENERICA.php" style="border:5px dotted red" width="100%" height="200"></iframe>';	 //funciona  
				    endif;

	                if($modelo_ficha=='GERMINAR'):
						$numeroSalvar=post('numeroOrdemFicha');
						$user = new amostras(array(
						'fic_preparo_dosn'=>$numeroSalvar,
						);
						$user->valorpk = $amostraLong;
						$user->extras_select = "WHERE   fic_id=$amostraLong";
						$user->atualizar($user);					    
		                echo '<iframe src="imprimeFichaGERMINAR.php" style="border:5px dotted red" width="100%" height="200"></iframe>';	 //funciona  
						//echo '<iframe src="imprimefichaPMS.php"      style="border:5px dotted red" width="100%" height="200"></iframe>';	 //funciona  
				    endif;

	                if($modelo_ficha=='UPF'):
						$numeroSalvar=post('numeroOrdemFicha');
						$user = new amostras(array(
						'fic_preparo_dosn'=>$numeroSalvar,
						);
						$user->valorpk = $amostraLong;
						$user->extras_select = "WHERE   fic_id=$amostraLong";
						$user->atualizar($user);					    
		                echo '<iframe src="imprimeFichaUPF.php" style="border:5px dotted red" width="100%" height="200"></iframe>';	 //funciona  
						//echo '<iframe src="imprimefichaPMS.php"      style="border:5px dotted red" width="100%" height="200"></iframe>';	 //funciona  
				    endif;
					
					

					if($cliente=='LACADOR'):
					   //vai abrir a ficha virtual mas vai levar uma sessao para nao uxar dados....
					   //echo("imprimirndo ficha lacador em branco<br>");
					   $modelo_ficha='LACADOR';
					   $amostraCorrente=post('amostra');
                       $sessao->setVar('inicio',$amostraCorrente);	//para voltar a impirmir uma so
                       $sessao->setVar('final',$amostraCorrente);	//para voltar a impirmir uma so 	
					   $sessao->setVar('controle','LACADORBRANCA');				
					   echo '<iframe src="imprimeFichaVirtualLacador.php" style="border:5px dotted red" width="100%" height="300"></iframe>';  
					   
					endif;
					
					
						
                    //echo(" linha 1792 modeloficha $modelo_ficha<br>");


                    //daqui para baixo os modelos existentes 
                    if($modelo_ficha=='CA_PUREZA')echo '<iframe src="imprimefichaCruzAltaPUR.php" style="border:5px dotted red" width="100%" height="300"></iframe>';	 //funciona  

                    if($modelo_ficha=='basico')echo '<iframe src="imprimeficha1.php" style="border:5px dotted red" width="100%" height="300"></iframe>';	 //funciona  
                    if($modelo_ficha=='CruzAlta')echo '<iframe src="imprimefichaCruzAlta.php" style="border:5px dotted red" width="100%" height="300"></iframe>';	 //funciona  
                    if($modelo_ficha=='completo')echo '<iframe src="imprimefichacompleto.php" style="border:5px dotted red" width="100%" height="300"></iframe>';	 //funciona  
                    if($modelo_ficha=='Conceito')echo '<iframe src="imprimefichaConceito.php" style="border:5px dotted red" width="100%" height="300"></iframe>';	 //funciona  
                    if($modelo_ficha=='Germinacao')echo '<iframe src="imprimefichaGERM.php" style="border:5px dotted red" width="100%" height="300"></iframe>';	 //funciona 
					 
 		
	
					
					
					
					if($modelo_ficha=='ADV'):
					    $amostraCorrente=post('amostra');
                        $sessao->setVar('inicio',$amostraCorrente);	//para voltar a impirmir uma so
                        $sessao->setVar('final',$amostraCorrente);	//para voltar a impirmir uma so 					
					    echo '<iframe src="imprimefichaADV.php" style="border:5px dotted red" width="100%" height="300"></iframe>';	 //funciona  
                    endif;

					if($modelo_ficha=='TABAJARA'):
					    $amostraCorrente=post('amostra');
                        $sessao->setVar('inicio',$amostraCorrente);	//para voltar a impirmir uma so
                        $sessao->setVar('final',$amostraCorrente);	//para voltar a impirmir uma so 					
					    echo '<iframe src="imprimefichaTABAJARA.php" style="border:5px dotted red" width="100%" height="300"></iframe>';	 //funciona  
                    endif;




					if($modelo_ficha=='TZO'):
					    $amostraCorrente=post('amostra');
                        $sessao->setVar('inicio',$amostraCorrente);	//para voltar a impirmir uma so
                        $sessao->setVar('final',$amostraCorrente);	//para voltar a impirmir uma so 					
					    echo '<iframe src="imprimefichaTZO.php" style="border:5px dotted red" width="100%" height="300"></iframe>';	 //funciona  
                    endif;
        
					if($modelo_ficha=='TZF'):
					    $amostraCorrente=post('amostra');
                        $sessao->setVar('inicio',$amostraCorrente);	//para voltar a impirmir uma so
                        $sessao->setVar('final',$amostraCorrente);	//para voltar a impirmir uma so 					
					    echo '<iframe src="imprimeFichaTZFORR.php" style="border:5px dotted red" width="100%" height="300"></iframe>';	 //funciona  
                    endif;

		
		
					if($modelo_ficha=='TZO_UFLA'):
					    $amostraCorrente=post('amostra');
                        $sessao->setVar('inicio',$amostraCorrente);	//para voltar a impirmir uma so
                        $sessao->setVar('final',$amostraCorrente);	//para voltar a impirmir uma so 					
					    echo '<iframe src="imprimefichaTZO_UFLA.php" style="border:5px dotted red" width="100%" height="300"></iframe>';	 //funciona  
                    endif;

					if($modelo_ficha=='UFLA'):
					    $amostraCorrente=post('amostra');
                        $sessao->setVar('inicio',$amostraCorrente);	//para voltar a impirmir uma so
                        $sessao->setVar('final',$amostraCorrente);	//para voltar a impirmir uma so 					
					    echo '<iframe src="imprimeFichaUFLA.php" style="border:5px dotted red" width="100%" height="300"></iframe>';	 //funciona  
                    endif;
					if($modelo_ficha=='SEEDS'):
					    $amostraCorrente=post('amostra');
                        $sessao->setVar('inicio',$amostraCorrente);	//para voltar a impirmir uma so
                        $sessao->setVar('final',$amostraCorrente);	//para voltar a impirmir uma so 					
					    echo '<iframe src="imprimefichaSEEDS.php" style="border:5px dotted red" width="100%" height="300"></iframe>';	 //funciona  
                    endif;

					if($modelo_ficha=='VIGOR'):
					    $amostraCorrente=post('amostra');
                        $sessao->setVar('inicio',$amostraCorrente);	//para voltar a impirmir uma so
                        $sessao->setVar('final',$amostraCorrente);	//para voltar a impirmir uma so 					
					    echo '<iframe src="imprimefichaVIGOR.php" style="border:5px dotted red" width="100%" height="300"></iframe>';	 //funciona  
                    endif;


					if($modelo_ficha=='FITO'):
					    $amostraCorrente=post('amostra');
                        $sessao->setVar('inicio',$amostraCorrente);	//para voltar a impirmir uma so
                        $sessao->setVar('final',$amostraCorrente);	//para voltar a impirmir uma so 					
					    echo '<iframe src="imprimefichaFITO.php" style="border:5px dotted red" width="100%" height="300"></iframe>';	 //funciona  
                    endif;
                    
					//SE FOR DIMICRON E MANDOU IMPRIMIR FICHA ENTAO IMPRIMR TAMBEM FItO E TZ
					if($cliente=='DIMICRON' || substr($cliente,0,2)=='TS'):
                        $assinalouTZ="nao";
                        $assinalouFITO="nao";
						$user = new testesSolicitados();
						$user->extras_select = "where tes_ficha=".$amostraLong;
						$user->selecionaTudo($user);
						while ($res = $user->retornaDados()):
						    if($res->tes_teste=='TZO') $assinalouTZ="SIM";
						    if($res->tes_teste=='FIT') $assinalouFITO="SIM";
						endwhile;              

					    $amostraCorrente=post('amostra');
                        $sessao->setVar('inicio',$amostraCorrente);	//para voltar a impirmir uma so
                        $sessao->setVar('final',$amostraCorrente);	//para voltar a impirmir uma so					    
						echo("assinalou fito= $assinalouFITO  assinalou tz= $assinalouTZ<br>");
						
						
                        if($assinalouTZ=="SIM"):
						   echo '<iframe src="imprimefichaTZO.php" style="border:5px dotted red" width="100%" height="300"></iframe>';
                        endif; 
                        if($assinalouFITO=="SIM"):
						   echo '<iframe src="imprimefichaFITO.php" style="border:5px dotted red" width="100%" height="300"></iframe>';
                        endif; 
					
					
					
					
					
					endif;
					
					if($cliente=='LABORATÓRIO DE ANÁLISE DE SEMENTES - LAS/UFLA'):
                        $assinalouTZ="nao";
                       	$user = new testesSolicitados();
						$user->extras_select = "where tes_ficha=".$amostraLong;
						$user->selecionaTudo($user);
						while ($res = $user->retornaDados()):
						    if($res->tes_teste=='TZO') $assinalouTZ="SIM";
						endwhile;              

					    $amostraCorrente=post('amostra');
                        $sessao->setVar('inicio',$amostraCorrente);	//para voltar a impirmir uma so
                        $sessao->setVar('final',$amostraCorrente);	//para voltar a impirmir uma so					    
                        if($assinalouTZ=="SIM"):
						   echo '<iframe src="imprimefichaTZO_UFLA.php" style="border:5px dotted red" width="100%" height="300"></iframe>';
                        endif; 
					endif;
		
					//echo("cliente=$cliente assinalou tz=$assinalouTZ<br>");
		
		
					
					
					if($modelo_ficha=='DIMICRON'):
					    $amostraCorrente=post('amostra');
                        $sessao->setVar('inicio',$amostraCorrente);	//para voltar a impirmir uma so
                        $sessao->setVar('final',$amostraCorrente);	//para voltar a impirmir uma so 					
					    echo '<iframe src="imprimefichaDimicron_mapax.php" style="border:5px dotted red" width="100%"height="300"></iframe>';	 //funciona  
                    endif;

	/////////////////////////////////////////
					//vai gravar no campo fic_tta_complementar o numero da impressao da ficha ,isso para o cliente irga
					if(substr($cliente,0,4)=='IRGA'):
					    $sqlAchaCampoFicTTA="select fic_tta_complementar from ficha where fic_id=".$amostraLong;  //fucnciona perfeito
						$userOto=new amostras();
						$userOto->executaSQL($sqlAchaCampoFicTTA);
						$resOto=$userOto->retornaDados();
						$numeroGravado=$resOto->fic_tta_complementar;
						if($numeroGravado=="" || $numeroGravado=="0"):
						   $numeroGravado='1';
						else:   
						   $numeroGravado++;
						endif;	
		                //aqui vai salvar
	    				$sqlGravacao="update ficha set fic_tta_complementar='$numeroGravado' where fic_id=".$amostraLong;
						$generica=new tabelagenerica();
			            $generica->grava_registro_com_retorno($sqlGravacao);						
						//echo("fazVinculacaoReal   xxxxxcampoLong=$campoLong amostraLong=$amostraLong  nomeCampo =$nomeCampo sql=$sqlGravacao <br>");
					endif;//fecha o if que captura a ultima gravacao e grava a nova	

	
					

					
					
                
                endif;//final do isset de imprimir ficha convencional
				
                //ficha verso identificada por FV
				if (post('imprimefichaverso') !== ""):
                    echo '<iframe src="imprimefichaGERM.php" style="border:5px dotted red" width="100%" height="200"></iframe>';	 //funciona  
                endif;//final do isset de imprimir ficha

                //ficha VIRTUAL
				if (post('bt_imprimefichavirtual') !== ""):
				    $user = new tabeladeful();
					$user->extras_select =" where   cod_lab=".$idLabo ;
				    $user->selecionaTudo($user);
					$res = $user->retornaDados();
				    $modelo_ficha=$res->modelo_ficha_virtual;//opcao que sempre 
		
					
					
                    //a medida que vou acrescentando modelos vou incluindo aqui
	                if($modelo_ficha=='Integral'):				
		                echo '<iframe src="imprimeFichaVirtualPDF.php" style="border:5px dotted red" width="100%" height="200"></iframe>';	 //funciona  
				    endif;

	



					if($cliente=='IAGRO'):
					   $modelo_ficha="IAGRO_CG";
                       $sessao->setVar('controle1','VIRTUAL');
                       $sessaoLida=$sessao->getVar('controle1');
					endif;





					if($cliente=='IAGRODOU'):
					   $modelo_ficha="IAGRO_GENERICA";
                       $sessao->setVar('controle1','VIRTUAL');
                       $sessaoLida=$sessao->getVar('controle1');
					endif;



					if($cliente=='IRGA'):
					   $modelo_ficha="IRGA_GENERICA";
                       $sessao->setVar('controle1','VIRTUAL');
                       $sessaoLida=$sessao->getVar('controle1');
					endif;



					
					//if(substr($cliente,0,5)=='QUALI')$modelo_ficha='Qualiteste';
					echo("modelo=$modelo_ficha   sessaoLida=$sessaoLida<br>");	
	                if($modelo_ficha=='QualitesteV'):				
		                //echo '<iframe src="imprimeFichaVirtualQualiPur.php" style="border:5px dotted red" width="100%" height="200"></iframe>';	 //funciona  
		                echo '<iframe src="imprimeFichaVirtualQualiRQ05_RQ06.php" style="border:5px dotted red" width="100%" height="200"></iframe>';	 //funciona  
				    endif;	
					
					
							
	                if($modelo_ficha=='Tabajara'):				
		                echo '<iframe src="imprimeFichaVirtualTabajara.php" style="border:5px dotted red" width="100%" height="200"></iframe>';	 //funciona  
				    endif;	

	                if($modelo_ficha=='SEEDS-VIRTUAL'):	
						$amostraCorrente=post('amostra');
                        $sessao->setVar('inicio',$amostraCorrente);	//para voltar a impirmir uma so
                        $sessao->setVar('final',$amostraCorrente);	//para voltar a impirmir uma so 	
						$c1=$sessao->getVar('inicio');
						$c2=$sessao->getVar('final');
						
						echo("amostraCorrente= $amostraCorrente c1=$c1  c2=$c2<br>");
						
						
									
		                echo '<iframe src="imprimeFichaVirtualSEEDS.php" style="border:5px dotted red" width="100%" height="200"></iframe>';	 //funciona  
				    endif;	


					//aqui eu quero gerar um chassis a partir da ficha do tabajara para criar fichas com mais facilidade
					if($modelo_ficha=='TabaVirtualPadrao'):
					    
					    $amostraCorrente=post('amostra');
                        $sessao->setVar('inicio',$amostraCorrente);	//para voltar a impirmir uma so
                        $sessao->setVar('final',$amostraCorrente);	//para voltar a impirmir uma so 					
					    echo '<iframe src="imprimeFichaTabajaraPadrao.php" style="border:5px dotted red" width="100%" height="200"></iframe>';	 //funciona  
                    endif;


	                if($modelo_ficha=='ANALISAR'):				
		               //echo '<iframe src="imprimeFichaVirtualAnalisar.php" style="border:5px dotted red" width="100%" height="200"></iframe>';	 //nao mostra icone  impressora 
						echo '<iframe src="imprimeFichaVirtualAnalisar.php" style="border:0" width="150%" height="350"></iframe>';	 //funciona MOSTRA?
				    endif;	
	                if($modelo_ficha=='UFLA-VIRTUAL'):				
		                echo '<iframe src="imprimeFichaVirtualUFLA.php" style="border:5px dotted red" width="100%" height="200"></iframe>';	 //funciona  
				    endif;	
	                if($modelo_ficha=='VIGOR-VIRTUAL'):				
		                echo '<iframe src="imprimeFichaVirtualVIGOR.php" style="border:5px dotted red" width="100%" height="200"></iframe>';	 //funciona  
				    endif;	

	                if($modelo_ficha=='ADV-VIRTUAL'):				
		                echo '<iframe src="imprimeFichaVirtualADV.php" style="border:5px dotted red" width="100%" height="200"></iframe>';	 //funciona  
				    endif;	

                    if($modelo_ficha=='LASSUL-VIRTUAL'):				
		                echo '<iframe src="imprimeFichaVirtualLASSUL.php" style="border:5px dotted red" width="100%" height="200"></iframe>';	 //funciona  
				    endif;	
					
					if($modelo_ficha=='FIDENE'):				
		                echo '<iframe src="imprimeFichaVirtualFIDENE.php" style="border:5px dotted red" width="100%" height="200"></iframe>';	 //funciona  
				    endif;	
					
					
					//MODELO COM DUAS PAGINAS
					if($modelo_ficha=='LASSUL-VIRTUAL1'):				
					   echo '<iframe src="imprimeFichaVirtualLASSUL1.php" style="border:5px dotted red" width="100%" height="200"></iframe>';	 //funciona  
				    endif;	

	                if($modelo_ficha=='IAGRO_GENERICA'):				
		                echo '<iframe src="imprimeFichaIAGRO_GENERICA.php" style="border:5px dotted red" width="100%" height="200"></iframe>';	 //funciona  
				    endif;	

	                if($modelo_ficha=='IRGA_GENERICA'):		
			            $numeroSalvar=post('numeroOrdemFicha');
						$user = new amostras(array(
						'fic_preparo_dosn'=>$numeroSalvar,
						);
						$user->valorpk = $amostraLong;
						$user->extras_select = "WHERE   fic_id=$amostraLong";
						$user->atualizar($user);
		                echo '<iframe src="imprimeFichaIRGA_GENERICA.php" style="border:5px dotted red" width="100%" height="200"></iframe>';	 //funciona  
				    endif;	

	                if($modelo_ficha=='GERMINAR'):		
			            $numeroSalvar=post('numeroOrdemFicha');
						$user = new amostras(array(
						'fic_preparo_dosn'=>$numeroSalvar,
						);
						$user->valorpk = $amostraLong;
						$user->extras_select = "WHERE   fic_id=$amostraLong";
						$user->atualizar($user);
		                echo '<iframe src="imprimeFichaGERMINAR.php" style="border:5px dotted red" width="100%" height="200"></iframe>';	 //funciona  
						//echo '<iframe src="imprimefichaPMS.php" style="border:5px dotted red" width="100%" height="200"></iframe>';	 //funciona  
				    endif;	
					
					if($modelo_ficha=='UPF'):		
			            $numeroSalvar=post('numeroOrdemFicha');
						$user = new amostras(array(
						'fic_preparo_dosn'=>$numeroSalvar,
						);
						$user->valorpk = $amostraLong;
						$user->extras_select = "WHERE   fic_id=$amostraLong";
						$user->atualizar($user);
		                echo '<iframe src="imprimeFichaUPF.php" style="border:5px dotted red" width="100%" height="200"></iframe>';	 //funciona  
						//echo '<iframe src="imprimefichaPMS.php" style="border:5px dotted red" width="100%" height="200"></iframe>';	 //funciona  
				    endif;	




	                if($modelo_ficha=='SEMPRE-VIRTUAL'):				
		                echo '<iframe src="imprimeFichaVirtualSEMPRE.php" style="border:5px dotted red" width="100%" height="200"></iframe>';	 //funciona  
				    endif;	
	                if($modelo_ficha=='LACADOR-VIRTUAL'):
						$sessao->setVar('controle','xxxx');						
		                echo '<iframe src="imprimeFichaVirtualLacador.php" style="border:5px dotted red" width="100%" height="200"></iframe>';	 //funciona  
				    endif;	

	                if($modelo_ficha=='DIM-VIRTUAL'):				
		                echo '<iframe src="imprimeFichaVirtualDIMI.php" style="border:5px dotted red" width="100%"height="300"></iframe>';	 //funciona  
				    endif;	
	                if($modelo_ficha=='IRGA'):				
		                echo '<iframe src="imprimeFichaVirtualIRGA.php" style="border:5px dotted red" width="100%"height="300"></iframe>';	 //funciona  
				    endif;	



	                if($modelo_ficha=='TRISOLO-VIRTUAL'):				
		                echo '<iframe src="imprimeFichaVirtualTRISOLO.php" style="border:5px dotted red" width="100%"height="300"></iframe>';	 //funciona  
				    endif;	



	                if($modelo_ficha=='CONCEITO-VIRTUAL'):				
		                echo '<iframe src="imprimeFichaVirtualConceito.php" style="border:5px dotted red" width="100%" height="300"></iframe>';	 //funciona  
				    endif;	



					
					//vai gravar no campo fic_tta_complementar o numero da impressao da ficha ,isso para o cliente irga

					
					//echo("modeloficha171022=$modelo_ficha  sqlGravacao= $sqlGravacao cliente=$cliente<br>");	
					
					
                endif;//fim do isset da impressao de ficha virtual

				
				if (post('testesRealizar') !== ""):
                    //echo("Box testes a realizar<br>");
		            echo '<iframe src="testesRealizar.php" style="border:5px dotted red" width="110%" height="250"></iframe>';	 //funciona  
                endif;

				if (post('ligarLoteCampo') !== ""):
                    //echo("Box testes a realizar<br>");
		            echo '<iframe src="ligarLoteCampo.php" style="border:5px dotted red" width="110%" height="250"></iframe>';	 //funciona  
                endif;



				if (post('bt_etiquetas') !== ""):
                    //echo("Box testes a realizar<br>");
		            echo '<iframe src="etiquetas.php" style="border:5px dotted red" width="100%" height="250"></iframe>';	 //funciona  
                endif;
				if (post('bt_fecharGrupo') !== ""):
                    echo("Box fechar grupo");
		            echo '<iframe src="fecharGrupo.php" style="border:5px dotted red" width="100%" height="100"></iframe>';	 //funciona  
                endif;




				if (post('boxGerminacao') !== ""):
                    //echo("Box testes a realizar<br>");
		            echo '<iframe src="boxGerminacao.php" style="border:5px dotted red" width="110%" height="180"></iframe>';	 //funciona  
                endif;



                //a bre um box para trocar o numero da amostra
				if (post('bt_mudarNumero') !== ""):
                    echo("Box testes a realizar<br>");
		            //echo '<iframe src="mudarNumeroAmostra.php" style="border:5px dotted red" width="100%" height="180"></iframe>';	 //funciona  
                    print("<SCRIPT LANGUAGE='JavaScript'>
					window.open('mudarNumeroAmostra.php','','width=600, height=300, left=130, top=300');
					</script>");
                endif;

				if (post('bt_raioX') !== ""):
                    echo("Box testes a realizar<br>");
		            //echo '<iframe src="mudarNumeroAmostra.php" style="border:5px dotted red" width="100%" height="180"></iframe>';	 //funciona  
                    print("<SCRIPT LANGUAGE='JavaScript'>
					window.open('raioX.php','','width=880, height=500, left=50, top=20');
					</script>");
                endif;

					







				
				
########################################################################################################
				//amostras do enquadramnto previa passando para definitiva///////

				if (post('passadefinitiva') !== ""):
				    $numeroDigitado=post('numeroDigitado');
                    //vai capturar a ultima amostra das definitivas para acrecentr depois 1
                    if($numeroDigitado==""):
						$sqlultimo="select fic_amostra from ficha where fic_ano='".$anoAmostra."' && fic_labo='".$idLabo."' order by fic_amostra desc LIMIT 1";  //fucnciona perfeito
						$userOto=new amostras();
						$userOto->executaSQL($sqlultimo);
						$resOto=$userOto->retornaDados();
						$novaAmostra=$resOto->fic_amostra+1;
						$dt_entrada=date("Y-m-d");				
	                    //captura alguns dados da amostra corrente
	                    $amostraLong=$sessao->getVar('amostraLong');
	                    $rotuloBotao='Confirmar';
                    endif;     
                    //printMSG('Valor digitado=' . $numeroDigitado</a>');
					if($numeroDigitado>0):
						$userAmostra = new amostras();
	                    //vai gravar no campo fic_amostra o novo valor da amostra 
		                $sql="update ficha set fic_amostra='$numeroDigitado', fic_definitiva='S' where fic_id=".$amostraLong;
						$generica=new tabelagenerica();
		                $generica->grava_registro_com_retorno($sql);
                        printMSG('Passou para definitiva adquirindo o numero ' .$numeroDigitado.'</a>');
                    endif;

				endif;//final do isset para conversao de previa para definitiva
	///////////////////////////////////////////////////////////////////////////////////////////////////////////			
				$acesso="";
				

				if (post('bt_editarDados') !== ""):
				  //echo("1760 legendaFechada=$legendaFechada<br>");
				  if($legendaFechada!='Fechada')salvarDados2016($idLabo,$finalidade,$nomeOperador,$amostraLong);
				endif;

                //captura o status 
				 $userAmo9 = new amostras(); 
		  		 $userAmo9->extras_select = "WHERE fic_id=".$amostraLong;
		         $userAmo9->selecionaTudo($userAmo9);
		         $resAmo9 = $userAmo9->retornaDados();
		         $legendaFechada=$resAmo9->fic_vigor;
                 if($legendaFechada=="Fechada")$desabilita="Disabled";
				if($legendaFechada=='Fechada'):
                  printMSG('Atenção: Esta amostra está fechada, por isso nao pode editar dados. Para reabrir a amostra vai em MANUTENÇÃO-->REABRIR AMOSTRA, porém vai precisar da senha do administrador.','erro');
				endif;
              

				
				//coloca os campos na resultser userbd, para poder te-los na tela
			    //$sessao = new sessao();
			    $amostraLong=$sessao->getVar('amostraLong');
                //$userbd = new amostras();
				$pedacoAno=" fic_ano ='2016'";
                //$userbd->extras_select = "WHERE fic_id=$amostraLong";


                //esta que estava vou manter intacata
		     	$sqlSeletor="SELECT fic_vigor,fic_id,fic_lote,fic_safra,fic_amostra,fic_amostra_previa,fic_pagou,fic_custo,
				fic_produtor,fic_cultivar,fic_status_finalizada,fic_status_pago,fic_tta_complementar,fic_testes_realizar,
				fic_dt_amostragem,fic_dt_protocolo,fic_campo_string,fic_previsao,fic_tratamento,fic_beneficiada,fic_importacao,
				fic_dt_entrada,fic_procedencia,fic_validade,fic_outrascultivares,fic_categoria,fic_observacao,fic_aparelho,fic_balanca,
				fic_funcao,fic_repre_unid,fic_peneira,fic_registrador,fic_tta,fic_comprovante,fic_analise_reanalise,fic_preparo_dosn,
				prd_nome,amt_nome,prd_apelido,prd_municipio,prd_renasem,prd_uf,prd_telefone,ctv_nome,esp_nome
				from ficha f 
				LEFT join remetente r ON r.prd_id=f.fic_produtor 
				LEFT join cultivar c ON c.ctv_id=f.fic_cultivar 
				LEFT join especies e ON e.esp_id=c.ctv_especie 
				LEFT join amostrador a ON  a.amt_id=f.fic_amostrador 
				WHERE fic_id=".$amostraLong;	 
				
				 
		     	
				//se precisar mexer entao mexe aqui
				$sqlSeletor="SELECT fic_vigor,fic_id,fic_lote,fic_safra,fic_amostra,fic_amostra_previa,fic_pagou,fic_custo,
				fic_produtor,fic_cultivar,fic_status_finalizada,fic_status_pago,fic_tta_complementar,fic_testes_realizar,
				fic_dt_amostragem,fic_dt_protocolo,fic_campo_string,fic_previsao,fic_tratamento,fic_beneficiada,fic_importacao,
				fic_dt_entrada,fic_procedencia,fic_validade,fic_outrascultivares,fic_categoria,fic_observacao,fic_aparelho,fic_balanca,
				fic_funcao,fic_repre_unid,fic_peneira,fic_registrador,fic_tta,fic_comprovante,fic_analise_reanalise,fic_preparo_dosn,
				prd_nome,amt_nome,prd_apelido,prd_municipio,prd_renasem,prd_uf,prd_telefone,ctv_nome,esp_nome
				from ficha f  
				LEFT join remetente r ON r.prd_id=f.fic_produtor 
				LEFT join cultivar c ON c.ctv_id=f.fic_cultivar 
				LEFT join especies e ON e.esp_id=c.ctv_especie 
				LEFT join amostrador a ON  a.amt_id=f.fic_amostrador 
				WHERE fic_id=".$amostraLong;	  

//se precisar mexer entao mexe aqui

				$sqlSeletor="SELECT fic_vigor,fic_id,fic_lote,fic_safra,fic_amostra,fic_amostra_previa,fic_pagou,fic_custo,
				fic_produtor,fic_cultivar,fic_status_finalizada,fic_status_pago,fic_tta_complementar,fic_testes_realizar,
				fic_dt_amostragem,fic_dt_protocolo,fic_campo_string,fic_campo,fic_previsao,fic_tratamento,fic_beneficiada,fic_importacao,
				fic_dt_entrada,fic_procedencia,fic_validade,fic_outrascultivares,fic_categoria,fic_observacao,fic_aparelho,fic_balanca,
				fic_funcao,fic_repre_unid,fic_peneira,fic_registrador,fic_tta,fic_comprovante,fic_analise_reanalise,fic_preparo_dosn,
				prd_nome,amt_nome,prd_apelido,prd_municipio,prd_renasem,prd_uf,prd_telefone,ctv_nome,esp_nome,esp_min_pureza
				from ficha f 
				LEFT join remetente r ON r.prd_id=f.fic_produtor 
				LEFT join cultivar c ON c.ctv_id=f.fic_cultivar 
				LEFT join especies e ON e.esp_id=c.ctv_especie 
				LEFT join amostrador a ON a.amt_id=f.fic_amostrador  
				WHERE fic_id=".$amostraLong;	  
                //$amostraL=$sessao->getVar('amostraLong');

				
		 	$generica=new tabelagenerica();
	        $generica->extras_select =$sqlSeletor." limit 1000";
			
			 //echo("2197  zzzseletor de salvar alteracoes   $sqlSeletor   amostraL=$amostraL<br>");
			
			
			
			$generica->selecionaCamposEspecial($generica);
			//$contador=0;
	        //while ($resgenerica= $generica->retornaDados()):	
            $resbd = $generica->retornaDados();
			$opcaoFechada1= $resbd->fic_status_finalizada;	
			$opcaoStatusPago1= $resbd->fic_status_pago;	
			$opcaoStatusMateriaPrima1= $resbd->fic_tta_complementar;	
            $testesDestaAmostra2022=$resbd->fic_testes_realizar;
			//echo("1819 testesDestaAmostra2022=$testesDestaAmostra2022<br>");
			$sessao->setVar('controle4',$testesDestaAmostra2022);
			
			
			
			
			
			
			$testesDestaAmostra2022=$sessao->getVar('controle4');
			//echo("1821 testesDestaAmostra2022=$testesDestaAmostra2022<br>");
            //$sessao->SetVar('controle6',$resbd->fic_safra);
            //$safraFicha=$sessao->getVar('controle6');
    		//echo("1883 safraFicha=$safraFicha<br>");   


            ////////////////
			    $statusAnaliseDestaAmostra=$resbd->fic_analise_reanalise;
			    $categoria=$resbd->fic_categoria;
			    $idCultivar=$resbd->fic_cultivar;
			    $idProdutor=$resbd->fic_produtor;
			    $idAmostrador=$resbd->fic_amostrador;
			    $amostraDefinitiva=$resbd->fic_amostra;
			    $legendaFechada=   $resbd->fic_vigor;
				$campoLongFicha=$resbd->fic_campo;
				//se tem fic_amostra>0  e fic_apmostra_previa>o ele mostra esta dualidade num quadro 
				if($resbd->fic_amostra>0   && $resbd->fic_amostra_previa >0 ):
                   $legendaDualidade=  '    Amostra prévia='.$resbd->fic_amostra_previa . '    Amostra definitiva='.$resbd->fic_amostra;
 				endif;
                //representatividade
				if($resbd) $repre=$resbd->fic_repre_unid;							 
                list($r1,$r2,$r3,$r4)= explode(" ", $repre);
				if($finalidade=='DEFINITIVA'):
				    if($resbd->fic_amostra_previa>0) $rabicho=" Identica à amostra previa nº". $resbd->fic_amostra_previa;
			        $legendaAmostra="Amostra Nº " .$resbd->fic_amostra.' ( '.$finalidade.$rabicho. ' ) ';
				else:
			        $legendaAmostra="Amostra Nº " .$resbd->fic_amostra_previa.' ( '.$finalidade.' ) ';
				endif;
			    //PESQUISA SE O PESO DA REPRESENTATIVIDADE É MENOR QUE O PESO DA PUREZA
				$repreTon=1000000*$objetocalculo->emTones($repre); //chama a funcao que converte  
				$minimoPureza=1*$resbd->esp_min_pureza;
				//echo("2073 repreTon=$repreTon   minimoPureza=$minimoPureza  categoria= $categoria   statusAnaliseDestaAmostra=$statusAnaliseDestaAmostra<br>");
                if($repreTon<$minimoPureza && $statusAnaliseDestaAmostra!="3")	:
				    printMSG("Atenção: Evite uma desconformidade: O peso da amostra( " .$repreTon." g ) é menor que o peso mínimo para análise de pureza (".$minimoPureza."g) !",'erro');
				endif;			
				
				
				
               if($rotuloBotao=="")$rotuloBotao="Passa Definitiva";				
               //$custo=$objetocalculo->calculaCusto($amostraLong);
               //captura o numero do documento e o tipo
			   
			   
			   //ENTRA DE QUAKQUER MANEIRA
				$generica=new tabelagenerica();
				$generica->tabela="documentosponte,documentos,ficha";
				$generica->campos_valores = array(
					   "doc_numero" => NULL,
					   "doc_tipo" => NULL,
					   "dpo_documento_autonumerador" => NULL,
					   "dpo_amostra_vinculada" => NULL,
					   "fic_id" => NULL,
				);
				//$generica->extras_select =" where dpo_documento_autonumerador = doc_id and dpo_amostra_vinculada=fic_id &&  fic_id=".$amostraLong ." LIMIT 1";
				$generica->extras_select =" where dpo_documento_autonumerador = doc_id and dpo_amostra_vinculada=fic_id &&  fic_id=".$amostraLong ;
				$generica->selecionaCampos($generica);
                $variosDocss='';
				while ($resgenerica= $generica->retornaDados()):
 				   $tipoDoc=trim($resgenerica->doc_tipo);
	               $numeroDoc=$resgenerica->doc_numero;
                   if($tipoDoc!='preenchido')://isso aqui evita ele trazer registro que nao existem
                     $variosDocss=$variosDocss.$tipoDoc. " Nº" .$numeroDoc.' ';
                   endif; 
	            endwhile;  
				///////////captura o que tem no campo testes a realizar, desta amostra////////////////////////
				$userAmoTestes = new amostras();
				$userAmoTestes->extras_select = "WHERE fic_id=".$amostraLong;
				$userAmoTestes->selecionaTudo($userAmoTestes);
				while ($resAmoTestes = $userAmoTestes->retornaDados()):
				    $testesDestaAmostra=$resAmoTestes->fic_testes_realizar;
				endwhile;
				
				
                /////////////////////////////////////////////////////////////////////////////////////////////
				    
              
			//echo $resAssociadaRemetente->prd_nome;  
			$legendaRequerente=$sessao->getVar('controle2'); 
			//$legendaRequerente=$resAssociadaRemetente->prd_nome;
			echo("<h2>Reg. de ".$legendaAmostra."().$legendaRequerente. $legendaFechada </h2>");
			//CAPTURA DADOS DO CAMPO E TONELAGEM JA CERTIFICADA E TONELAGEM VINCULADA AO CAMPO
			//DADOS DO CAMPO (PLANTIO, NOME CAMPO,GLEBAS,MUNICIPIO)
			$generica2 = new tabelagenerica();
			//$generica2->extras_select ="select cpr_aprovada,cpr_data_plantio,cpr_numero_glebas, cpr_produziu,cpr_area, cpr_municipio,cpr_nome_do_campo, fic_campo from ficha,camposproducao where fic_campo=cpr_id and fic_id=". $amostraLong;
			$generica2->extras_select ="select cpr_aprovada, cpr_produziu,cpr_nome_do_campo,fic_repre_unid from ficha,camposproducao where fic_campo=cpr_id and cpr_id=". $campoLongFicha;

            $lotesVinculados=0;
			$toneladasVinculadas=0;
			$generica2->selecionaCamposEspecial($generica2);
			while ($resgenerica2= $generica2->retornaDados()):
                $lotesVinculados++;
				$repre=$resgenerica2->fic_repre_unid;
				$toneladas=$objetocalculo->emTones($repre); //chama a funcao que converte
				$toneladasVinculadas+=$toneladas;
			    //$campoLong=$resgenerica2->fic_campo;
				$nomeCampo=$resgenerica2->cpr_nome_do_campo;
				$produziu=$resgenerica2->cpr_produziu;
				$areaAprovada=$resgenerica2->cpr_aprovada;
				$areaCondenada=$areaCampo-$areaAprovada;
            endwhile;			
			//echo("2034 campoLong=$campoLong  campoLongFicha=$campoLongFicha lotesVinculados=$lotesVinculados toneladasVinculadas=$toneladasVinculadas<br> ");
			
			//$nomeEspecie=$resbd->esp_nome;
			//$pesoMinPureza=$resbd->esp_min_pureza;
			//echo("2144  nomeEspecie $nomeEspecie  pesoMinPureza= $pesoMinPureza<br> ");

            ?>
            <script type="text/javascript">
               $(document).ready(function(){
                   $(".userform").validate({
                       rules:{
                           nome:{required:true, minlength:3},
                           endereco:{required:true, endereco:true},
                       }
                   });
               });
           </script>
		   <form class="userform" method="POST" action="">
	  
		   
                <fieldset>
                    <legend>Mudar Requerente, Amostrador e cultivar/espécie</legend>
                  
					 <?php echo $acesso; ?>
                        <table bgcolor="#939ab0" width="1000">
                          <tr>
                            <td>
	                            <!--nem mostra o comando, se for produtor-->
							    <?php if($nivel!="PRODUTOR"):?>
								<input type="submit" name='bt_listaRemetente' <?php echo $desabilita; ?> value="Requerente(55)" />
 					            <input type="button" onclick="location.href='?m=remetentes&t=incluir'" value="Novo" />
								
								<?php
								$sessao->setVar('controle5',$resbd->prd_nome);


								endif;?>
                                <!--fim do controle para esconder o comando se for produtor-->	
								
								
								<input type="text"     size="33" name="remetente"  value="<?php  echo $resbd->prd_nome. $resAssociadaRemetente->prd_detalhe; ?>" />
							</td> 
		                    <td>
								
								<input type="submit" <?php echo $desabilita; ?> name='bt_listaAmostrador' value="Amostrador" />



					            <input type="button" onclick="location.href='?m=amostradores&t=incluir'" value="Novo" />
								<input type="text"     size="33" name="amostrador"  value="<?php  echo $resbd->amt_nome; ?>" />    
							</td>						  
						  </tr>	
						  	 				
                          <tr>
                            <td>
								<input type="submit" <?php echo $desabilita; ?> name='bt_listaCultivar' value="Cultivar(56)" />
								<!--nem mostra o comando, se for produtor-->
                                <?php if($nivel!="PRODUTOR"):?>
					            <input type="button" onclick="location.href='?m=cultivares&t=listaEspecies'" value="Nova" />
								<?php
								$sessao->setVar('controle8',$resbd->ctv_nome);
								$sessao->setVar('controle9',$resbd->fic_cultivar);


								endif;?>
                                <!--fim do controle para esconder o comando se for produtor-->	
								
								<input type="text"     size="33" name="cultivarx"  value="<?php  echo $resbd->ctv_nome; ?>"
							</td>   
		                    <td>
							    Espécie:<input type="text"     size="30" name="especie" disabled value="<?php  echo $resbd->esp_nome; ?>" /> 
							</td>  
						  </tr>		 				
						</table> 
					 </fieldset>	
					<fieldset>
					<legend>Dados do corpo desta tela</legend>	                       
						<table bgcolor="#afa6b3" width="1000">
                           <td><table>
						     <tr>
                                <td> <label1>Função:</label1></td>							 
                                <td> 
								 <select name="funcao" value="">  
							   	 <option><?php if($resbd) echo $resbd->fic_funcao; ?></option>
							   		<option>PRODUÇÃO</option>
							   		<option>FISCALIZAÇÃO</option>
							   		<option>CERTIFICAÇÃO</option>
							   		<option>REVALIDAÇÃO</option>
							   		<option>ANÁLISE INTERNA</option>
							   		<option>MONITORAR QUALIDADE</option>
							   		<option>REVALIDAR GERMINAÇÃO</option>
							   		<option>INTERLABORATORIAL</option>
							   		<option>INTRALABORATORIAL</option>
							   		<option>COMERCIALIZAÇÃO</option>
							   		<option>PRÉ – COMPRA</option>
							   		<option>FINI - ARMAZÉM</option>
							   		<option>FINI – DEVOLUÇÃO</option>
							   		<option>RECLAMAÇÃO</option>
							   		<option>PRÉVIAS</option>
							   		<option>PESQUISA</option>
							   		<option>REEMBALAGEM</option>
									
									
									
									
							     </select>
								</td>							 
                                <td> <label1>Categoria:</label1></td>							 
                                <td>
								 <select name="categoria" value="">  
							   	 <option><?php if($resbd) echo $resbd->fic_categoria; ?></option>
							   		<option>C1</option>
							   		<option>C2</option>
							   		<option>S1</option>
							   		<option>S2</option>
							   		<option>BASICA</option>
							   		<option>GENETICA</option>
                                    <?php
									if($cliente=='LIMAGRAIN'):
									?>
								    <option>GENETICA G1</option>  
								    <option>GENETICA G2</option>  
								    <option>GENETICA G3</option>  
									<?php endif;?>
									<option>SEMENTE PROPRIA</option>
    						   		<option>QUALIFICADA</option>
    						   		<option>TESTADA</option>
    						   		<option>IDENTIFICADA</option>
    						   		<option>SELECIONADA</option>
    						   		<option>CERTIFICADA</option>
							   		<option>-O-</option>
							     </select>
								 <!--novo campo analise/reanlis1-->
								 <?php
								 //statusa analise/reanalise
								 $valorStatusAnalise=$resbd->fic_analise_reanalise;
								 $statusAnalise1="";
				                 $statusAnalise2="";
				                 $statusAnalise3="";
				                 $statusAnalise4="";
				                 $statusAnalise5="";//revalidacao
				                 if($valorStatusAnalise=='4'):
				    				$statusAnalise4="checked"; 
                                 elseif($valorStatusAnalise=='3'):
								    $statusAnalise3="checked"; 								 
								 elseif($valorStatusAnalise=='5'):
										$statusAnalise5="checked"; 								 
								 elseif($valorStatusAnalise=='2'):
								    $statusAnalise2="checked"; 								 
								 else:
								    $statusAnalise1="checked"; 
								 endif;
								 
	
                                 //echo("statusAnalise1=$statusAnalise1  valorStatusAnalise=$valorStatusAnalise<br>");
								 //$statusAnalise2="checked";
								 
							 //echo("2246 cliente=$cliente<br> " );	 
							 if($cliente=="IRGA"):
								 ?>
								 Status:<input type="radio" name="statusAnalise" value="1"   <?php echo $statusAnalise1; ?>   >análise 
                                 <input type="radio" name="statusAnalise" value="2"   <?php echo $statusAnalise2; ?>   >reval.
                                 <input type="radio" name="statusAnalise" value="3"   <?php echo $statusAnalise3; ?>   >rebenef.
                                 <input type="radio" name="statusAnalise" value="4"   <?php echo $statusAnalise4; ?>   >reteste
                                 <?php
							 elseif($cliente=="QUALITESTE"):
								 ?>
								 Status:<input type="radio" name="statusAnalise" value="1"   <?php echo $statusAnalise1; ?>   >análise 
                                 <input type="radio" name="statusAnalise" value="2"   <?php echo $statusAnalise2; ?>   >reanálise
                                 <input type="radio" name="statusAnalise" value="3"   <?php echo $statusAnalise3; ?>   >Conferência
                                 <?php
							 elseif(substr($cliente,0,5)=="IAGRO"):
								 ?>
								 Status:<input type="radio" name="statusAnalise" value="1"   <?php echo $statusAnalise1; ?>   >análise 
                                 <input type="radio" name="statusAnalise" value="2"   <?php echo $statusAnalise2; ?>   >reanálise
                                 <input type="radio" name="statusAnalise" value="3"   <?php echo $statusAnalise3; ?>   >reanálise fiscal
                                 <?php
							 elseif($cliente=="SEMPRE"):
								?>
								Status:
								<input type="radio" name="statusAnalise" value="1"   <?php echo $statusAnalise1; ?>   >análise 
								<input type="radio" name="statusAnalise" value="5"   <?php echo $statusAnalise5; ?>   >revalidação

								<?php



  							 else:
								 ?>
								 Status:<input type="radio" name="statusAnalise" value="1"   <?php echo $statusAnalise1; ?>   >análise 
                                 <input type="radio" name="statusAnalise" value="2"   <?php echo $statusAnalise2; ?>   >reanálise
                                 <?php
							 endif;//pergunta se cliente é o irga
							 ?>										
								 </td>							 
							 </tr> 
						     <tr>
                                <td> <label1>Importação.:</label1></td>							 
                                <td> <input type="text" size="20"  maxlength="40" name="importacao" value="<?php if($resbd) echo $resbd->fic_importacao; ?>" /></td>							 
                                <td> <label1>Represent.:</label1></td>
                                <td>
                                <input type="text" size="5" name="r1" maxlength="10" value="<?php echo $r1; ?>" />							 
								 <select name="r2" value="">  
							   	 <option><?php echo $r2; ?></option>
							   		<option>bag</option>
							   		<option>sc</option>
							   		<option>t</option>
							   		<option>kg</option>
							   		<option>g</option>
							   		<option>lata</option>
							   		<option>Pacotes</option>
                                    <option>balde</option>
							   		<option>env</option>
							   		<option>Pelets</option>
							   		<option>Pelotas</option>
							   		<option>Sementes</option>
							   		<option>Envelopes</option>
							   		<option>pouches</option>
							   		<option>-O-</option>
							     </select>
                                <input type="text" size="5" maxlength="8" name="r3" value="<?php echo $r3; ?>" />							 
								 <select name="r4" value="">  
							   	 <option><?php echo $r4; ?></option>
							   		<option>kg</option>
							   		<option>t</option>
							   		<option>g</option>
							   		<option>-O-</option>
							   		<option>sementes</option>
									<option>Pelets</option>
									<option>Pelotas</option>
							     </select>
                                 <?php  echo $repreTon; ?>  

								 </td>							 
							 </tr> 
						     <tr>
                                <td> <label1>Safra:</label1></td>							 
                                <td>
								 <select name="safra" value="">  
							   	 <option><?php if($resbd) echo $resbd->fic_safra; ?></option>
                                    <?php
    
									
									
									if($cliente=='LIMAGRAIN'):
									?>
								 	<option>2022-V</option>
								 	<option>2022-I</option>
								 	<option>2021-I</option>
								 	<option>2020-I</option>
									<?php endif;?>
								 	<option>2027/2027</option>
								 	<option>2026/2027</option>
								 	<option>2025/2026</option>
								 	<option>2025/2025</option>
								 	<option>2024/2025</option>
								 	<option>2024/2024</option>
								 	<option>2023/2024</option>
								 	<option>2025/2025</option>
								 	<option>2024/2025</option>
								 	<option>2024/2024</option>
								 	<option>2023/2024</option>
								 	<option>2025/2025</option>
								 	<option>2024/2025</option>
								 	<option>2024/2024</option>
								 	<option>2023/2024</option>
								 	<option>2025/2025</option>
								 	<option>2024/2025</option>
								 	<option>2024/2024</option>
								 	<option>2023/2024</option>
								 	<option>2023/2023</option>
								 	<option>2022/2023</option>
								 	<option>2022/2022</option>
								 	<option>2021/2022</option>
								 	<option>2021/2021</option>
								  	<option>2020/2021</option>
								 	<option>2020/2020</option>
								 	<option>2019/2020</option>
								 	<option>2019/2019</option>
							   		<option>2018/2019</option>
							   		<option>2018/2018</option>
							   		<option>2017/2018</option>
							   		<option>2017/2017</option>
							   		<option>2016/2017</option>
							   		<option>2016/2016</option>
							   		<option>2015/2016</option>
							   		<option>2015/2015</option>
							   		<option>2014/2015</option>
							   		<option>2014/2014</option>
							   		<option>2013/2014</option>
							   		<option>2013/2013</option>
							   		<option>2012/2013</option>   
							   		<option>2012/2012</option>
							   		<option>2011/2012</option>
							   		<option>2011/2011</option>
							   		<option>2010/2011</option>
							   		<option>2010/2010</option>
							   		<option>2009/2010</option>
							   		<option>2009/2009</option>
							   		<option>2008/2009</option>
							   		<option>2008/2008</option>
							   		<option>2007/2008</option>
							   		<option>2007/2007</option>
							   		<option>2006/2007</option>
							   		<option>2006/2006</option>
							   		<option>2005/2006</option>
							   		<option>2005/2005</option>
							   		<option>2004/2005</option>
							   		<option>2004/2004</option>
							   		<option>2003/2004</option>
							   		<option>2003/2003</option>
							   		<option>2002/2003</option>
							   		<option>2002/2002</option>
							   		<option>2001/2002</option>
							   		<option>2001/2001</option>
							   		<option>2000/2001</option>
							   		<option>2000/2000</option>
							   		<option>1999/2000</option>
							   		<option>1999/1999</option>
							   		<option>1998/1999</option>
							   		<option>1998/1998</option>
							   		<option>1997/1998</option>
							   		<option>1997/1997</option>
							   		<option>1996/1997</option>
							   		<option>1996/1996</option>
							   		<option>1995/1996</option>
							   		<option>1995/1995</option>

							   		<option>-O-</option>
							     </select>
								 </td>							 
                                <td> <label1>Procedência:</label1></td>							 <!--aqui comeca procedenciatradicional-->
                                <td> <input type="text" size="20"  maxlength="50" name="procedencia" value="<?php if($resbd) echo $resbd->fic_procedencia; ?>" />
								
						 <!--aquitermina  procedencia tradicional-->
						 
	
						 <!--aqui comeca validade  tradicional-->		
						 <?php
						 if($cliente!='LIMAGRAIN'):
						 ?>		
								Validade: <input type="text" size="15"  maxlength="20" name="validade" value="<?php if($resbd) echo $resbd->fic_validade; ?>" />
                         <?php                         
						 else: 						 
						 ?> 
								
							 <!--aquitermina validade  tradicional-->	
								
							 <!--aqui validade para limagrain-->
							 Validade:
								 <select name="validade" value="">  
							   	 <option><?php if($resbd) echo $resbd->fic_validade; ?></option>
								 	<option>Janeiro/2022</option>
								 	<option>Fevereiro/2022</option>
								 	<option>Março/2022</option>
								 	<option>Abril/2022</option>
								 	<option>Maio/2022</option>
								 	<option>Junho/2022</option>
								 	<option>Julho/2022</option>
								 	<option>Agosto/2022</option>
								 	<option>Setembro/2022</option>
								 	<option>Outubro/2022</option>
								 	<option>Novembro/2022</option>
								 	<option>Dezembro/2022</option>
								 	<option>Janeiro/2023</option>
								 	<option>Fevereiro/2023</option>
								 	<option>Março/2023</option>
								 	<option>Abril/2023</option>
								 	<option>Maio/2023</option>
								 	<option>Junho/2023</option>
								 	<option>Julho/2023</option>
								 	<option>Agosto/2023</option>
								 	<option>Setembro/2023</option>
								 	<option>Outubro/2023</option>
								 	<option>Novembro/2023</option>
								 	<option>Dezembro/2023</option>
								 	<option>Janeiro/2024</option>
								 	<option>Fevereiro/2024</option>
								 	<option>Março/2024</option>
								 	<option>Abril/2024</option>
								 	<option>Maio/2024</option>
								 	<option>Junho/2024</option>
								 	<option>Julho/2024</option>
								 	<option>Agosto/2024</option>
								 	<option>Setembro/2024</option>
								 	<option>Outubro/2024</option>
								 	<option>Novembro/2024</option>
								 	<option>Dezembro/2024</option>
							   		<option>-O-</option>
							     </select>						 
						 <!--aqui termina validade para limagrain-->			
			                     <?php 			 
						         endif;		
								 ?>
								</td>							 
							 </tr> 
						     <tr>
							    <!-- AQUI VOU COLOCAR DOIIS CAMPOS  -->
                                <td>
								<?php
								$rotuloCEA="CEA";
								if(substr($cliente,0,5)=="IAGRO") $rotuloCEA= 'TCA';
								?>:
								<label1><?php  echo $rotuloCEA;?>:</label1>
								</td>							 
                                <td> 
								    <input type="text" size="10"  maxlength="20" name="tta" value="<?php if($resbd) echo $resbd->fic_tta; ?>" />
									
								</td>							 
                                <td> <label1>Campo:</label1></td>							 
                                <td> <input type="text" size="20" name="campo" value="<?php if($resbd) echo $resbd->fic_campo_string; ?>" />
								<?php if($cliente=='IRGA'):?>
								<font color=red>Produziu:<?php echo $produziu.'t'. ' Toneladas vinculadas='.$toneladasVinculadas.'t';?></font>
								<?php endif;?>
								</td>
							 </tr> 

							 </tr> 
						     <tr>
							    <!-- AQUI VOU COLOCAR DOIIS CAMPOS  -->
                                <td>
								<label1>Peso:</label1>
								</td>							 
                                <td> 
								    <input type="text" size="3"  maxlength="10" name="peso" value="<?php if($resbd) echo $resbd->fic_aparelho; ?>" />
            						Balança:
								    <input type="text" size="5"  maxlength="15" name="balanca" value="<?php if($resbd) echo $resbd->fic_balanca; ?>" />


								</td>

								<td>
								<label1>Tratamento:</label1>
								</td>
								
								
                                <td> 
                                <?php
								if($cliente=="RICETEC"):
					                $user = new kittratamento();
									$user->extras_select = "WHERE kit_labo=$idLabo order by kit_sigla ";
					                $user->selecionaTudo($user);
					                ?><select name="tratamento"><option><?php  
									echo $resbd->fic_tratamento."</option>";
									echo "<option>-O-</option>";
									while ($res = $user->retornaDados()):
									    echo "<option>".$res->kit_sigla."</option>";
					                endwhile;  
								?>
								</select>
                                <?php else:?> 
								<input type="text" size="40"  maxlength="50" name="tratamento" value="<?php if($resbd) echo $resbd->fic_tratamento; ?>" />
                                <?php 
								endif;
								$valorBene=$resbd->fic_beneficiada;
								$chequeAssinado1="";
				                $chequeAssinado2="";
				                if($valorBene=='S')
								{
				    				$chequeAssinado1="checked"; 
								}
								else
								{
				    				$chequeAssinado2="checked"; 
								}
   
								?> 
										
								
              					Benef.<input type="radio" name="beneficiada" value="S"   <?php echo $chequeAssinado1; ?>   >Sim 
                                     <input type="radio" name="beneficiada" value="N"    <?php echo $chequeAssinado2; ?>   >Não
              					
								                                       
								</td>
								
							 </tr> 
						   
						   </table></td>
 
                           <td> <table bgcolor="silver">
						     <tr>
                                <td> <label2>Dt Entrada:</label2></td>							 
                                <td> <input type="text" size="8"  maxlength="10" name="dt_entrada" value="<?php if($resbd) echo date("d/m/Y",strtotime($resbd->fic_dt_entrada); ?>" />                                </td>							 
							 </tr> 
						     <tr>
                                <td> <label2>Dt Protocolo:</label2></td>							 
                                <td> <input type="text" size="8" maxlength="10" name="dt_protocolo" value="<?php if($resbd) echo $resbd->fic_dt_protocolo; ?>" /></td>							 
							 </tr> 
						     <tr>
                                <td> <label2>dt_amostragem:</label2></td>							 
                                <td> <input type="text" size="8" maxlength="10" name="dt_amostragem" value="<?php if($resbd) echo $resbd->fic_dt_amostragem; ?>" /></td>							 
							 </tr> 
						     <tr>
                                <td> <label1>Previsão:</label1></td>							 
                                <td> <input type="text" size="7" name="previsao" maxlength="10" value="<?php if($resbd) echo $resbd->fic_previsao; ?>" /></td>								               		 </tr> 
						     <tr>
                                <td> <label1>Peneira:</label1></td>							 
                                <td> <input type="text" size="7" name="peneira" maxlength="10" value="<?php if($resbd) echo $resbd->fic_peneira; ?>" /></td>							 
							 </tr> 



						   
						   </table></td>
						</table>
						
						<table bgcolor="#d7d2d9" width="880">
                            <td><label2>Observações:</label2></td>							 
                            <td> <input type="text" size="80" name="observacao" maxlength="150" value="<?php if($resbd) echo $resbd->fic_observacao; ?>" /></td>
                            <td><label2>Registrador:</label2></td>							 
                            <td> <input type="text" size="10" name="registrador" maxlength="10" value="<?php if($resbd) echo $resbd->fic_registrador; ?>" /></td>
                        </table>
						</fieldset>
						
						
						

						<table bgcolor="#bfb8c2" width="1000">
						    <td>Outros controles: Custo:<?php echo $resbd->fic_custo;  ?></td>							 
                            <!--SEÉ TABAJARA ENTAO VAI ESTE TREM DE  PAGO NAO PAGO-->
					     	<?php
							if(substr($cliente,0,2)=="TS"):
							?>

                            <td>Informado pagamento: 
								 <?php echo $resbd->fic_pagou;?>
							</td>
							
							<td>					
								<input type="submit" name="bt_raioX" value="Raio X" />
							</td>
					     	<?php
							endif;//PERGUNTA SE É TABAJAR
							?>

						
						
						    <td>Documento:<?php echo $variosDocss;?></td>	
							<!--CRIA PAGO/NAO PAGO   DO TABAJ-->
							<!--SE O CLIENTE É TABAJARA VAI ESCONDE STATUS FINALIZADA E STATUS FOI PAGO-->				 
					     	<?php
							if(substr($cliente,0,2)!="TS"):
							?>
                            <td>Status Finalizada: 
								 <select name="statusFinalizada" value="">  
								   	<option><?php if($resbd) echo $resbd->fic_status_finalizada; ?></option>
							   		<option>SIM</option>
							   		<option>NAO</option>
								    </select>
								 </select>
							</td>

                            <td>Status FOI PAGO: 
								 <select name="statusPagamento" value="">  
								   	<option><?php if($resbd) echo $resbd->fic_status_pago; ?></option>
							   		<option>SIM</option>
							   		<option>NAO</option>
								 </select>
							</td>

					     	<?php
							endif;//PERGUNTA SE É TABAJAR
							?>

                        
							<!--FIM DO PAGO NAO PAGO//-->						 
                            <td>x</td>							 
		 
                        </table>


                        <fieldset>
						<legend>Painel de controle geral<?php echo $legendaDualidade ."  Testes marcados desta amostra:".$testesDestaAmostra ; ?>         </legend>
	                       <table width="1000" bgcolor="#b1d2dc">
                           <tr>
                             <td><label3>Lote:</label3></td><td><input type="text" maxlength="30"    size="15" name="lote" autofocus="autofocus" value="<?php if($resbd) echo $resbd->fic_lote; ?>" /></td>
							 <td bgcolor="yellow"><label3>Amostra:</label3></td>
							 <?php
						     $sessao->setVar('controle3',$resbd->fic_lote);
						     $sessao->setVar('controle10',$resbd->fic_safra);
						     $sessao->setVar('controle7',$resbd->fic_categoria);
							 $safraoto=$sessao->getVar('controle10');
						     //echo("2452 safraoto=$safraoto<br>");//leu npormal
							 
							 
							 
							 if($finalidade=="DEFINITIVA"):
    							
	                             ?>
								  <td> <b> <input type="text" size="1"  maxlength="5" name="amostra" value="<?php if($resbd) echo $resbd->fic_amostra; ?>" />/<?php echo $anoAmostra; ?></b>
								 <?php						 
							 else:
    						
							     ?>
								  <td> <b> <input type="text" size="1"  maxlength="5" name="amostra" value="<?php if($resbd) echo $resbd->fic_amostra_previa; ?>" />/<?php echo $anoAmostra; ?></b>
							     <?php
							 endif;
							 
							 //$anoAmostra
							 
							 ?>
	
						     <input type="submit" name="acharDigitada" value="<--Achar" />
							 <input type="button" onclick="location.href='?m=amostras_2&t=buscar'" value="Buscar" />
						     <input type="submit" name="acharRecua" value="<" />
						     <input type="submit" name="acharAvanca" value=">" />
						     <input type="submit" name="acharUltima" value=">|" />
							 <?php 
							    //echo("xxxxxxxxxxxxxxxxxxxxxopcaoFechada1= $opcaoFechada1  <br>"); 
							    if($opcaoFechada1!='SIM'):
								    ?>
 							        <input type="submit" name="bt_editarDados" alt="xxxxx" value="Salvar Alterações" />
									<?php
								endif;//
							 ?>
						     <input type="submit" name="bt_incluir" value="Incluir/Copiar" />
							 <!--nem mostra o comando, se for produtor-->
                             <?php if($nivel!="PRODUTOR"):?>
						     <input type="submit" name="bt_incluirBranca" value="Incluir/Branca" />
							 <?php endif;?>
                             <!--fim do controle para esconder o comando se for produtor-->	

							 </td>						   
						   </tr>						
						</table>
					     
                        <table  bgcolor="#68a8bb"  ><tr><td>
						    <?php 
							//examina se a finalidade é previa e se aquela amostra ainda nao é definitiva
							if($finalidade=='PREVIA' && $resbd->fic_amostra==0):
								?> <input type="text"  name="numeroDigitado" size="3"	value="<?php echo $novaAmostra;?>" /> 				
							    <input type="submit" name="passadefinitiva" value="<?php echo $rotuloBotao;?>" />  <?php

						    endif;  
							?>
							
						    <input type="submit" name="testesRealizar" <?php echo $desabilita; ?> value="Testes a realizar" />
							<?php
							if($cliente=='IRGA'):
							?>
							   <input type="text"  name="numeroOrdemFicha" size="1"	value="<?php if($resbd) echo $resbd->fic_preparo_dosn; ?>" /> 
							<?php   				
							endif;
							?>
						    <input type="submit" name="bt_imprimefichaTradicional" value="<?php echo $legendaBotaoFicha;?>" /> <!-- BOTAO FICHA-->
							<!--nem mostra o comando, se for produtor-->
                            <?php if($nivel!="PRODUTOR"):?>
						    <input type="submit" name="bt_imprimeFichaTZ2020" value="TZ" />
						    <input type="submit" name="bt_imprimeFichaVerso2020" value="<?php echo $legendaBotaoOutra;?>" /> <!--BOTAO OUTRA-->
						    <input type="submit" name="bt_imprimefichavirtual" value="Virtualx" />
							<?php endif;?>
                            <!--fim do controle para esconder o comando se for produtor-->	

							
							
						    <?php if($finalidade=='PREVIA'):
							    ?>
							    <input type="submit" name="alternar" value="Acessar definitivas" />
							    <?php
                            else:  
                                ?>
						        <input type="submit" name="alternar" value="Acessar previas" />
						        B1<input type="text"  size="3" name="cod_barra1" value=""   onchange="chama()" />
						        B2<input type="text"  size="3" name="cod_barra2" value=""   onchange="location.href='?m=amostras_2&t=capturarBarra'" />
								<!--nem mostra o comando, se for produtor-->
                                <?php if($nivel!="PRODUTOR"):?>
								<input type="submit" name="boxGerminacao" value="Box germinação" />
								<input type="button" onclick="location.href='?m=comprovrecebimento&t=datas'" value="Comprovante" />
								<?php endif;?>
                                <!--fim do controle para esconder o comando se for produtor-->	
							
								<?php
							endif;  
							?>
						</td>	
						</tr> 
						</table>	
                        <table width="1000" bgcolor="#7eb5c5">
						
						    <tr><td>
							
							
							<!--nem mostra o comando, se for produtor-->
                            <?php if($nivel!="PRODUTOR"):
							//$amostraLong=234;
							?>
							
							<input type="checkbox"  name="branco" />Ficha em branco
							<input type="submit" name="deletar" <?php echo $desabilita; ?> value="Excluir esta amostra" />SIM
							<input type="checkbox"   name="cb_deletar" />
							<input type="submit" <?php echo $desabilita; ?> name="bt_mudarNumero" value="Mudar número da amostra" />
							<input type="button" onclick="location.href='?m=amostras_2&t=listagemAmostras'" value="Listagem." /> 
							<input type="submit" name="bt_barcode" value="Cód Barras(T)" />
							<input type="submit" name="bt_etiquetas" value="Etiq." />
							<input type="submit" name="manual" value="Ajuda" /><?php echo $amostraLong;?>
							
							<?php if($amostraLong<1):
							
                            $legendaBotaoAnoNovo='Ano NOVO';
							?>
							<input type="submit" name="bt_anoNovo" value="<?php echo $legendaBotaoAnoNovo;?>" />
							<?php endif;
							?>



							<?php endif;?>
							<!--fim do controle para esconder o comando se for produtor-->	
							
							</td></tr> 
						    <tr>
							<td>
							<!--nem mostra o comando, se for produtor-->
                            <?php if($nivel!="PRODUTOR"):?>
							<input type="submit" name="bt_fechar" value="Fechar esta amostra" />Fechar SIM 
							<input type="checkbox"   name="cb_fechar" />
							<input type="submit" name="bt_fecharGrupo" value="FG" />
							<input type="button" onclick="location.href='?m=amostras_2&t=listagemCampos'" value="Vincular este LOTE a um campo." /> 
							<input type="button" onclick="location.href='?m=amplo2023&t=registroAmostra'" value="Versão 2023" />
							<input type="submit" name="bt_aleatoria" value="Incluir aleatória" />
						    <input type="text"  size="3" name="amostraAleatoria" value="<?php echo $amostraAleatoria;?>" maxlength="5" />

							<?php endif;?>
							<!--fim do controle para esconder o comando se for produtor-->	
							<!--vai para outra tela-->
							<?php
							if($cliente=='QUALITESTE'):
							//echo "achou";
							
							?>
							<input type="submit" name="bt_RQ5_RQ6" value="RQ5/RQ6" />
							<input type="submit" name="bt_RQ7" value="RQ7" />
					        <?php
							endif;
							
							?>
							</td>

							
							
							
							</tr> 
						</table>
                 </fieldset>
 


               
				<script>
function chama(){
	
	//window.open("amostras.php")
	alert("ola agora sem abrir pagina form amostra   disparando evento chama")
		
}
</script>
				
				
            </form>
        <?php
 
    break;
    
	case 'listagemAmostras':
       //echo "esta em listaem"; 
	   $anoPesquisado=post('anoPesquisado');
	   if($anoPesquisado=="")$anoPesquisado=$anoCorrente;



	   $pedacoAno=$sessao->getVar('pedacoAno');  
	   $pedacos=$sessao->getVar('controle1');  
	   $pedacoAno=" fic_ano=" .$anoCorrente ." ";
       $pedacos=" and fic_produtor=".$idProdutor . " limit 100";	
	   $mensagemListagem="A listagem que aparece na visualização inicial, são as amostras do requerente que estava na tela. Existem comandos para buscar outros conjuntos de amostras. Se clicar no link CANETINHA, o sistema reabre a tela anterior exatamente naquela amostra. ";
	   
	      
	   if(post('esteRequerente') !== ""):
           //echo "esta em este produtor"	;   
	   
	   endif;
	   if(post('bt_ultimas100') !== ""):
           //echo "esta em lista100";	   
	       $pedacoAno=" fic_ano=" .$anoCorrente ." ";
	       $pedacos=" order by fic_amostra desc LIMIT 10"; 
	       //$pedacos=" order by fic_amostra desc"; 
		   $mensagemListagem="A listagem que aparece esta limitada em 100 últimas amostras. Existem comandos para buscar outros conjuntos de amostras. Se clicar no link CANETINHA, o sistema reabre a tela anterior exatamente naquela amostra. ";
	   endif;

	   if(post('bt_pesquisaNumero') !== ""):
           //echo "esta em pesquisa numero";	   
	       $pedacoAno=" fic_ano=" .$anoCorrente ." ";
		   $amostraDe=post('amostraDe');
		   $amostraAte=post('amostraAte');
	       $pedacos=" and fic_amostra>=".$amostraDe." and fic_amostra<=".$amostraAte." order by fic_amostra desc LIMIT 10"; 
	       //$pedacos=" order by fic_amostra desc"; 
		   $mensagemListagem="A listagem que aparece esta limitada em 100 últimas amostras. Existem comandos para buscar outros conjuntos de amostras. Se clicar no link CANETINHA, o sistema reabre a tela anterior exatamente naquela amostra. ";
	   endif;



	   
	   if(post('bt_algumasLetrasRequerente') !== ""):
           //echo "esta em lista100";	
		   $letrinhas='%'.post('letrinhasRequerente').'%';   
		   $letrinhasDig='[ '.post('letrinhasRequerente').' ]';   
		   $letrinhasDigRequerenteLiteral=post('letrinhasRequerente');   
	       $pedacoAno=" fic_ano=" .$anoPesquisado ." ";
	       $pedacos=" and  prd_nome like '$letrinhas'   order by fic_amostra desc LIMIT 10"; 
	       //$pedacos=" and  prd_id =  23273  order by fic_amostra desc LIMIT 100"; 
	       //$pedacos=" order by fic_amostra desc"; 
		   $mensagemListagem="A listagem que aparece mostra as amostras do(s) requerente(s) que começa(m) por ". $letrinhasDig. ".  Existem comandos para buscar outros conjuntos de amostras. Se clicar no link CANETINHA, o sistema reabre a tela anterior exatamente naquela amostra. ";
	   endif;

	   if(post('bt_algumasLetrasEspecie') !== ""):
           //echo "esta em lista100";	
		   $letrinhasEspecie='%'.post('letrinhasEspecie').'%';   
		   $letrinhasDigEspecie='[ '.post('letrinhasEspecie').' ]';   
		   $letrinhasDigEspecieLiteral=post('letrinhasEspecie');   
	       $pedacoAno=" fic_ano=" .$anoCorrente ." ";
	       $pedacos=" and  esp_nome like '$letrinhasEspecie'   order by fic_amostra desc LIMIT 100"; 
	       //$pedacos=" order by fic_amostra desc"; 
		   $mensagemListagem="A listagem que aparece mostra as amostras da(s) especies(s) que começa(m) por ". $letrinhasDigEspecie. ".  Existem comandos para buscar outros conjuntos de amostras. Se clicar no link CANETINHA, o sistema reabre a tela anterior exatamente naquela amostra. ";
	   endif;

	   if(post('bt_algumasLetrasCultivar') !== ""):
           //echo "esta em lista100";	
		   $letrinhasCultivar='%'.post('letrinhasCultivar').'%';   
		   $letrinhasDigCultivar='[ '.post('letrinhasCultivar').' ]';   
		   $letrinhasDigCultivarLiteral=post('letrinhasCultivar');   
	       $pedacoAno=" fic_ano=" .$anoCorrente ." ";
	       $pedacos=" and  ctv_nome like '$letrinhasCultivar'  order by fic_amostra desc LIMIT 100"; 
	       //$pedacos=" order by fic_amostra desc"; 
		   $mensagemListagem="A listagem que aparece mostra as amostras da(s) cultivar(res) que começa(m) por ". $letrinhasDigCultivar. ".  Existem comandos para buscar outros conjuntos de amostras. Se clicar no link CANETINHA, o sistema reabre a tela anterior exatamente naquela amostra. ";
	   endif;

	   if(post('bt_acharInforme') !== ""):
           $modoInforme="SIM"; 
           echo "esta em listainforme";	
		   $acharInforme=post('acharInforme');
           $pedacoDocumento="  and doc_tipo='Informe' and doc_numero=".$acharInforme;		    
	       $pedacoAno=" fic_ano=" .$anoCorrente ." ";
		   $mensagemListagem="A listagem que aparece mostra as amostras que estoa no informe ". $letrinhasDig. ".  Existem comandos para buscar outros conjuntos de amostras. Se clicar no link CANETINHA, o sistema reabre a tela anterior exatamente naquela amostra. ";
	   endif;

	   if(post('bt_acharBoletim') !== ""):
           $modoBoletim="SIM"; 
           echo "esta em lista boletim";	
		   $acharBoletim=post('acharBoletim'); 
           $pedacoDocumento=" and doc_tipo='Boletim' and doc_numero=".$acharBoletim ;		    
	       $pedacoAno=" fic_ano=" .$anoCorrente ." ";
		   $mensagemListagem="A listagem que aparece mostra as amostras que estoa no informe ". $letrinhasDig. ".  Existem comandos para buscar outros conjuntos de amostras. Se clicar no link CANETINHA, o sistema reabre a tela anterior exatamente naquela amostra. ";
	   endif;



	   if(post('bt_acharLote') !== ""):
           //echo "esta em lista100";	
		   $acharLote='%'.post('acharLote').'%';   
		   $letrinhasLoteDig='[ '.post('acharLote').' ]';   
	       $pedacoAno=" fic_ano=" .$anoCorrente ." ";
		   $letrinhasDigLoteLiteral=post('acharLote');   
	       $pedacos=" and  fic_lote like '$acharLote'   order by fic_amostra desc LIMIT 100"; 
	       //$pedacos=" order by fic_amostra desc"; 
		   $mensagemListagem="A listagem que aparece mostra as amostras do(s) requerente(s) que começa(m) por ". $letrinhasDig. ".  Existem comandos para buscar outros conjuntos de amostras. Se clicar no link CANETINHA, o sistema reabre a tela anterior exatamente naquela amostra. ";
		   //echo("pedacosxxx=$pedacos   acharLote $acharLote<br>"); 
	   endif;
	   
	//aqui monta a sql 
	//caso a BUSCA SEJA POR DOUCMENTO INFORME OU BOLETIM
	if($modoInforme=="SIM" || $modoBoletim=='SIM'):
	   if($finalidade=="PREVIA"):
         $sqlSeletor="select doc_tipo, doc_numero, fic_id,fic_lote,fic_amostra_previa, esp_nome,ctv_nome,fic_dt_entrada,prd_nome  from cultivar,ficha,remetente,especies,documentosponte,documentos	where  dpo_documento_autonumerador=doc_id AND   dpo_amostra_vinculada=fic_id " . $pedacoDocumento. " and  fic_definitiva='S' and  fic_labo=".$idLabo." AND  prd_id=fic_produtor AND  ctv_id=fic_cultivar AND  ctv_especie=esp_id and ".$pedacoAno.$pedacos;	    
	   else:
         $sqlSeletor="select doc_tipo, doc_numero, fic_id,fic_lote,fic_amostra,        esp_nome,ctv_nome,fic_dt_entrada,prd_nome  from cultivar,ficha,remetente,especies,documentosponte,documentos	where  dpo_documento_autonumerador=doc_id AND   dpo_amostra_vinculada=fic_id " . $pedacoDocumento. " and  fic_definitiva='S' and  fic_labo=".$idLabo." AND  prd_id=fic_produtor AND  ctv_id=fic_cultivar AND  ctv_especie=esp_id and ".$pedacoAno.$pedacos;	   
	   endif;
    else://caso seja a busca nao por documento
	   if($finalidade=="PREVIA"):
            $sqlSeletor="select fic_id,fic_lote,fic_amostra_previa,esp_nome,ctv_nome,fic_dt_entrada,prd_nome from cultivar,ficha,remetente,especies 			where fic_previa='S'      and fic_labo=".$idLabo." AND  prd_id=fic_produtor AND  ctv_id=fic_cultivar AND  ctv_especie=esp_id and ".$pedacoAno.$pedacos;	   
	     else:
            $sqlSeletor="select fic_id,fic_lote,fic_amostra,       esp_nome,ctv_nome,fic_dt_entrada,prd_nome  from cultivar,ficha,remetente,especies 
			where fic_definitiva='S' and  fic_labo=".$idLabo." AND  prd_id=fic_produtor AND  ctv_id=fic_cultivar AND  ctv_especie=esp_id and ".$pedacoAno.$pedacos;	   
	   endif;
	
	
	
	endif;//pergunta se vai pesquisar numero de documentto boletim ou informe	   
	   
	   
	   
	   
	   

	   //echo("2342 finalidade=$finalidade  sql=$sqlSeletor pedacos $pedacos<br>");

	   
	    
       $sqlParteFinal=$pedacoAno.$pedacos;
	   //echo("Filtros finais=$sqlSeletor<br>");
	   $miolo="from cultivar,ficha,remetente,especies where  fic_labo=".$idLabo."  AND  prd_id=fic_produtor AND  ctv_id=fic_cultivar AND  ctv_especie=esp_id ";
	   if(get('opcao') !== ""):
            $opcao = get('opcao');
	   endif;
	   ?>


		<div style="overflow: auto; width: 1000px; height: 400px; border:solid 1px">   
        <table bgcolor="white" class="tabela" style="width:1000px">  
        <thead>  
        <tr>  
        <th>Amostras</th><th>Entrada</th><th>Lote</th><th>Requerente</th><th>Especie</th><th>Cultivar</th><th>Germ</th><th>TZO</th><th>EAC</th><th>Documento(s)</th><th>Ordem</th>
        </tr>  
        </thead>  
        <tbody>  
 
	  <?php


        //$sqlSeletor="select * from cultivar,ficha,remetente,especies where fic_labo=".$idLabo."  AND  prd_id=fic_produtor AND  ctv_id=fic_cultivar AND  ctv_especie=esp_id ".$pedacos;
		echo("zzzzzzzzzzzzzzzzzzzzseletor= $sqlSeletor <br>");
		//echo("Orientação: $mensagemListagem <br>");
        printMSG($mensagemListagem,'erro');
	    //ENTRA DE QUAKQUER MANEIRA
	 	 	$generica=new tabelagenerica();
	        $generica->extras_select =$sqlSeletor ;
			$generica->selecionaCamposEspecial($generica);
			$contador=0;
			//se eu quiser fazer ele pegar a id entao preciso tambem mostrar so filtros de forma mais facil de entender. do jeito que esta esta mais ou menos
			$generica2=new tabelagenerica();
	        while ($resgenerica= $generica->retornaDados()):
			    $amostraLong=$resgenerica->fic_id;
				//PESQUISA OS DOCUMENTOS
			    //ENTRA DE QUAKQUER MANEIRA
				$generica2->tabela="documentosponte,documentos";
				$generica2->campos_valores = array(
					   "doc_numero" => NULL,
					   "doc_tipo" => NULL,
				);
				$generica2->extras_select =" where dpo_documento_autonumerador=doc_id AND   dpo_amostra_vinculada=".$amostraLong;
				$generica2->selecionaCampos($generica2);
                $variosDocs='';
				while ($resgenerica2= $generica2->retornaDados()):
	               $tipoDoc=substr($resgenerica2->doc_tipo,0,1);
	               $numeroDoc=$resgenerica2->doc_numero;
                   $variosDocs=$variosDocs.$tipoDoc.':'.$numeroDoc.'; ';
	            endwhile; 








                //acha germinacao e pureza
				$generica2->tabela="rean1";
				$generica2->campos_valores = array(
					   "rea_v1" => NULL,
				);
				$generica2->extras_select =" where rea_teste='GERM' and rea_ficha=".$amostraLong;
				$generica2->selecionaCampos($generica2);
                $germinacao='';
				while ($resgenerica2= $generica2->retornaDados()):
	               $germinacao=$resgenerica2->rea_v1;
	            endwhile; 

                /*qualiteste disponsou pureza e pediu tzo e eac
                //acha pureza
				$generica2->tabela="rean1";
				$generica2->campos_valores = array(
					   "rea_v1" => NULL,
				);
				$generica2->extras_select =" where rea_teste='PURE' and rea_ficha=".$amostraLong;
				$generica2->selecionaCampos($generica2);
                $pureza='';
				while ($resgenerica2= $generica2->retornaDados()):
	               $pureza=$resgenerica2->rea_v1;
	            endwhile; 
                */

                //acha tzo
				$generica2->tabela="rean1";
				$generica2->campos_valores = array(
					   "rea_v1" => NULL,
				);
				$generica2->extras_select =" where rea_teste='TZO' and rea_ficha=".$amostraLong;
				$generica2->selecionaCampos($generica2);
 				$tzo="-N-";
				while ($resgenerica2= $generica2->retornaDados()):
	               $tzo=$resgenerica2->rea_v1;
	            endwhile; 

                //acha eac
				$generica2->tabela="rean1";
				$generica2->campos_valores = array(
					   "rea_v1" => NULL,
				);
				$generica2->extras_select =" where rea_teste='EAC' and rea_ficha=".$amostraLong;
				$generica2->selecionaCampos($generica2);
                $eac="-N-";
				while ($resgenerica2= $generica2->retornaDados()):
	               $eac=$resgenerica2->rea_v1;
	            endwhile; 







                //prepara se é previa/definitiva
				if($finalidade=='PREVIA'):
  				    $amostraFinal=$resgenerica->fic_amostra_previa;
			    endif;		

				if($finalidade=='DEFINITIVA'):
				    //se eu estou em definitivas , eu faco aparer o numero da previa mas colocando uma letra
			        $amostraFinal=$resgenerica->fic_amostra;
				endif;



	            $contador++;
				echo '<tr>';

            //vai raiar a tabela se  é para coloca cor silver
			if($contador % 2 !=0):
  				printf('<td bgcolor="silver">%s',$amostraFinal);
				//SE É PRODUTOR AI NAO VAI MOSTRAR O LINK PARA ACESSAR AMOSTRA
				if($nivel=='PRODUTOR'):
				   printf('</td>');
                else:
				   printf(' <a href="?m=amostras_2&t=editar&achar_id=%s" title="Editar"><img src="images/edit.png" alt="Editar" /></a> </td>',$amostraLong);
				endif;
                printf('<td bgcolor="silver">%s</td>',date("d/m/y",strtotime($resgenerica->fic_dt_entrada));
                printf('<td bgcolor="silver">%s</td>',$resgenerica->fic_lote);
	            printf('<td bgcolor="silver">%s</td>',substr($resgenerica->prd_nome,0,20);
	            printf('<td bgcolor="silver">%s</td>',$resgenerica->esp_nome);
	            printf('<td bgcolor="silver">%s</td>',$resgenerica->ctv_nome);
	            printf('<td bgcolor="silver">%s</td>',$germinacao);
	            printf('<td bgcolor="silver">%s</td>',$tzo);
	            printf('<td bgcolor="silver">%s</td>',$eac);
	            //printf('<td bgcolor="silver">%s</td>',$pureza);
	            printf('<td bgcolor="silver">%s</td>',$variosDocs);
				printf('<td bgcolor="silver">%s</td>',$contador);
            else://aqui é o else do teste se é linha par
  				printf('<td>%s',$amostraFinal);
				//SE É PRODUTOR AI NAO VAI MOSTRAR O LINK PARA ACESSAR AMOSTRA
				if($nivel=='PRODUTOR'):
				   printf('</td>');
                else:
				   printf(' <a href="?m=amostras_2&t=editar&achar_id=%s" title="Editar"><img src="images/edit.png" alt="Editar" /></a> </td>',$amostraLong);
				endif;
                printf('<td>%s</td>',date("d/m/y",strtotime($resgenerica->fic_dt_entrada));
                printf('<td>%s</td>',$resgenerica->fic_lote);
	            printf('<td>%s</td>',substr($resgenerica->prd_nome,0,20);
	            printf('<td>%s</td>',$resgenerica->esp_nome);
	            printf('<td>%s</td>',$resgenerica->ctv_nome);
	            printf('<td>%s</td>',$germinacao);
	            printf('<td>%s</td>',$tzo);
	            printf('<td>%s</td>',$eac);
	            //printf('<td>%s</td>',$pureza);
	            printf('<td>%s</td>',$variosDocs);
	            printf('<td>%s</td>',$contador);
			endif;
				
				echo '</tr>';
	        endwhile;



	        ?>
	        </tbody>
	        </table>
			</div>
	
		<br>

        <form class="userform" method="POST" action="">
        <fieldset>
        <legend>Controles a disposição</legend>
		<table width="1100">
        <!--PRIMEIRA LINHA-->
		<tr>
		<td>
		<input type="submit" name="bt_ultimas100" value="Últimas 100 amostras DO ANO" />
		<input type="text" name="anoPesquisado" size="3" value="<?php echo $anoPesquisado;?>" />
		</td>
		<td>|</td>
		
		<td  bgcolor="silver">
		<input type="submit" name="bt_pesquisaNumero" value="Pesquisar amostras por número:" />
		de<input type="text" name="amostraDe" size="1" value="<?php echo $amostraDe;?>" />
		até<input type="text" name="amostraAte" size="1" value="<?php echo $amostraAte;?>" />
	    </td>
		<td>|</td>
		<td>
		<input type="submit" name="bt_acharLote" value="Achar um lote-->" />
		<input type="text" name="acharLote" size="10" value="<?php echo $letrinhasDigLoteLiteral;?>" />
		</td>
		</tr>
		
        <!--SEGUNDA LINHA-->
		<tr>
		<td>
		<input type="submit" name="bt_algumasLetrasRequerente" value="Algumas letras do requerente:" />
		<input type="text" name="letrinhasRequerente" size="10" value="<?php echo $letrinhasDigRequerenteLiteral;?>" />
		</td>
		<td>|</td>
		<td  bgcolor="silver">
		<input type="submit" name="bt_acharInforme" value="Amostras do informe:" />
		<input type="text" name="acharInforme" size="1" value="<?php echo $acharInforme;?>" />
	    </td>
		<td>|</td>
		<td>
		<input type="submit" name="bt_acharBoletim" value="Amostras do Boletim:" />
		<input type="text" name="acharBoletim" size="1" value="<?php echo $acharBoletim;?>" />
		</td>
		</tr>
		
        <!--TERCEIRA LINHA-->
		<tr>
		<td>
		<input type="submit" name="bt_algumasLetrasEspecie" value="Algumas letras da espécie:" />
		<input type="text" name="letrinhasEspecie" size="10" value="<?php echo $letrinhasDigEspecieLiteral;?>" />
		</td>
		<td>|</td>
		<td bgcolor="silver">
		<input type="submit" name="bt_algumasLetrasCultivar" value="Algumas letras da cultivar" />
		<input type="text" name="letrinhasCultivar" size="10" value="<?php echo $letrinhasDigCultivarLiteral;?>" />
	    </td>
		<td>|</td>
		<td>
		<input type="submit" name="bt_algumasLetrasRequerente" value="Vago 1" />
		<input type="text" name="vago1" size="10" value="<?php echo $vago1;?>" />
	    </td>

		</tr>
	
	
		</table>
        Obs.: Escolha amostras através dos filtros, depois pode acessar a amostra clicando no ícone que aparece proximo a amostra. <br>   
   </<fieldset>        
</form>

<?php
	   
	   	
	
	break;
	
	case 'listagemCampos':
       $loteFicha=$sessao->getVar('controle3');
       $produtorTal=$sessao->getVar('controle5');	
       $cultivarFicha=$sessao->getVar('controle8');		
       $cultivarFichaID=$sessao->getVar('controle9');		
       $safraFicha=$sessao->getVar('controle10');
       $categoriaFicha=$sessao->getVar('controle7');
	   ?>
       <br>
       VINCULAR O LOTE <font color="red"><?php echo $loteFicha;?> </font>
       da cultivar : <?php echo $cultivarFicha."  da safra: ".$safraFicha."  da categoria :".$categoriaFicha;?>
       </br>
  <br>
 A um dos campos desta lista, do PRODUTOR de sementes  
 <font color="red"><?php echo $produtorTal."</font>";?> </br>
		<div style="overflow: auto; width: 1200px; height: 400px; border:solid 1px">   
        <table bgcolor="white" class="tabela" style="width:1200px">  
        <thead>  
        <tr>   
        <th  bgcolor="#95f4d8">3321Nome do Campo</th><th  bgcolor="#95f4d8">Cultivar[ESP]</th><th  bgcolor="#95f4d8">Safra</th><th  bgcolor="#95f4d8">Cat.</th><th  bgcolor="#95f4d8">Endereço</th>
		<th  bgcolor="#95f4d8">Município    </th>
		<th  bgcolor="#95f4d8">Meta         </th>
		<th  bgcolor="#95f4d8">Area Aprovada</th>
		<th  bgcolor="#95f4d8">Produziu     </th>
		<th  bgcolor="#95f4d8">id           </th>
        </tr>  
        </thead>  
        <tbody>  
 
	  <?php
		
	           
				$idProdutor=$sessao->getVar('idProdutor');
				//echo("idProdutor=$idProdutor<br>");
                $userbd = new camposproducao();
                $userbd->extras_select = "WHERE cpr_id_produtor=" . $idProdutor;
                $userbd->selecionaTudo($userbd);
				$contador=0;
                while($resbdListagem = $userbd->retornaDados()):
				    $codigoCultivar=$resbdListagem->cpr_cultivar;
					$userCE = new cultivaresespecies();
					$userCE->extras_select = "where ctv_especie=esp_id && ctv_id=".$codigoCultivar;
			        $userCE->selecionaTudo($userCE);
			        while ($resCE = $userCE->retornaDados()):
			            $cultivar=$resCE->ctv_nome;
			            $especie=$resCE->esp_nome;
						$nomeComposto=$cultivar.'['.substr($especie,0,3).']';
			        endwhile;
				
				
				    $contador++;
                    echo '<tr>';
			if($contador % 2 !=0):
                    printf('<td bgcolor="silver">%s',substr($resbdListagem->cpr_nome_do_campo,0,30);
					printf('
					
					<a href="?m=amostras_2&t=editar&campo_id=%s" title="Editar"><img src="images/edit.png" alt="Editar" /></a>
					</td>',$resbdListagem->cpr_id);
						
					
					//link para selecionar todos campos deste produtor
					printf('<td bgcolor="silver">%s</td>',substr($nomeComposto,0,30);                //2especie ecultivar
					printf('<td bgcolor="silver">%s</td>',substr($resbdListagem->cpr_safra,0,30);    //3safra
                    printf('<td bgcolor="silver">%s</td>',substr($resbdListagem->cpr_categoria,0,30);//4categoria
                    printf('<td  bgcolor="silver">%s</td>',substr($resbdListagem->cpr_endereco,0,15);//5endereco
			        printf('<td  bgcolor="silver">%s</td>',substr($nomeComposto,0,30);               //6nome composto
                    printf('<td bgcolor="silver">%s</td>',substr($resbdListagem->cpr_municipio,0,30);//7municipio
                    printf('<td bgcolor="silver">%s</td>',substr($resbdListagem->cpr_meta,0,30);     //8meta
                    printf('<td bgcolor="silver">%s</td>',substr($resbdListagem->cpr_produziu,0,30); //9 produziu
                    printf('<td bgcolor="silver">%s</td>',substr($resbdListagem->cpr_id,0,30);     //10id
            else:
			        printf('<td>%s',substr($resbdListagem->cpr_nome_do_campo,0,30);
					printf('
					<a href="?m=amostras_2&t=editar&campo_id=%s" title="Editar"><img src="images/edit.png" alt="Editar" /></a>
					</td>',$resbdListagem->cpr_id);
					printf('<td>%s</td>',substr($nomeComposto,0,30);                 //2especie ecultivar
                    printf('<td>%s</td>',substr($resbdListagem->cpr_safra,0,30);     //3safra
                    printf('<td>%s</td>',substr($resbdListagem->cpr_categoria,0,30); //4categoria
                    printf('<td>%s</td>',substr($resbdListagem->cpr_endereco,0,15);  //5endereco
			        printf('<td>%s</td>',substr($nomeComposto,0,30);                 //6nome composto
                    printf('<td>%s</td>',substr($resbdListagem->cpr_municipio,0,30); //7municipio
                    printf('<td>%s</td>',substr($resbdListagem->cpr_meta,0,30);      //8meta
                    printf('<td>%s</td>',substr($resbdListagem->cpr_produziu,0,30);  //9 produziu
                    printf('<td>%s</td>',substr($resbdListagem->cpr_id,0,30);      //10id
			endif;
         

					echo '</tr>';
                endwhile;
				$sessao->setVar('controle11','aberto');
                //$controle11='uuu'.$sessao->getVar('controle11');				
				//echo("3390 controle11  $controle11 ENCHEU A LISTA <br>");
	        ?>
	        </tbody>
	        </table>
			</div>

<?php
	   
	   	
	
break;//final da listagem campos 0106dia
	

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

  function salvarDados2016Preciosa($amostraLong)
  {
	    //$conteudo1=$vetor[1];
	    //$codProd=$vetor[2];
	    //$vetor[1]=post('peneira');
		
        echo("hiphop  DENTRO DA FUNCAO SALVAR DADOS amostraLong=$amostraLong  <br>");
        $user = new amostras(array(
            'fic_peneira'=>post('peneira'),
           
        );
            $user->valorpk = $amostraLong;
            $user->extras_select = "WHERE   fic_id=$amostraLong";
            $user->selecionaTudo($user);
            $res = $user->retornaDados();
            $user->atualizar($user);
            if ($user->linhasafetadas>0):
                if($finalidade=='DEFINITIVA'):
                   //printMSG('Dados alterados com sucesso, na amostra nº '.$res->fic_amostra.'. Ocorrência registrada.(Alteração)');
				   $legenda='Dados alterados com sucesso, na amostra nº '.$res->fic_amostra.'. Ocorrência registrada.(Alteração)';
                else:							
                   //printMSG('Dados alterados com sucesso, na amostra nº '.$res->fic_amostra_previa.'. Ocorrência registrada.(Alteração)');
				   $legenda='Dados alterados com sucesso, na amostra nº '.$res->fic_amostra_previa.'. Ocorrência registrada.(Alteração)';

                endif;							
                unset($_POST);
				printMSG('Ok.Salvou2 alteração de todos campos do corpo desta tela! ','alerta');
            else:
				//printMSG('Ok.Nada foi alterado. ','alerta');
            endif;
  } //fecha a funcao salvar dados2016

 function salvarDados2016Associados($ID_Salvar,$associada,$amostraLong)
  {
    $sessao = new sessao();
    $vacaAmarela=$sessao->getVar('associada');
    if($vacaAmarela!="xxx"): 
    //$senhaCli=$sessao->getVar('iduser');
        $idLabo=$sessao->getVar('idLabo');
 	    if($associada=='REQUERENTE'):
		    $idProdutor=$ID_Salvar;
			////////////////
            //vai capturar a procedencia deste produtor e salvar junto. Feito para lassul 090222
			//ENTRA DE QUAKQUER MANEIRA
			$sqlProdutor="select prd_municipio from remetente where prd_id=".$idProdutor;
		    $genericax=new tabelagenerica();
		    $genericax->extras_select =$sqlProdutor;
			$genericax->selecionaCamposEspecial($genericax);
		    while ($resgenericax= $genericax->retornaDados()):
				$municipio=$resgenericax->prd_municipio;
		        //echo("idProdutorlogado=$idProdutorLogado<br>"); 
		    endwhile; 
			///////////////
	        $user = new amostras(array(
	            'fic_produtor'=>$ID_Salvar,
                'fic_procedencia'=>$municipio,
	        );
        endif;
		
		if($associada=='CULTIVAR'):
	        $user = new amostras(array(
	            'fic_cultivar'=>$ID_Salvar,
	        );
        endif;

		if($associada=='AMOSTRADOR'):
	        $user = new amostras(array(
	            'fic_amostrador'=>$ID_Salvar,
	        );
        endif;

        $user->valorpk = $amostraLong;
        $user->extras_select = "WHERE   fic_id=$amostraLong";
        $user->selecionaTudo($user);

        $res = $user->retornaDados();
		//echo("salvar linha 2561 amostraLong=$amostraLong   ID_Salvar=$ID_Salvar <br>");
        $user->atualizar($user);
		
        $sessao = new sessao();
		$sessao->setVar('associada','xxx');

		$controle="naoSalvou";
        if ($user->linhasafetadas>0):
 			//printMSG('Ok.Salvou alteração3 exclusivamente(1)) de '.$associada.'!','alerta');
            $controle="Salvou";
        else:
			//printMSG('Ok.Nada foi alterado. ','alerta');
        endif;
		//aqui vai pegar o amostrador vinculado, caso o tenha encontrado
		//echo("$associada $controle sistema antigo   codAmostradorVinculado=$codAmostradorVinculado<br>");   
    	if($associada=='REQUERENTE' && $controle=="Salvou" ):	
            //aqui vai capturar o id do amostrador associado
            //se for numero maior que zero ele vai salvar na amostra
            //caso contrario vai ignorar  					
            $userReme = new remetentes();
			$userReme->extras_select = "WHERE prd_id=".$idProdutor;
            $userReme->selecionaTudo($userReme);
            $codAmostradorVinculado=0;
            $mensagemExtra="";
            while ($res = $userReme->retornaDados()):
                $codAmostradorVinculado=$res->prd_cod_amostrador;
            endwhile;
			//se achou um codigo entao grava tambem o codigo   
			//echo("sistema antigo(4))   codAmostradorVinculado=$codAmostradorVinculado<br>");           
            if($codAmostradorVinculado>0):
			    //cria o arrai para salvar
				$user = new amostras(array(
                   'fic_produtor'=>$idProdutor,
                   'fic_amostrador'=>$codAmostradorVinculado,
                    );
                $mensagemExtra="Gravou também o amostrador vinculado a este requerente!";
				
				//echo("sistema antigo(5))   codAmostradorVinculado=$codAmostradorVinculado<br>"); 
            else:
                //aqui nao tem amostrador vinculado entao ele tem que achar o amostrador -o-
				//se nao achar deve avisr que crie um, mas neste caso mantem o nome antigo
				//se acheou avisa que esta colocando amostrador -o-
				//echo("sistema antigo(2)   codAmostradorVinculado=$codAmostradorVinculado<br>");    
                $userAmostrador = new amostradores();
				$userAmostrador->extras_select = "WHERE amt_lab=".$idLabo." and amt_nome ='-O-'";
				//$sql=$userAmostrador->extras_select;
				//echo("sql=$sql<br>");
				
                $userAmostrador->selecionaTudo($userAmostrador);
                $codAmostradorTraco=0;
                $mensagemExtra="";
                while ($resAmostrador = $userAmostrador->retornaDados()):
                    $codAmostradorTraco=$resAmostrador->amt_id;
                endwhile;
				//se achou o amostrador -O- vai salvar o codigo, cso contrario deixa 
				//deixa o antigo e avisa que deve mudar agora
                if($codAmostradorTraco>0): 
					$user = new amostras(array(
                       'fic_produtor'=>$idProdutor,
                       'fic_amostrador'=>$codAmostradorTraco,
                        );
                    $mensagemExtra="Gravou amostrador -O-, recomendo selecionar o amostrador neste momento, caso exista!";

                else:
                    //so vai gravar o remetente mesmo
					$user = new amostras(array(
                       'fic_produtor'=>$idProdutor,
                        );
                    $mensagemExtra="Não foi encontrado o amostrador -O-. Recomendo gravar um com este pseudo nome para normalizar seus dados. Importante que -O- se ja com um traço, letra O maiúsculo e novamtente traço!";
				endif;//testa se amostrador -0- 
             endif;//amostrador vinculado
            //aqui salva por fim o que foi organizado acima
            $user->valorpk = $amostraLong;
            $user->extras_select = "WHERE   fic_id=$amostraLong";
            $user->selecionaTudo($user);
            $res = $user->retornaDados();
            $user->atualizar($user);
			$sessao->setVar('controle',0); 
			///////////
            $sessao->setVar('idProdutor',$idProdutor);
			//////			
			               
           $mensagem='xxxxxxxxxxxSalvou requerente nesta amostra!'.$idProdutor.$mensagemExtra;
            //$mensagem='Salvou requerente nesta amostra!'.$idProdutor.$mensagemExtra;			//printMSG('controle='. $valorControle. $mensagem,'alerta');
		endif;//testa se associada é requerente e de fato gravou o codigo do requerente  entao vai salvar o amostrador associado
	endif;//testou vaca amarela	
  } //fecha a funcao salvar dados2016Associados




  function salvarDados2016($idLabo,$finalidade,$nomeOperador,$amostraLong)
  {
						//$sessao = new sessao();
						//$idLabo=$sessao->getVar('idLabo');
						//$finalidade=$sessao->getVar('finalidade');
						//$nomeOperador=$sessao->getVar('nomeuser');
                       

  				       $objetoValidacao=new validacao();
					   
					   $vaiGravar=TRUE;
                       //valida a data de entrada
					   $dt_entrada=post('dt_entrada');
					   $retorno=$objetoValidacao->validaDataEntrada($dt_entrada);//esta data vai validar o ano e somente esta
					   if($retorno=='invalida'):
      					   printMSG('Atenção: Preencha corretamente a data de entrada no formato dd/mm/aaaa, e do ano corrente, pois nenhum dado foi alterado. ','alerta');
                           $vaiGravar=FALSE;
					   else:
						   $dt_entrada_americana=$retorno;
					   endif;
                       //validar a representatividade
					   $r1=post('r1');
					   $r2=post('r2');
					   $r3=post('r3');
					   $r4=post('r4');
					   if($r2=='-O-' || $r4=='-O-'):
					   	  $r1='-O-';
					   	  $r2='-O-';
					   	  $r3='-O-';
					   	  $r4='-O-';
                       endif;					   
					   if($r1==''):
					   	  $r2='';
                       endif;					   
   
					   
					   $retornoRep=$objetoValidacao->validaRepresentatividade($r1,$r2,$r3,$r4);
					   if($retornoRep=='invalida'):
      					   printMSG('Preencha corretamente a representatividade dentro das possibilidades, pois nenhum dado foi alterado8. ','alerta');
                           $vaiGravar=FALSE;
					   else:
						   $repreGravar=$retornoRep;
					   endif;

   
					   $amostra=post('amostra');
					

                       //aqui tem um problema:
					   //eu uso o mesmo botao de alterar para alterar o numero da amostra
					   //mas se é previa o campo é fic_amostra_previa

                       
					   //$campoLote=post('lote');
					   //echo("vvvvvvalor lote=$campoLote<br>");
					   //no campo lote eu coloco um caracter em branco porque 
				       //o numero 024 ele passa para 24 e dava erro depois
					   //nao retirar este comentario
					   //$loteLido=post('lote');
                       //$loteString=(string)$loteLido;
					   //echo("vvvvvvalor lotestring=$loteString<br>");
					   $lote=post('lote');
					   $mensagem=$objetoValidacao->checaLoteRepetido($amostraLong,$lote);
					   if($mensagem!=""):
					      echo '<iframe src="perigoLoteRepetido.php" style="border:5px dotted red" width="110%" height="230"></iframe>';//
					   endif;	   
					   //echo("3502 mensagem= $mensagem lote=$lote ano= $ano cultivar=$cultivar   requerente=$requerente amostraLong=$amostraLong<br>");
					   if($mensagem==''):
                          //echo("amostra valida<br>");					   
					   else:
					      //echo("3508 amostra nao valida<br>");
					      //javascript:alert('Amostra esta repetida!');
						  //echo "<script>alert('Amostra ' . $mensagem. ' ja tem este lote');</script>";
                          //echo("Atenção: $mensagem<br>");	
						  //echo "<script>alert('Já existe uma amostra com este lote,desta cultivar, deste produtor, deste anox');</script>";//funfa
						  printMSG('Já existe uma amostra com este lote,desta cultivar, deste produtor, deste ano. '.$mensagem,'alerta');
						  //echo "<script>alert(" .$mensagem.");</script>";//funfa
					   endif;
					   
					   //vai extrair os caracteres em branco que ADV E LIMA COLOCARAM E DESALINHA O LOTE NO BOLETIM				   
                       $loteTrim=rtrim($lote);
					   //$tama=strlen($loteTrim);
					   //echo("rrrrrrrrrrrrrrrr3527 tamaLote= $tama lote=echo $loteTrim <br> ");



                       //$cnpj='26.991.224/0001-04'; 
					   //$loteTrim=ltrim(rtrim($lote);
					   //$loteTrim=rtrim($lote);
					   //$loteTrim=str_replace(" ","",$lote);
					   //$loteTrim=strval($loteTrim1);
					   //$loteTrim=$lote;
                       //echo("3243 xxxxxxxxxxxkkkkkkkkkkkkkkkkkkkkk nova amostra definitiva = $novaAmostraDefinitiva  trimlote= $loteTrim) <br>");
										   
                       if($finalidade=="DEFINITIVA"):
                            $user = new amostras(array(
                            'fic_lote'=>$loteTrim,
							'fic_labo'=>$idLabo,
                            'fic_funcao'=>post('funcao'),
                            'fic_categoria'=>post('categoria'),
                            'fic_safra'=>post('safra'),
                            'fic_dt_entrada'=>$dt_entrada_americana,
                            'fic_dt_protocolo'=>post('dt_protocolo'),
                            'fic_dt_amostragem'=>post('dt_amostragem'),
                            'fic_peneira'=>post('peneira'),
                            'fic_previsao'=>post('previsao'),
                            'fic_observacao'=>post('observacao'),
                            'fic_importacao'=>post('importacao'),
                            'fic_preparo_dosn'=>post('numeroOrdemFicha'),
                            'fic_campo_string'=>post('campo'),
                            'fic_repre_unid'=>$repreGravar,
                            'fic_procedencia'=>post('procedencia'),
							'fic_validade'=>post('validade'),
                            'fic_aparelho'=>post('peso'),
                            'fic_balanca'=>post('balanca'),
                            'fic_tratamento'=>post('tratamento'),
                            'fic_tta'=>post('tta'),
                            'fic_tta_complementar'=>strtoupper(post('status' ?? "")),
                            'fic_status_finalizada'=>strtoupper(post('statusFinalizada' ?? "")),
                            'fic_status_pago'=>strtoupper(post('statusPagamento' ?? "")),
							'fic_beneficiada'=>post('beneficiada'),
							'fic_analise_reanalise'=>post('statusAnalise'),
                        );
                       else:
                            $user = new amostras(array(
                            'fic_lote'=>$loteTrim,
							'fic_labo'=>$idLabo,
                            'fic_funcao'=>post('funcao'),
                            'fic_categoria'=>post('categoria'),
                            'fic_safra'=>post('safra'),
                            'fic_dt_entrada'=>$dt_entrada_americana,
                            'fic_dt_protocolo'=>post('dt_protocolo'),
                            'fic_dt_amostragem'=>post('dt_amostragem'),
                            'fic_peneira'=>post('peneira'),
                            'fic_previsao'=>post('previsao'),
                            'fic_observacao'=>post('observacao'),
                            'fic_importacao'=>post('importacao'),
                            'fic_campo_string'=>post('campo'),
                            'fic_repre_unid'=>$repreGravar,
                            'fic_procedencia'=>post('procedencia'),
                            'fic_validade'=>post('validade'),
                            'fic_aparelho'=>post('peso'),
                            'fic_balanca'=>post('balanca'),
                            'fic_tratamento'=>post('tratamento'),
                            'fic_tta'=>post('tta'),
                            'fic_tta_complementar'=>strtoupper(post('status' ?? "")),
                            'fic_status_finalizada'=>strtoupper(post('statusFinalizada' ?? "")),
                            'fic_status_pago'=>strtoupper(post('statusPagamento' ?? "")),							
							'fic_beneficiada'=>post('beneficiada'),
							'fic_analise_reanalise'=>post('statusAnalise'),
                        );
					   endif;//testa se é definitiva
					   
					    
                    $user->valorpk = $amostraLong;
                    $user->extras_select = "WHERE   fic_id=$amostraLong";
                    $user->selecionaTudo($user);
                    $res = $user->retornaDados();
                    if ($vaiGravar==TRUE):
                        $user->atualizar($user);
						$lafetadas=$user->linhasafetadas;
						//echo("3593 lote $lote lafetadas=$lafetadas<br>"); 
						
                        if ($user->linhasafetadas>0):
							//aqui faz uma verificacao se tem a mesmo lote e mesma cultivar
						    $userAmostraRepetida = new amostras();
						    $userAmostraRepetida->extras_select =  " where fic_lote='".$lote."'";
						    $userAmostraRepetida->selecionaCampos($userAmostraRepetida);
							$resAmostraRepetida = $userAmostraRepetida->retornaDados();
							$idCultivar=$resAmostraRepetida->fic_cultivar;
							$idRequerente=$resAmostraRepetida->fic_produtor;
							$anoAmostra=$resAmostraRepetida->fic_ano;

                            //echo("3602 lote $lote idCultivar=$idCultivar idRequerente=$idRequerente anoAmostra=$anoAmostra<br>"); 




							$lote=trim($lote);
                            $tama=strlen($lote);
                            //capturou a cultivar e agora verifica se tem outro lote com mesma cultivar 
						    $userAmostraRepetida1 = new amostras();
						    $userAmostraRepetida1->extras_select =  " where fic_lote='".$lote."' and fic_cultivar=".$idCultivar;
							//echo("3612 lote $lote idCultivar=$idCultivar<br>");
							$codigo=$userAmostraRepetida1->extras_select;
						    $userAmostraRepetida1->selecionaCampos($userAmostraRepetida1);
							$contaLotes=0;
						    while ($resAmostraRepetida1 = $userAmostraRepetida1->retornaDados()):
							   $legenda="";
							   if($resAmostraRepetida1->fic_amostra_previa >0) $legenda="AP".$resAmostraRepetida1->fic_amostra_previa;
							   if($resAmostraRepetida1->fic_amostra >0) $legenda=$legenda."AD".$resAmostraRepetida1->fic_amostra;
						       $contaLotes++;
                               $vetorRepeteco[$contaLotes]=$legenda;
						    endwhile;
						    //echo("linha2971  lote $lote  tama=$tama  idcultivar=$idCultivar contaLotes=$contaLotes codigo=$codigo <br>"); 

							if($contaLotes>1):
	                            //echo("amostras  $vetorRepeteco[1]   e amostra $vetorRepeteco[2] tem mesmo lote e cultivar<br>");
								$montagem="Tem ".$contaLotes. ' amostras repetidas a esta atual.  A amostra '. $vetorRepeteco[1]. '   e amostra '. $vetorRepeteco[2].' tem mesmo lote, cultivar, produtor e ano';
								printMSG($montagem,'alerta');
								echo '<iframe src="perigoLoteRepetido.php" style="border:5px dotted red" width="110%" height="230"></iframe>';// 
                            endif; //fecha conta lotes							
							
							//$contaLotes=0;
						    //while ($resAmostraRepetida = $userAmostraRepetida->retornaDados()):
						     //   $contaLotes++;
							  //  $idCultivar=$resAmostraRepetida->fic_cultivar;
						    //endwhile;
	                        //echo("lote = $lote idCultivar=$idCultivar contaLotes=  $contaLotes<br>");
                            

						
						
                            if($finalidade=='DEFINITIVA'):
                               //printMSG('Dados alterados com sucesso, na amostra nº '.$res->fic_amostra.'. Ocorrência registrada.(Alteração)');
							   $legenda='Dados alterados com sucesso, na amostra nº '.$res->fic_amostra.'. Ocorrência registrada.(Alteração)';
                            else:							
                               //printMSG('Dados alterados com sucesso, na amostra nº '.$res->fic_amostra_previa.'. Ocorrência registrada.(Alteração)');
							   $legenda='Dados alterados com sucesso, na amostra nº '.$res->fic_amostra_previa.'. Ocorrência registrada.(Alteração)';
                            endif;//fecha finalidade=definitiva							
                            unset($_POST);
							//$zero=0;	
                            //$sessao->setVar('idProdutor',$zero);                
                            //$sessao->setVar('idCultivar',$zero);   
							//aqui antes de tudo vai gravar a ocorrencia 

							$objetocalculo=new calculos();
                            $objetocalculo->registroDeOcorrencias($amostraLong,0,$nomeOperador,'Alterou registro',0,$idLabo);							
							//printMSG('Ok.Salvou alteração4 de todos campos do corpo desta tela! ).$comMensagens,'alerta');

							
							
                        else:
							//printMSG('Ok.Nada foi alterado. ','alerta');
                        endif;//fecha linhas afetadas
                    endif; //fecha vai gravar =true                   
  }//fim da funcao salvarDados2016()





?>



 