<?php
require_once(dirname(dirname(__FILE__))."/paineladm/funcoes.php");
$pathlocal = dirname(__FILE__);
//require_once(dirname($pathlocal)."/paineladm/classes/fpdf.class.php");
//require_once(dirname($pathlocal)."/paineladm/classes/sessao.class.php");
$material = $_COOKIE['material'];
$sessao = new sessao();
$senhaCli=$sessao->getVar('iduser');
$idLabo=$sessao->getVar('idLabo');
$inicio=$sessao->getVar('inicio');
$final=$sessao->getVar('final');
$nomeOperador=$sessao->getVar('nomeuser');
$cliente=$sessao->getVar('cliente');

$amostraLong=$sessao->getVar('amostraLong');
//echo("amostralong= $amostraLong<br>");
$objetocalculo = new calculos(); //calcula todos valores finais
$objetocalculoRaioX = new calculosFichaVirtual(); //calcula todos valores finais
//////////
$objetoCalculoGerminacaoFichaPadrao = new calculoGerminacaoFichaPadrao(); //calcula todos valores finais
//////////



$pdf=new FPDF('P','mm','A4'); //parametos da pagina 
 $pdf->open();//abre o fpdf
 //$pdf->AddPage();//adicionando a primera pafina
 $pdf->SetFont('Arial','',12);
 $pdf->SetDrawColor(10,10,10);
 $maximoHAdobe=297;//isso para vertical
 $maximoLAdobe=210;//isso para vertical
 $maximoLAdobe=297;//isso para horizontal
 $maximoHAdobe=210;//isso para horizontal
 $margemEsquerdaExterna=13;
 $margemEsquerda=10;
 $margemAcima=15;
 $mzx=$margemEsquerda;//marco zero x
 $mzy=$margemAcima;   //marco zero y
 $margemDireita=$maximoLAdobe-6;
 $larguraUtil=$maximoLAdobe-16;
 $futer=$maximoHAdobe-10;
 $cinza=220;
 $pdf->SetFillColor($cinza,$cinza,$cinza);
 $grosso=0.7;
 $medio=0.4;
 $fino=0.3;
 $extraFino=0.2;

 $nomeOperador=5;
 $pdf->SetFillColor($cinza,$cinza,$cinza); 
 
 
for($registro=$inicio;$registro<=$final;$registro++):
$amostraLong=$objetocalculo->AchaIdAmostraTendoRegistro($registro);					 

$userTTAP = new amostras();
 $userTTAP->extras_select =  " WHERE fic_id=".$amostraLong; //esse ja funfa, errado mas funfa
 $userTTAP->selecionaCampos($userTTAP);
 $disparaCabecalho=1;
 //echo("sssssssssql= $userTTAP->extras_select <br>");				 
   while ($resTTAP = $userTTAP->retornaDados()):
     if($disparaCabecalho==1):
	     $disparaCabecalho=0;
		 $pdf->AddPage();//adicionando a primera pafina 
		 $cota1=0;
	     $disparaCabecalho=0;	
         $fonte="Arial";
		 $caminhoFinal="ImagensClientes/imagemfichaTRISOLO_imprimir.jpg";//ISSO AQUI DEVE SER CRUZ ALTA
         $pdf->Image($caminhoFinal,$mzx,$mzy,185.7,272.9,'JPG');
		 
         //imprime a logomarca
		 //$caminhoFinal="ImagensClientes/i".$idLabo.".JPG";
	     //$pdf->Image($caminhoFinal,11,$cota1+16,48,22,'JPG');		 
		 
	     ####################################CABECALHO################################################
		 $vetorRaioX=$objetocalculoRaioX->capturaGeralRaioX($amostraLong);
		 $vetorCapturaGeral=$objetocalculo->capturaGeralAmostra($amostraLong);
		 $pdf->SetFont('Arial','B',8);
		 $pdf->setXY($mzx+110,$mzy+4.5); $pdf->Cell(100,5,$vetorRaioX[10].'/'.substr($vetorRaioX[8],6),0,0,'L');//numero da amostra

		 $pdf->SetFont('Arial','',8);
		 //TRABALHA O INFORME
		 $dataEinforme=$vetorRaioX[4];
         if(strlen($dataEinforme)>3):
		     list($data, $infNumero,$operador) = explode("*", $dataEinforme);//
		     $ano=substr($data,6,4);
			 $pdf->setXY($mzx+110,$mzy+14); $pdf->Cell(100,5,$infNumero.'/'.$ano,0,0,'L');//numero informe $numero.'/'.$ano;
	     endif;		 

		 //bas e data
		 $dataEboletim=$vetorRaioX[3];
         if(strlen(trim($dataEboletim))>3):
		     list($data, $bolNumero,$operador) = explode("*", $dataEboletim);//
		     $ano=substr($data,6,4);
	    	 $pdf->setXY($mzx+110,$mzy+9); $pdf->Cell(100,5,$bolNumero.'/'.$ano,0,0,'L');//numero bas
		 endif;	 
    	 //$pdf->setXY($mzx+110,$mzy+9); $pdf->Cell(100,5,$dataEinforme.'/'.$ano,0,0,'L');//numero bas

         //imprime data e o operador
		 $pdf->setXY($mzx+82,$mzy+18.5);
		 $pdf->Cell(28,5,$data,0,0,'L');//data
		 $pdf->Cell(40,5,utf8_decode($operador),0,0,'L');//operador
		 $especieComum=$vetorRaioX[43];
		 $especieCientifica=$vetorRaioX[221];
		 $tama=2*strlen($especieComum);
		 $pdf->setXY($mzx+16,$mzy+24);
		 $pdf->Cell($tama,5,utf8_decode($especieComum),0,0,'L');//especie
		 $pdf->SetFont('Arial','I',8);
		 $pdf->Cell(100,5,utf8_decode('('.$especieCientifica.')'),0,0,'L');//especie
		 $pdf->SetFont('Arial','',8);
		 $pdf->setXY($mzx+16,$mzy+27); $pdf->Cell(100,5,utf8_decode($vetorRaioX[42]),0,0,'L');//cultivar
		 $pdf->setXY($mzx+16,$mzy+31); $pdf->Cell(100,5,utf8_decode($vetorRaioX[9]),0,0,'L');//lote
		 $pdf->setXY($mzx+16,$mzy+35); $pdf->Cell(100,5,$vetorRaioX[8],0,0,'L');//recebida em
         //SE FOR DIMICRON CUIABA ELE NA IMPRIME O REQUERENTE E NO LUGA IMPREM TESTE A REALIZAR 
		 //if($cliente=="DIMICRON CUIABA"):
		 $pdf->setXY($mzx+25,$mzy+38.7); $pdf->Cell(100,5,$vetorRaioX[47],0,0,'L');//testes a realizar
		 //else:
		 //   $pdf->setXY($mzx+25,$mzy+42.3); $pdf->Cell(100,5,$vetorRaioX[47],0,0,'L');//testes a realizar
		 //   $pdf->setXY($mzx+16,$mzy+38.7); $pdf->Cell(100,5,utf8_decode($vetorRaioX[44]),0,0,'L');//requerente
		 //endif;
		 
		 	
		 $pdf->setXY($mzx+93,$mzy+27); $pdf->Cell(100,5,$vetorRaioX[48],0,0,'L');//safra
		 $pdf->setXY($mzx+93,$mzy+31); $pdf->Cell(100,5,$vetorRaioX[46],0,0,'L');//representatividade
		 $pdf->setXY($mzx+93,$mzy+35); $pdf->Cell(100,5,$vetorRaioX[56],0,0,'L');//peneira
		 $pdf->setXY($mzx+93,$mzy+38.7); $pdf->Cell(100,5,utf8_decode($vetorRaioX[57]),0,0,'L');//procedencia
		 $pdf->setXY($mzx+147,$mzy+38.3); $pdf->Cell(100,5,$vetorRaioX[8].'/'.utf8_decode($vetorRaioX[240]),0,0,'L');//analista/data
		 $pdf->setXY($mzx+145,$mzy+27); $pdf->Cell(100,5,$vetorRaioX[53],0,0,'L');//categoria
		 $pdf->setXY($mzx+145,$mzy+31); $pdf->Cell(100,5,$vetorRaioX[60],0,0,'L');//balanca 
		 $pdf->setXY($mzx+145,$mzy+35); $pdf->Cell(100,5,utf8_decode($vetorRaioX[58]),0,0,'L');//tratada
		 $pdf->setXY($mzx+171,$mzy+31); $pdf->Cell(100,5,$vetorRaioX[59].'g',0,0,'L');//peso da amostra

         //TESTES A REALIZAR
		 $testesConcatenados=$vetorRaioX[47];
         $vetorFinal=$objetoCalculoGerminacaoFichaPadrao->marcouTestesRealizar($testesConcatenados);
		 $assinalouPUR=$vetorFinal[1];//PUR
 		 $assinalouGER=$vetorFinal[2];//GER
		 $assinalouPMS=$vetorFinal[3];//PMS
		 $assinalouTZO=$vetorFinal[4];//TZO DE SOJA
		 $assinalouEAC=$vetorFinal[5];//EAC
		 $assinalouTZF=$vetorFinal[6];//TZF
		 $assinalouDOS=$vetorFinal[7];//DOS
		 
		 
		 
		 
         //peso complementar
         //$parametroComplemento=$assinalouPUR;
		
		 if($assinalouPUR=='NAO'):
		     $parametroComplemento="-O-";
	     else:
             $parametroComplemento=$vetorRaioX[106].'g';
		 endif;		 
         $pdf->setXY($mzx+113,$mzy+42.3); $pdf->Cell(5,5,$parametroComplemento,0,0,'L');//testes a realizar
 
         //setor pureza 
		 //calcula impurezas
         $impureza=$vetorRaioX[23]+$vetorRaioX[24];//soma impurezas
         $pesoFinal=$vetorRaioX[23]+$vetorRaioX[24]+$vetorRaioX[22];//peso final(os+mi+pu)
         $difAT_PF=$vetorRaioX[21]-$pesoFinal;//diferenca AT-PF



		 
      //pesos
		if($assinalouPUR == "SIM"):
			 $parametroPesoRAS=$vetorCapturaGeral[91];
		     //PRIMEIRA LINHA linha de amostra de trabalho
		     $pp11=$vetorRaioX[21];
		     $pp12='-O-';
		     $pp13='-O-';
		     $pp14='-O-';
			 
			 //linha de sementes puras
		     $pp21=$vetorRaioX[22];
		     $pp22=$vetorRaioX[15];
		     $pp23="-O-";
		     $pp24="-O-";
           
             //terceira  LINHA
		     $pp31=$vetorRaioX[23];
		     $pp32=$vetorRaioX[26];
		     $pp33="-O-";
		     $pp34="-O-";

             //QUARTA LINHA
		     $pp41=$vetorRaioX[24];
		     $pp42=$vetorRaioX[25];
		     $pp43="-O-";
		     $pp44="-O-";

             //QUINTA LINHA
			 //soma dos pesos
             $somaPesos=$vetorRaioX[22]+$vetorRaioX[23]+$vetorRaioX[24];
		     $pp51=$somaPesos;
		     $pp52="pp52";
		     $pp53="-O-";
		     $pp54="-O-";

		     //SE A PUREZA FOR MAIOR UQE ZERO ELE VAI MOSTRAR 100 NO TOTAL
		     if($vetorRaioX[15]>0 ):
		       $pp52='100';
		     endif;

        else:
			 $parametroPesoRAS='-O-';
             //PRIMEIRA LINHA
		     $pp11='-O-';
		     $pp12='-O-';
		     $pp13='-O-';
		     $pp14='-O-';
             //SEGUNDA LINHA
		     $pp21="";
		     $pp22="";
		     $pp23="";
		     $pp24="";
           
             //TERCEIRA LINHA
		     $pp31="";
		     $pp32="";
		     $pp33="";
		     $pp34="";
             //QUATRA LINHA
		     $pp41="";
		     $pp42="";
		     $pp43="";
		     $pp44="";
             //QUINTA LINHA
		     $pp51="";
		     $pp52="";
		     $pp53="";
		     $pp54="";
			 $vetorRaioX[104]='-O-';//balanca pureza
			 $vetorRaioX[154]='-O-';//data
			 $vetorRaioX[153]='-O-';//rubrica
			 $vetorRaioX[55]='-O-';//natureza do material inerte
        endif;	
		 

		 	 
         
		 

		 //peso ras pureza



		 $p1=$mzx+45;
		 //$pdf->setXY($p1,$mzy+47); $pdf->Cell(50,5,$vetorCapturaGeral[91].'g',0,0,'L');//peso ras pureza
		 
		 $pdf->setXY($p1,$mzy+47); $pdf->Cell(50,5,$pp11,0,0,'L');//peso ras pureza
		 $pdf->Cell(53,5,$vetorRaioX[104],0,0,'L');//balanca
		 $pdf->Cell(50,5,$vetorRaioX[154].'/'.utf8_decode($vetorRaioX[153]),0,0,'L');//data/operador analista
		 //pesagens
		 $p1=$mzx+34;
		 $pdf->setXY($p1,$mzy+56); $pdf->Cell(100,5,$pp11,0,0,'L');//peso amostra trabalho
		 $pdf->setXY($p1,$mzy+60); $pdf->Cell(100,5,$pp21,0,0,'L');////peso pu
		 $pdf->setXY($p1,$mzy+64); $pdf->Cell(100,5,$pp31,0,0,'L');////peso mi
		 $pdf->setXY($p1,$mzy+69); $pdf->Cell(100,5,$pp41,0,0,'L');////peso os
		 $pdf->setXY($p1,$mzy+73); $pdf->Cell(100,5,$pp51,0,0,'L');//////peso final(os+mi+pu)  
         
         //percentagens
		 $pdf->setXY($mzx+48,$mzy+56); $pdf->Cell(100,5,$pp12,0,0,'L');//peso amostra trabalho
		 $pdf->setXY($mzx+48,$mzy+60); $pdf->Cell(100,5,utf8_decode($pp22),0,0,'L');////purez%
		 $pdf->setXY($mzx+48,$mzy+64); $pdf->Cell(100,5,utf8_decode($pp32),0,0,'L');////mi%
		 $pdf->setXY($mzx+48,$mzy+69); $pdf->Cell(100,5,utf8_decode($pp42),0,0,'L');////os%
		 $pdf->setXY($mzx+48,$mzy+73); $pdf->Cell(100,5,$pp52,0,0,'L');////os%
		
		 //CAMPOS ANULADOS JANEIRO 2020
		 //$cx=50;$cy=56;
		 //$pdf->setXY($mzx+$cx,$mzy+$cy); $pdf->Cell(5,5,$valorString,0,0,'L');//
		 //$pdf->setXY($mzx+$cx,$mzy+$cy+16); $pdf->Cell(5,5,$valorString,0,0,'L');//

		 $cx=63;$cy=56;$valorString='';
		 $pdf->setXY($mzx+$cx,$mzy+$cy);    $pdf->Cell(5,5,$pp13,0,0,'L');//
		 $pdf->setXY($mzx+$cx,$mzy+$cy+4);  $pdf->Cell(5,5,$pp23,0,0,'L');//
		 $pdf->setXY($mzx+$cx,$mzy+$cy+8);  $pdf->Cell(5,5,$pp33,0,0,'L');//
		 $pdf->setXY($mzx+$cx,$mzy+$cy+12); $pdf->Cell(5,5,$pp43,0,0,'L');//
		 $pdf->setXY($mzx+$cx,$mzy+$cy+16); $pdf->Cell(5,5,$pp53,0,0,'L');//
		
		 $cx=75;$cy=56;$valorString='-';
		 $pdf->setXY($mzx+$cx,$mzy+$cy);    $pdf->Cell(5,5,$pp14,0,0,'L');//
		 $pdf->setXY($mzx+$cx,$mzy+$cy+4);  $pdf->Cell(5,5,$pp24,0,0,'L');//
		 $pdf->setXY($mzx+$cx,$mzy+$cy+8);  $pdf->Cell(5,5,$pp34,0,0,'L');//
		 $pdf->setXY($mzx+$cx,$mzy+$cy+12); $pdf->Cell(5,5,$pp44,0,0,'L');//
		 $pdf->setXY($mzx+$cx,$mzy+$cy+16); $pdf->Cell(5,5,$pp54,0,0,'L');//
		
		 
		 
	     //natureza do material inerte
		 $pdf->setXY($mzx+85,$mzy+55);
		 $pdf->Cell(100,5,utf8_decode($vetorRaioX[55]),0,0,'C');//natureza do material inerte
         //aqui aquele espaco abaixo de natureza do material ienter
		 $vetorRXOESP=$objetocalculoRaioX-> captura_registros_invasorasRX("1OES",$amostraLong);
		 $vetorRXSILV=$objetocalculoRaioX-> captura_registros_invasorasRX("2SIL",$amostraLong);
		 $vetorRXNOCT=$objetocalculoRaioX-> captura_registros_invasorasRX("3NOT",$amostraLong);
		 $vetorRXNOCP=$objetocalculoRaioX-> captura_registros_invasorasRX("4NOP",$amostraLong);
		 $vetorRXFRAC=$objetocalculoRaioX-> captura_registros_invasorasRX("5FRA",$amostraLong);
         //captura o tamnaho dos vetores 
	     $limiteOESP=sizeof($vetorRXOESP)-1;
		 $limiteSILV=sizeof($vetorRXSILV)-1;
		 $limiteNOCT=sizeof($vetorRXNOCT)-1;
		 $limiteNOCP=sizeof($vetorRXNOCP)-1;
		 $limiteFRAC=sizeof($vetorRXFRAC)-1;
		 
		 //aqui vai preencher aquele espaco com os contaminantes que tem no setor pureza
		 $xLocal=$mzx+85;
		 $yLocal=$mzy+67;
	 if($assinalouPUR == "SIM"):
         //captura tudo e joga num vetor OESP+SILV+FRAC 
	     $contaIncosNaPureza=0;
         //PEGA OS OESP
		 for($i=1;$i<=$limiteOESP;$i++):
	       $contaIncosNaPureza++;
		   $vetorIncos[$contaIncosNaPureza]=$vetorRXOESP[$i][0];
         endfor;
		 //PEGA OS SILV
		 for($i=1;$i<=$limiteSILV;$i++):
	       $contaIncosNaPureza++;
		   $vetorIncos[$contaIncosNaPureza]=$vetorRXSILV[$i][0];
         endfor;
		 //PEGA OS REDUZIDOS
		 for($i=1;$i<=$limiteFRAC;$i++):
	       $contaIncosNaPureza++;
		   $vetorIncos[$contaIncosNaPureza]=$vetorRXFRAC[$i][0];
         endfor;
		 //imprime o nome dos INCOS encontrados na pureza
		 $pdf->SetFont('Arial','I',8);
		 $concatena="";
         $somaTama=0;  
		 for($i=1;$i<=$contaIncosNaPureza;$i++):
           $nomeInco=$vetorIncos[$i];//captura cada nome inco
           $tama=strlen($nomeInco);//mede o tamanho do inco
		   $somaTama+=$tama; 
           if($somaTama>60)://ele imprime antes de concatenaar o proximo 
		       $pdf->setXY($xLocal,$yLocal);
		       $pdf->Cell(99,3,$concatena,0,0,'L');//nome contaminante
		       $yLocal+=3;
               $concatena=$nomeInco;//ja pega o proximo
               $somaTama=$tama;  
           else:
		       $concatena= $concatena."; ".$nomeInco;//concatena os incos
		   endif;		    
         endfor;
         //imprime o reste numa linha nova
         if(strlen($concatena)>0):// 
		       $pdf->setXY($xLocal,$yLocal);
		       $pdf->Cell(99,3,$concatena,0,0,'L');//nome contaminante
		 else:	   
               //caso nao achou nenhum contaminante
		       $pdf->setXY($xLocal,$yLocal);
		       $pdf->Cell(99,3,"-O-",0,0,'C');//nome contaminante
         endif;
		 
		 
		 
      else:
	     $pdf->setXY($xLocal,$yLocal);
	     $pdf->Cell(99,3,"-O-",0,0,'C');//nome contaminante
      
      endif;//testou se realmente marcou pureza pois se nao marcou simplesmente coloca um -O- aqui
		 //contaminantes

	     //outras sementes 
		 if($assinalouPUR == "SIM"):
			 $outrasSementes= $vetorRXOESP[0][0]+$vetorRXSILV[0][0]+$vetorRXNOCT[0][0]+$vetorRXNOCP[0][0]; 
			 //$parametroOutrasCultivares=$vetorCapturaGeral[49];// peso outras cultivares
			 $parametroOutrasCultivares=$pp11;//dimicrion quer o peso da pureza
			 $dataAnalistaOutrasCultivares=$dataPureza;
			 $parametroPragas='???';
		     //$outrasSementes ='-N-';//campo outras sementes
         else:
		     $outrasSementes ='-O-';//campo outras sementes
			 $parametroOutrasCultivares='-O-';
			 $dataAnalistaOutrasCultivares='-O-';
			 $parametroPragas='-O-';
        endif;
        //SE NAO FOR FEIJAO, OS DADOS RELATIVO A OUTRAS CULTIVARES VEM -O-
		if(substr($especieComum,0,3)!='FEI' ):
		  $parametroOutrasCultivares='-O-';
		  $dataAnalistaOutrasCultivares='-O-';
		endif;
		//$parametroOutrasCultivares='XXX';
	
		        
		 //verificacao de outras cultivares em
		 $pdf->setXY($mzx+65,$mzy+76.3);
		 $pdf->Cell(82,5,$parametroOutrasCultivares.' g  ' . $vetorRaioX[286],0,0,'L');//verificacao de outras cultivare em
		 $pdf->Cell(20,5,$dataAnalistaOutrasCultivares,0,0,'L');//verificacao de outras cultivare em
		 $reanLong=$vetorRaioX[62];	
		 	 
		 //(SEMENTES INFESTADAS))
		 if($assinalouPUR == "SIM"):
           $item1=$vetorRaioX[237];   
           $item2=$vetorRaioX[27];   
           $item3=$vetorRaioX[28];   
           $item4=$vetorRaioX[18];   
           $item5=$vetorRaioX[32].'/'.$vetorRaioX[33];   
         else:
           $item1="-O-";   
           $item2="-N-";   
           $item3="-N-";   
           $item4="-N-";   
           $item5="-O-";   
		 endif; 

		 $pdf->setXY($mzx+0,$mzy+80);
		 $pdf->Cell(52,5,'Sementes infestadas em:'.$item1.' sementes.',0,'L');//pragas numero em
		 //$pdf->Cell(25,5,$item1,0,'L');//pragas numero em
		 $pdf->Cell(17,5,'Leitura1='. $item2,0,0,'L');//
		 $pdf->Cell(17,5,'Leitura2='. $item3,0,0,'L');//
		 $pdf->Cell(37,5,'Sementes infestadas='. $item4,0,0,'L');//
		 $pdf->Cell(30,5,"Data/Rubrica:".utf8_decode($item5),0,0,'L');//
	
		 //determincacao de outras sementes por numero(fic_data_contaminante  e fic_operador_contaminante )
		 if($assinalouPUR == "SIM"):
		    $dataRubricaOutrasSemNumero=$vetorRaioX[216].'/'. utf8_decode($vetorRaioX[215]);
		 else:
		    $dataRubricaOutrasSemNumero="-O-";
			$vetorRaioX[21]="-O-";
			$vetorRaioX[21]="-O-";
			$vetorRaioX[105]="-O-";
			$limiteOESP=1;
			$limiteSILV=1;
			$limiteNOCT=1;
			//COLOCA -0- ONDE VAI OS NOMES
			$vetorRXOESP[1][0]="-O-";
			$vetorRXSILV[1][0]="-O-";
			$vetorRXNOCT[1][0]="-O-";
            //COLOCA -0- NOS TOTAIS
			$vetorRXOESP[0][0]="-O-";
			$vetorRXSILV[0][0]="-O-";
			$vetorRXNOCT[0][0]="-O-";
			$vetorRXNOCP[0][0]="-O-";
		 endif;
		 
		 
		 $pdf->setXY($mzx+110,$mzy+85);
		 $pdf->Cell(30,5, $dataRubricaOutrasSemNumero,0,0,'L');//
		 
		 
		 //OUTRAS ESPECIES CULTIVADAS EM
		 $oecEM=$vetorRaioX[21].'g';//estava 220
		 $pdf->setXY($mzx+32,$mzy+89);$pdf->Cell(10,5,$oecEM,0,0,'L');//nocivas $oecEM,0,0,'L');//oecem
		 //silvestres EM
		 $silEM=$vetorRaioX[21].'g';//estava 220
		 $pdf->setXY($mzx+80,$mzy+89);$pdf->Cell(10,5,$silEM,0,0,'L');//nocivas $oecEM,0,0,'L');//oecem
		 //nocivas em(Pureza + complemento))
		 $pesoComplementoAqui=$vetorRaioX[106];
		 $pesoNocivas=$pesoPureza+$pesoComplemento;
		 $nocEM=$vetorRaioX[105].'g';
		 $pdf->setXY($mzx+135,$mzy+89);$pdf->Cell(10,5,$nocEM,0,0,'L');//nocivas $oecEM,0,0,'L');//oecem

		 
		 //imprime oesp
		 $yLocal=$mzy+91;
		 $xLocal=$mzx+1;
		 //se nao tem nada coloca zero  (0)
		 if($limiteOESP==0):
		    $limiteOESP=1;
		    $vetorRXOESP[1][0]="(0)";	
		 endif;	
		 for($i=1;$i<=$limiteOESP;$i++):
		   $yLocal+=3;
		   $pdf->SetFont('Arial','I',8);
		   $pdf->setXY($xLocal,$yLocal); $pdf->Cell(37,3,$vetorRXOESP[$i][0],0,0,'L');//nome contaminante
		   $pdf->SetFont('Arial','',8);
		   $pdf->Cell(10,3,$vetorRXOESP[$i][1],0,0,'L');//nome contaminante
         endfor;	
		 $pdf->setXY(50,$mzy+119); $pdf->Cell(100,5,$vetorRXOESP[0][0],0,0,'L');//////total oesp  
		 //imprime silv
		 $yLocal=$mzy+91;
		 $xLocal=$mzx+47;
		 //se nao tem nada coloca zero  (0)
		 if($limiteSILV==0):
		    $limiteSILV=1;
		    $vetorRXSILV[1][0]="(0)";	
		 endif;	
		 for($i=1;$i<=$limiteSILV;$i++):
		   $yLocal+=3;
		   $pdf->SetFont('Arial','I',8);
		   $pdf->setXY($xLocal,$yLocal); $pdf->Cell(38,3,$vetorRXSILV[$i][0],0,0,'L');//nome contaminante
		   $pdf->SetFont('Arial','',8);
		   $pdf->Cell(10,3,$vetorRXSILV[$i][1],0,0,'L');//nome contaminante
         endfor;	
		 $pdf->setXY(96,$mzy+119); $pdf->Cell(100,5,$vetorRXSILV[0][0],0,0,'L');//////total silv

         //como funciona isso aqui e nao posso apagar
         //se ele tem nociva ele imprime normal o que achou
		 //se ele nao tem nocivas  mas marcou pureza  ele vai colocar (0)+(0) na coluna
		 //se ele nao marcou pureza ele vai colocar -O- 
		 //detalhe: primeir colcoa nocivas e depois verifica os detalhes na na parte de codido de proibidas
		 //imprime NOCT vai examinar cada nociva para ver se tem fracao
		 $yLocal=$mzy+91;
		 $xLocal=$mzx+92;
		 for($i=1;$i<=$limiteNOCT;$i++):
		   $yLocal+=3;
		   $pdf->SetFont('Arial','I',8);
           $nomeToleradaOriginal=$vetorRXNOCT[$i][0];//CAPTURA A TOLERADA NA FRACAO COMPELTA
           $quantidadeToleradaFracaoCompleta=$vetorRXNOCT[$i][1]; 
		   $nomeToleradaFinal=$nomeToleradaOriginal."(0)+"."(".$quantidadeToleradaFracaoCompleta.")";
		   if($assinalouDOS=="NAO"  || $assinalouPUR=="NAO" ) $nomeToleradaFinal="-O-";
		   //vai abrir o VETORFRAC
     	   for($ii=1;$ii<=$limiteFRAC;$ii++):
              $nomeToleradaFracaoReduzida=$vetorRXFRAC[$ii][0]; 
              $quantidadeToleradaFracaoReduzida=$vetorRXFRAC[$ii][1]; 
              //PERGUNTA SE A TOLERADA ESTA NA FRACAO E SE ESTVER COLOCA A QUANTIDADE
              if($nomeToleradaOriginal==$nomeToleradaFracaoReduzida):
			     $quantidadeAjustada=$quantidadeToleradaFracaoCompleta-$quantidadeToleradaFracaoReduzida;
			     $nomeToleradaFinal=$nomeToleradaOriginal."(".$quantidadeToleradaFracaoReduzida.")+(".$quantidadeAjustada.")";
              endif;
           endfor;
		   
		   
		   
		   
		   $pdf->setXY($xLocal,$yLocal);
		   $pdf->Cell(68,3,$nomeToleradaFinal,0,0,'L');//nome contaminante
		   $pdf->SetFont('Arial','',8);
		   $pdf->Cell(10,3,$vetorRXNOCT[$i][1],0,0,'L');//nome contaminante
         endfor;	
		 $pdf->setXY(175,$mzy+119); $pdf->Cell(100,5,$vetorRXNOCT[0][0],0,0,'L');//////total noct 
		 


		 //imprime NOCP
		 $xLocal=$mzx+92;
		 //se nao tem nada coloca zero  (0)
		 if($limiteNOCT==0 && $limiteNOCP==0 ):
		    $limiteNOCP=1;
		    $vetorRXNOCP[1][0]="(0)";	
		 endif;
		 
		 //
		 for($i=1;$i<=$limiteNOCP;$i++):
		   $yLocal+=3;
		   $pdf->SetFont('Arial','I',8);
           $nomeProibidaOriginal=$vetorRXNOCP[$i][0];//CAPTURA A Proibida NA FRACAO COMPELTA
           $quantidadeProibidaFracaoCompleta=$vetorRXNOCP[$i][1];
		   if($quantidadeProibidaFracaoCompleta>0): 
		       $nomeProibidaFinal=$nomeProibidaOriginal."(0)+"."(".$quantidadeProibidaFracaoCompleta.")";
		   else:	   
               $nomeProibidaFinal="(0)+(0)";
           endif; 
		   
		   //vai abrir o VETORFRAC
     	   for($ii=1;$ii<=$limiteFRAC;$ii++):
              $nomeProibidaFracaoReduzida=$vetorRXFRAC[$ii][0]; 
              $quantidadeProibidaFracaoReduzida=$vetorRXFRAC[$ii][1]; 
              //PERGUNTA SE A Proibida ESTA NA FRACAO E SE ESTVER COLOCA A QUANTIDADE
              if($nomeProibidaOriginal==$nomeProibidaFracaoReduzida):
			     $quantidadeAjustada=$quantidadeProibidaFracaoCompleta-$quantidadeProibidaFracaoReduzida;
				 if($quantidadeProibidaFracaoReduzida>0 ||  $quantidadeAjustada>0):
				    $nomeProibidaFinal=$nomeProibidaOriginal."(".$quantidadeProibidaFracaoReduzida.")+(".$quantidadeAjustada.")";
					//$nomeProibidaFinal="kkk";
				 else:
				    $nomeProibidaFinal="(0)+(0)";
				 endif;
              endif;
           endfor;
		   $pdf->setXY($xLocal,$yLocal); 
		   $pdf->Cell(88,3,$nomeProibidaFinal,0,0,'L');//nome contaminante
		   $pdf->SetFont('Arial','',8);
		   $pdf->Cell(10,3,$vetorRXNOCP[$i][1],0,0,'L');//quantidade contaminante
         endfor;
		 $pdf->setXY(189,$mzy+119); 
		 $pdf->Cell(100,5,$vetorRXNOCP[0][0],0,0,'L');//////total nocp 
		 
 
		 
		 

		 
 ################iPARTE  ONDE VAO AS LEITURAS#######################################
######################COMECO DA GERMINACAO#############################
######################COMECO DA GERMINACAO#############################
######################COMECO DA GERMINACAO#############################
######################COMECO DA GERMINACAO#############################
######################COMECO DA GERMINACAO#############################
######################COMECO DA GERMINACAO#############################
######################COMECO DA GERMINACAO#############################
######################COMECO DA GERMINACAO#############################
######################COMECO DA GERMINACAO#############################
######################COMECO DA GERMINACAO#############################
//////GERMINACAO//////////////////////////////////////////////////////##########################################
//////GERMINACAO//////////////////////////////////////////////////////##########################################
//////GERMINACAO//////////////////////////////////////////////////////##########################################
//////GERMINACAO//////////////////////////////////////////////////////##########################################
//////GERMINACAO//////////////////////////////////////////////////////##########################################
//////GERMINACAO//////////////////////////////////////////////////////##########################################
################inicio da parte de GERMINACAO########################################


		$larguraImagemGerminacao=24;//aquela imagem com letras na vertical
		$larguraDasMedias=11;
		$espacoPerdido=($larguraImagemGerminacao+$larguraDasMedias)*2;
        $totalEspacoDisponivelParaGerminacao=168;
		$espacoLiquidoParaColunas=$totalEspacoDisponivelParaGerminacao - $espacoPerdido;
		$avancoLiquido=$espacoLiquidoParaColunas/2;//tudo que realemente tem para distrubuir nas colunas
		//$xComeco=$espacoDisponivelParaGerminacao/2;
		$comeco[1]=$margemEsquerda+$larguraImagemGerminacao;
		$comeco[2]=$margemEsquerda+$larguraImagemGerminacao+$larguraDasMedias+$avancoLiquido+35;//este 18 é um corretivo 
		$larguraBase=$espacoLiquidoParaColunas/7.5;//largura para 4 colunas que depois divide por 2 se for 8 coluas
        $cota1+=139;//ERA 46						 
        $cotaInicoGerminacao=100;
		$cotaInicio=158;//inicio da grade de leituras
		$alturaDasLinhas=4;
		$vetorTeste[1]="GER";
    	$vetorTeste[2]="EAC";
		$vetorTeste[3]="GE2";
		//vai abrir um for que vai fechar la no final
        for($tipoTeste=1;$tipoTeste<=2;$tipoTeste++)://teste pode ser GER,EAC,GE2
           //$xComeco=($tipoTeste-1)*$parametroAvanco;
           $xComeco=$comeco[$tipoTeste];
		   $caminhoFinal="ImagensClientes/imagemTRISOLOGerminacao.jpg";
           $pdf->Image($caminhoFinal,$xComeco-$larguraImagemGerminacao,$cota1+22.2,$larguraImagemGerminacao,85,'JPG');
		    
		   $teste=$vetorTeste[$tipoTeste];
           //$numeroDeColunas=$numCol[$tipoTeste];
		   if($teste=="GER"):
               $reanLong=$vetorRaioX[62];
		       $analista=$vetorRaioX[40];
               $nomeTeste='TESTE DE GERMINAÇÃO';
               $inicioTeste=$vetorRaioX[93];
			   $dataGeral=$vetorRaioX[39];
			   $dataGeral=date("d/m/Y",strtotime($dataGeral));
               $substrato=$vetorRaioX[36];			   
			   $germinador=$vetorRaioX[38];//GERMINADOR GER
			   $temperatura=$vetorRaioX[35];//TEMPERATURA GER
			   $analista=  $vetorRaioX[40]; //RUBRICA GER
			   $tratamento=$vetorRaioX[61];//TRATAMENTO GER
   			   if($assinalouGER=='NAO'):
				  $inicioTeste='-O-';//INICIADO GER
		          $dataGeral='-O-';
				  $substrato='-O-';//SUBSTRATO GER
				  $germinador='-O-';//GERMINADOR GER
				  $temperatura='-O-';//TEMPERATURA GER
				  $analista='-O-'; //RUBRICA GER
				  $tratamento='-O-';//TRATAMENTO GER
			   endif;
	       endif;//testa se é germinacao
		   
		   if($teste=="EAC"):
               $reanLong=$vetorRaioX[91];
		       $analista=$vetorRaioX[73];
               $nomeTeste='Envelhecimento acelerado';
               $inicioTeste=$vetorRaioX[94];
			   $dataGeral=$vetorRaioX[72];
			   $dataGeral=date("d/m/Y",strtotime($dataGeral));
			   if($reanLong<1)$dataGeral=' ';
               $substrato=$vetorRaioX[69];			   
			   $germinador=$vetorRaioX[71];//GERMINADOR GER
			   $temperatura=$vetorRaioX[68];//TEMPERATURA GER
			   $analista=  $vetorRaioX[73]; //RUBRICA GER
			   $tratamento=$vetorRaioX[74];//TRATAMENTO GER
   			   if($assinalouEAC=='NAO'):
				  $inicioTeste='-O-';//INICIADO GER
		          $dataGeral='-O-';
				  $substrato='-O-';//SUBSTRATO GER
				  $germinador='-O-';//GERMINADOR GER
				  $temperatura='-O-';//TEMPERATURA GER
				  $analista='-O-'; //RUBRICA GER
				  $tratamento='-O-';//TRATAMENTO GER
			   endif;
	       endif;//testa se é eac
           /////////////////////////////////

         $cota1a=$cota1+1*4.5;
         $cota1b=$cota1+2*4.5;
         $cota1c=$cota1+3*4.5;
         $cota1d=$cota1+4*4.5;
         $cota1e=$cota1+5*4.5;
		 $derrapa=0;//para reservar mais espaco para a primeira parte que tem substrato e tratamento que usam mais espaco
         $posicaoMeio=$parametroAvanco; //ERA 97
		 $larguraColunasDizeresTestes=6+$totalEspacoDisponivelParaGerminacao/2;
		 $larguraColunasAuxiliares=$larguraColunasDizeresTestes/2;
         //TEST3E DE GERMINACAO PADRAO 
		 $tamanho=strlen($analista);
		 $pdf->setXY($xComeco-$larguraImagemGerminacao,$cota1);
		 $pdf->SetFont('Arial','B',9);
		 $pdf->cell($larguraColunasDizeresTestes,4.5,utf8_decode($nomeTeste),1,0,'C',1);
		 
		 //TEXTOS AUXILIARES, TRATAMENTO TEMPERATURA ETC
		 $posicaoEspecial=$xComeco-$larguraImagemGerminacao;
		 $pdf->SetFont('Arial','',8);
         $pdf->setXY($posicaoEspecial,$cota1a);
		 $pdf->cell($larguraColunasAuxiliares,4.5,'Iniciado em: '.$inicioTeste,1,0,'L');//GER
		 $pdf->cell($larguraColunasAuxiliares,4.5,utf8_decode('Data:').$dataGeral,1,0,'L');

		 $pdf->setXY($posicaoEspecial,$cota1b);
		 $pdf->cell($larguraColunasAuxiliares,4.5,'Substrato: '.utf8_decode( $substrato),1,0,'L');
		 $pdf->cell($larguraColunasAuxiliares,4.5,'Germ.: '.utf8_decode($germinador),1,0,'L');

		 $pdf->setXY($posicaoEspecial,$cota1c);
		 $pdf->cell($larguraColunasAuxiliares,4.5,'Temperatura: '.utf8_decode($temperatura),1,0,'L');
		 $pdf->cell($larguraColunasAuxiliares,4.5,'Rubrica:'.utf8_decode($analista),1,0,'L');//GER
		 
		 $pdf->setXY($posicaoEspecial,$cota1d);
		 $pdf->cell($larguraColunasAuxiliares,4.5,'Tratamento: '.utf8_decode($tratamento),1,0,'L');
		 
		 
		 

		 $matrizBaseNumeroCol=$objetoCalculoGerminacaoFichaPadrao->capturaBaseNumeroColunas($reanLong);
         $base=$matrizBaseNumeroCol[0];	//base	        		 
         $numeroDeColunas=$matrizBaseNumeroCol[1];//numero de colunas	
         $numeroDeColunasOriginal=$numeroDeColunas;
		 //aqui faz um ajuste para dimicrom se for 16 colunas passa par 4
         //if($numeroDeColunas==16)$numeroDeColunas=4;  		 
         //colocar uma regra geral//despejando a matriz do lab
         $cota=$cotaInicio;
		 $passaDados="NAO";
   		 if($teste=='GER' && $assinalouGER=='SIM')$passaDados='SIM';
   		 if($teste=='EAC' && $assinalouEAC=='SIM')$passaDados='SIM';
		 if($numeroDeColunas==4)$larguraColuna=$larguraBase;
		 if($numeroDeColunas==8)$larguraColuna=$larguraBase/2;
		 if($numeroDeColunas==16)$larguraColuna=$larguraBase/4;
         //para resolver o caso que eu posso nao ter solicitado eac, e nem entrado la ai o numero de colunas fica zero
         if($numeroDeColunas<2)$numeroDeColunas=4;		 
		 //vai passar dados simples ou seja, sem compactacao
         if($passaDados=='SIM'): //vai capturar  a matriz/caso contrario nem vai entrar  
		 $vetorAdaptado=$objetoCalculoGerminacaoFichaPadrao->ajustaSimples($reanLong,$base,$numeroDeColunas);
		 else: //se nao passa entao coloca -n- 
		   //vai zerar todo vetor adaptado 
	       for($i=1;$i<=30;$i++):
	           for($j=1;$j<=$numeroDeColunas;$j++):
			     $vetorAdaptado[$i][$j]="-N-";
			   endfor;		
		   endfor;		
         endif;//pergunta se passa 
         //$saoTome="numcomulas=". $numeroDeColunasOriginal . "  ReanLong=" . $reanLong ."  teste=" . $teste . "  passadados="  . $passaDados; 
         //$pdf->setXY(0,0);
		 
		 //if($tipoTeste==1)$pdf->Cell($larguraUtil,5,$saoTome,1,1);



         //coloca as letrinhas no topo das colunas
		 $vetorAdaptado[0][1]='A';
		 $vetorAdaptado[0][2]='B';
		 $vetorAdaptado[0][3]='C';
		 $vetorAdaptado[0][4]='D';
		 $vetorAdaptado[0][5]='E';
		 $vetorAdaptado[0][6]='F';
		 $vetorAdaptado[0][7]='G';
		 $vetorAdaptado[0][8]='H';
		 $vetorAdaptado[0][9]='I';
		 $vetorAdaptado[0][10]='J';
		 $vetorAdaptado[0][11]='K';
		 $vetorAdaptado[0][12]='L';
		 $vetorAdaptado[0][13]='M';
		 $vetorAdaptado[0][14]='N';
		 $vetorAdaptado[0][15]='O';
		 $vetorAdaptado[0][16]='P';
		 
         //jogando no vetor adaptado uns preenchimentos especiais
		 for($i=2;$i<=21;$i++):
		   for($j=1;$j<=$numeroDeColunas;$j++):
		      $valor=trim($vetorAdaptado[$i][$j]);  
			  //se acha em branco a priori coloca traco 
		      if($valor==''):
			      //$vetorAdaptado[$i][$j]='k'.$i.$j;
			      $vetorAdaptado[$i][$j]='-';
			  endif;	   
              
			  
			  //se na linha de dados deoixou em branco  entao coloca zero
		      if($valor==''):
			      //if($i==5  ||$i==9  ||$i==13  || $i==14 || $i==15) $vetorAdaptado[$i][$j]='k'.$i.$j.'0';
			      if($i==5  ||$i==9  ||$i==13  || $i==14 || $i==15) $vetorAdaptado[$i][$j]='0';
			  endif;	   
           endfor;
         endfor;		 
		 
		 
		 
		 
		 
		 //MATRIZ DE DIZERES(numera as linha na ficha e traz para ca hihihhi))
		 //linhas do silas
		 //1-normais
		 //5=deformadas
		 //9=infecionadas
		 //13=mortas
		 //14=duras
		 //15=dormentes
		 
		 
		 
		 
		 
	
 
		 for($L=0;$L<=21;$L++):
		       $cota+=$alturaDasLinhas;
		       $pdf->setXY($xComeco,$cota);
			   //vai imprimir as normais restringindo o setor
			   
               if($L>=0 && $L<5):
	               $linhaSilas=$L;			   
			       for($coluna=1;$coluna<=$numeroDeColunas;$coluna++): 
				      //if($numeroDeColunas<9):
		                 $pdf->Cell($larguraColuna,$alturaDasLinhas,$vetorAdaptado[$linhaSilas][$coluna],1,0,'C');	
					  //endif;	 
	               endfor;
               endif;
               
			   //imprime o total de normais
			   if($L==5):
		           for($coluna=1;$coluna<=$numeroDeColunas;$coluna++): 
				     //if($numeroDeColunas<9):
		              $pdf->Cell($larguraColuna,$alturaDasLinhas,$vetorAdaptado[25][$coluna],1,0,'C');	
					 //endif; 
		           endfor;                             
               endif; 
			   
			   
			   //vai imprimir as anormais-deformadas restringindo o setor
               if($L>5 && $L<8):
	               $linhaSilas=$L-1;			   
			       for($coluna=1;$coluna<=$numeroDeColunas;$coluna++): 
				     //if($numeroDeColunas<9):
		              $pdf->Cell($larguraColuna,$alturaDasLinhas,$vetorAdaptado[$linhaSilas][$coluna],1,0,'C');	
					 //endif; 
	               endfor;
               endif;
			   
			   //imprime o total de anormais-deformadas
			   if($L==8):
		           for($coluna=1;$coluna<=$numeroDeColunas;$coluna++):
				     //if($numeroDeColunas<9): 
		              $pdf->Cell($larguraColuna,$alturaDasLinhas,$vetorAdaptado[26][$coluna],1,0,'C');	
					 //endif; 
		           endfor;                             
               endif;
			    
			   //vai imprimir as anormais-infecionadas restringindo o setor
               if($L>8 && $L<11):
	               $linhaSilas=$L;			   
			       for($coluna=1;$coluna<=$numeroDeColunas;$coluna++): 
                     //if($numeroDeColunas<9):
		              $pdf->Cell($larguraColuna,$alturaDasLinhas,$vetorAdaptado[$linhaSilas][$coluna],1,0,'C');
					 //endif; 	
	               endfor;
               endif;
			   
			   //imprime o total de anormais-infecionadas
			   if($L==11):
		           for($coluna=1;$coluna<=$numeroDeColunas;$coluna++): 
				     //if($numeroDeColunas<9):
		              $pdf->Cell($larguraColuna,$alturaDasLinhas,$vetorAdaptado[27][$coluna],1,0,'C');	
					 //endif; 
		           endfor;                             
               endif; 

			   ######################################################################
			   //vai imprimir as dorments  restringindo o setor
               if($L==12):
	               $linhaSilas=$L+3;//resulta linha 13 do silas			   
			       for($coluna=1;$coluna<=$numeroDeColunas;$coluna++):
				     //if($numeroDeColunas<9):
                       $pdf->Cell($larguraColuna,$alturaDasLinhas,$vetorAdaptado[$linhaSilas][$coluna],1,0,'C');
					 //endif;  	
	               endfor;
               endif;
			   //imprime brancos
			   if($L==13):
		           for($coluna=1;$coluna<=$numeroDeColunas;$coluna++):
				     //if($numeroDeColunas<9):
		              $pdf->Cell($larguraColuna,$alturaDasLinhas,"-",1,0,'C');	
					 //endif; 
		           endfor;                             
               endif;
               //total 
			   if($L==14):
		           for($coluna=1;$coluna<=$numeroDeColunas;$coluna++): 
				     //if($numeroDeColunas<9):
		              $pdf->Cell($larguraColuna,$alturaDasLinhas,$vetorAdaptado[30][$coluna],1,0,'C');	
					 // endif; 
		           endfor;                             
               endif;


              //durasssssssssssssssssssssssss
               if($L==15):
	               $linhaSilas=$L-1;//resulta linha 13 do silas			   
			       for($coluna=1;$coluna<=$numeroDeColunas;$coluna++):
				    //if($numeroDeColunas<9):
                     $pdf->Cell($larguraColuna,$alturaDasLinhas,$vetorAdaptado[$linhaSilas][$coluna],1,0,'C');
					//endif; 	
	               endfor;
               endif;
			   //imprime brancos
			   if($L==16):
		           for($coluna=1;$coluna<=$numeroDeColunas;$coluna++): 
				     //if($numeroDeColunas<9):
		              $pdf->Cell($larguraColuna,$alturaDasLinhas,"-",1,0,'C');	
					 //endif; 
		           endfor;                             
               endif;
               //total de duras
			   if($L==17):
			       $linhaSilas=$L-3;//resulta linha 13 do silas	
		           for($coluna=1;$coluna<=$numeroDeColunas;$coluna++): 
				     //if($numeroDeColunas<9):
		              $pdf->Cell($larguraColuna,$alturaDasLinhas,$vetorAdaptado[29][$coluna],1,0,'C');
					// endif; 	
		           endfor;                             
               endif;



			   //vai imprimir as mortas  restringindo o setor
               if($L==18):
	               $linhaSilas=$L-5;//resulta linha 13 do silas			   
			       for($coluna=1;$coluna<=$numeroDeColunas;$coluna++):
				    //if($numeroDeColunas<9): 
                     $pdf->Cell($larguraColuna,$alturaDasLinhas,$vetorAdaptado[$linhaSilas][$coluna],1,0,'C');	
					//endif; 
	               endfor;
               endif;
			   //imprime brancos
			   if($L==19):
		           for($coluna=1;$coluna<=$numeroDeColunas;$coluna++): 
                     //if($numeroDeColunas<9):
		              $pdf->Cell($larguraColuna,$alturaDasLinhas,"-",1,0,'C');
					 //endif; 	
		           endfor;                             
               endif;
               //total mortas
			   if($L==20):
		           for($coluna=1;$coluna<=$numeroDeColunas;$coluna++): 
                    //if($numeroDeColunas<9):
		              $pdf->Cell($larguraColuna,$alturaDasLinhas,$vetorAdaptado[28][$coluna],1,0,'C');	
					//endif;  
		           endfor;                             
               endif;
		 endfor;//for que varia de 1 a 22 linhas






		 //vai colocar alguns rect para as medias
		 $x=$xComeco+$larguraBase*4;
		 $y=$cotaInicio+$alturaDasLinhas;
		 $Lx=$larguraBase+1;
		 $Hy=$alturaDasLinhas*23;
		 //$pdf->Rect($x,$y,$Lx,$Hy);//retangulo externo
		 //$y1=$y+6*$alturaDasLinhas;$pdf->Line($x,$y1,$x+$Lx,$y1);//linha antes de anormais
		 //$y1=$y+11*$alturaDasLinhas;$pdf->Line($x,$y1,$x+$Lx,$y1);//linha antes de infec
		 //$y1=$y+16*$alturaDasLinhas;$pdf->Line($x,$y1,$x+$Lx,$y1);//linha antes de mortas
		 //$y1=$y+19*$alturaDasLinhas;$pdf->Line($x,$y1,$x+$Lx,$y1);//linha antes de anormais
		 //$y1=$y+21*$alturaDasLinhas;$pdf->Line($x,$y1,$x+$Lx,$y1);//linha antes de anormais
         //vai imprimir as medias

		 
         $y1=$y+0*$alturaDasLinhas;
		 $pdf->setXY($x,$y1);
         $pdf->Cell($larguraDasMedias+3,$alturaDasLinhas,utf8_decode('Média'),1,0,'C');	
         if($teste=="GER"):
		    $normais=$vetorRaioX[14];
		    $deformadas=$vetorRaioX[64]-$vetorRaioX[99];
		    $infecionadas=$vetorRaioX[99];
		    $mortas=$vetorRaioX[65];
		    $duras=$vetorRaioX[66];
		    $dormentes=$vetorRaioX[67];
            if($assinalouGER=='NAO'):
              $normais='-N-';	//normais
              $deformadas='-N-';	//anormais
              $infecionadas='-N-';	//anormais infec
              $mortas='-N-';	//moratas
              $duras='-N-';	//duras
              $dormentes='-N-';	//dormentes
            endif;
		 endif;         
   		 if($teste=="EAC"):
		    $normais=$vetorRaioX[12];
		    $deformadas=$vetorRaioX[76]-$vetorRaioX[100];
		    $infecionadas=$vetorRaioX[100];
		    $mortas=$vetorRaioX[78];
		    $duras=$vetorRaioX[101];
		    $dormentes=$vetorRaioX[77];
    		if($assinalouEAC=='NAO'):
              $normais='-N-';	//normais
              $deformadas='-N-';	//anormais
              $infecionadas='-N-';	//anormais infec
              $mortas='-N-';	//moratas
              $duras='-N-';	//duras
              $dormentes='-N-';	//dormentes
            endif;
		 endif;
		          
         $y1=$y+1*$alturaDasLinhas;$pdf->setXY($x,$y1);   $pdf->Cell($larguraDasMedias+3,$alturaDasLinhas*5,$normais,1,0,'C');	//normais
         $y1=$y+6*$alturaDasLinhas;$pdf->setXY($x,$y1);   $pdf->Cell($larguraDasMedias+3,$alturaDasLinhas*3,$deformadas,1,0,'C');	//deformadas
         $y1=$y+9*$alturaDasLinhas;$pdf->setXY($x,$y1);  $pdf->Cell($larguraDasMedias+3,$alturaDasLinhas*3,$infecionadas,1,0,'C');	//infecs
         $y1=$y+12*$alturaDasLinhas;$pdf->setXY($x,$y1);  $pdf->Cell($larguraDasMedias+3,$alturaDasLinhas*3,$dormentes,1,0,'C');	//dorm
         $y1=$y+15*$alturaDasLinhas;$pdf->setXY($x,$y1);  $pdf->Cell($larguraDasMedias+3,$alturaDasLinhas*3,$duras,1,0,'C');	//duta
         $y1=$y+18*$alturaDasLinhas;$pdf->setXY($x,$y1);  $pdf->Cell($larguraDasMedias+3,$alturaDasLinhas*3,$mortas,1,0,'C');	//mortas
	endfor;//FECHA O FOR DO TIPOTESTE

//###############FIM GERMINACAO INICIO DETERMINACOES ADICIONAIS////////////////////
//###############FIM GERMINACAO INICIO DETERMINACOES ADICIONAIS////////////////////
//###############FIM GERMINACAO INICIO DETERMINACOES ADICIONAIS////////////////////
//###############FIM GERMINACAO INICIO DETERMINACOES ADICIONAIS////////////////////
//###############FIM GERMINACAO INICIO DETERMINACOES ADICIONAIS////////////////////
//###############FIM GERMINACAO INICIO DETERMINACOES ADICIONAIS////////////////////
//###############FIM GERMINACAO INICIO DETERMINACOES ADICIONAIS////////////////////
//###############FIM GERMINACAO INICIO DETERMINACOES ADICIONAIS////////////////////
//###############FIM GERMINACAO INICIO DETERMINACOES ADICIONAIS////////////////////
//###############FIM GERMINACAO INICIO DETERMINACOES ADICIONAIS////////////////////
//###############FIM GERMINACAO INICIO DETERMINACOES ADICIONAIS////////////////////
//###############FIM GERMINACAO INICIO DETERMINACOES ADICIONAIS////////////////////
//###############FIM GERMINACAO INICIO DETERMINACOES ADICIONAIS////////////////////

   //OBSERVACOES   E DETERMINACOES ADICIONAIS
   // VAO COLOCAR NA PRIMEIRA LINHA O VIGOR EM FORRAGEIRAS
	//if($assinalouTZO=="SIM"  || $assinalouTZF=="SIM"):
	
	  if(substr($especieComum,0,3)=='SOJ'|| substr($especieComum,0,3)=='FEI'  || substr($especieComum,0,7)=='AMENDOI'):
		 $matrizResumo=$objetocalculo->resumoTetrazolioCalculado($amostraLong);
         //$viab=$matrizResumo[10];//esquema antigo
		 //$vigor=$viab=$matrizResumo[11];//esquema antigo
		 $viabilidadeFinal=$vetorRaioX[11];
		 $vigorFinal=$vetorRaioX[234];
         $vetorResultados[8][$contaAmostras]=$viab;
		 $dataTZ=date("d/m/Y",strtotime($vetorRaioX[241]));
		 $rubricaTZ=$vetorRaioX[242];
		 //$viabilidadeFinal="entrou soja".$especieComum;
	  else:
         $viabForrageira=$vetorRaioX[234];//pega o mesmo valor de tzo  mas direciona para a local cetro e nao cria a legenda embaixo 
         $vigorForrageira=$vetorRaioX[279];//pega vigor forrageira dimicron 170321
		 $viabilidadeFinal=$viabForrageira;
         $vigorFinal=$vigorForrageira;		 
		 $dataTZ=date("d/m/Y",strtotime($vetorRaioX[241]));
		 $rubricaTZ=$vetorRaioX[242];
	     $temTzForrageira='SIM';
		 //$viabilidadeFinal=$especieComum;
		 
	  endif;
	  
	  //JA IMPRIMER 
	  $pdf->setXY($mzx+32,$mzy+236);
	  $pdf->Cell(100,5,utf8_decode("Tetrazólio: Viabilidade=".$viabilidadeFinal.'%   Vigor='.$vigorFinal.'%'),0,0,'L');//DETES
	  $pdf->setXY($mzx+144,$mzy+236);
      if($viabilidadeFinal=='-N-' || $vigorForrageira=='-N-'):
	     $dataTZ="-N-";
		 $$rubricaTZ="-N-";
	  endif; 	 
	  $pdf->Cell(100,5,utf8_decode($dataTZ)." / ".utf8_decode($rubricaTZ),0,0,'L');//DETES
	 // $pdf->Cell(100,5,utf8_decode($rubricaTZ),0,0,'L');//DETES
	  
	//endif;//testa se marcaou tetrazolio



   //AQUI VAI MONTAR A STRING COM BASE NOS TESTES FEITOS QUE DIFEREM DE -N- 
   $estring="";
	if($vetorRaioX[13]!=""):
	    $estring=$estring."  PMS=".$vetorRaioX[13];
		if($vetorRaioX[13]=="-N-"):
		    $dataPMSoperadorPMS='-N-';
		    $dataPMS=$vetorRaioX[234];
		    $rubricaPMS=$vetorRaioX[234];
	    else:
		    $dataPMSBrasil=date("d/m/Y",strtotime($vetorRaioX[214]));		
		    $dataPMSoperadorPMS=$dataPMSBrasil.' / '.$vetorRaioX[117];
		    //$dataPMS=$vetorRaioX[241];
		    $rubricaPMS=$dataPMSoperadorPMS;
        endif;
    endif;	
	//if($vetorRaioX[18]!="")$estring=$estring."  Stes infestadas=".$vetorRaioX[18];
	$pdf->setXY($mzx+2,$mzy+241); $pdf->Cell(30,5,$estring,0,0,'L');//DETES
    //data e rubrica (vai do pms pois dimicrom é assim))
	//$pdf->setXY($mzx+50,$mzy+241);
	//$pdf->Cell(30,5,$dataPMSoperadorPMS.  '  Data:'.$dataPMS. "  Rubrica:".utf8_decode($rubricaPMS),0,0,'L');//DETES,0,0,'L');//DETES
	$pdf->setXY($mzx+144,$mzy+241);
	if($vetorRaioX[13]=="-N-")$rubricaPMS='-N- / -N-';
	$pdf->Cell(30,5,utf8_decode($rubricaPMS),0,0,'L');//DETES,0,0,'L');//DETES




    //oservacoes e data/rubrica
if($assinalouPUR=='SIM')://IMORIME TEXTO SE MARCOU PUREZA CASO CONTRAROIMPRIME -O-
	$textoCompostoObservacoes=$vetorRaioX[63];
	$textoCompostoObservacoes1="A determinação de outras sementes por número, para ";
	$especieComum=trim($especieComum);
	if($especieComum=='SOJA'):
	   $textoCompostoObservacoes2=' Vigna unguiculata ';
	   $textoCompostoObservacoes3=", foi realizada em ".$nocEM.' Teste limitado.';
	   $pdf->setXY($mzx+22,$mzy+247);
	   $pdf->Cell(70,5,utf8_decode($textoCompostoObservacoes1),0,0,'L');//obs composta in45
	   $pdf->SetFont('Arial','I',8);
	   $pdf->Cell(25,5,utf8_decode($textoCompostoObservacoes2),0,0,'L');//obs composta in45
	   $pdf->SetFont('Arial','',8);
	   $pdf->Cell(50,5,utf8_decode($textoCompostoObservacoes3),0,0,'L');//obs composta in45
	
	
	//se for aveia amarela branca ou avei simples 
	elseif($especieComum!='AVEIA PRETA' && substr($especieComum,0,5)=='AVEIA'):
	   $textoCompostoObservacoes2=' Avena strigosa ';
	   $textoCompostoObservacoes3=",  foi realizada em ".$silEM.' Teste limitado.';
	   $pdf->setXY($mzx+22,$mzy+247);
	   $pdf->Cell(70,5,utf8_decode($textoCompostoObservacoes1),0,0,'L');//obs composta in45
	   $pdf->SetFont('Arial','I',8);
	   $pdf->Cell(25,5,utf8_decode($textoCompostoObservacoes2),0,0,'L');//obs composta in45
	   $pdf->SetFont('Arial','',8);
	   $pdf->Cell(50,5,utf8_decode($textoCompostoObservacoes3),0,0,'L');//obs composta in45
	
	elseif($especieComum=='TRIGO'  || $especieComum=='TRIGO DURO'   || $especieComum=='TRITICALE'  || $especieComum=='CENTEIO' || $especieComum=='CEVADA' ):	
	   $textoCompostoObservacoes2='Aveias ';
	   $textoCompostoObservacoes3=", foi realizada em ".$silEM.' Teste limitado.';
	   $pdf->setXY($mzx+22,$mzy+247);
	   $pdf->Cell(70,5,utf8_decode($textoCompostoObservacoes1),0,0,'L');//obs composta in45
	   $pdf->Cell(25,5,utf8_decode($textoCompostoObservacoes2),0,0,'L');//obs composta in45
	   $pdf->Cell(50,5,utf8_decode($textoCompostoObservacoes3),0,0,'L');//obs composta in45

    //SE FOR AVEIA PRETA
	elseif(substr($especieComum,0,11)=='AVEIA PRETA'):	
	   $textoCompostoObservacoes2='Aveias ';
	   $textoCompostoObservacoes3=", foi realizada em ".$silEM.' Teste limitado.';
	   $pdf->setXY($mzx+22,$mzy+247);
	   $pdf->Cell(70,5,utf8_decode($textoCompostoObservacoes1),0,0,'L');//obs composta in45
	   $pdf->Cell(15,5,utf8_decode($textoCompostoObservacoes2),0,0,'L');//obs composta in45
	   $pdf->Cell(50,5,utf8_decode($textoCompostoObservacoes3),0,0,'L');//obs composta in45
       //SE FOR ARROZ VAI O PESO DE NOCIVAS	
	elseif(substr($especieComum,0,5)=='ARROZ'):	
	   $textoCompostoObservacoes2='Outros arroz ';
	   $textoCompostoObservacoes3=", foi realizada em ".$nocEM.' Teste limitado.';
	   $pdf->setXY($mzx+22,$mzy+247);
	   $pdf->Cell(70,5,utf8_decode($textoCompostoObservacoes1),0,0,'L');//obs composta in45
	   $pdf->Cell(35,5,utf8_decode($textoCompostoObservacoes2),0,0,'L');//obs composta in45
	   $pdf->Cell(50,5,utf8_decode($textoCompostoObservacoes3),0,0,'L');//obs composta in45
	elseif(substr($especieComum,0,4)=='FEIJ'):	
	   $textoCompostoObservacoes2='Nocivas';
	   $textoCompostoObservacoes3=", foi realizada em ".$nocEM.' Teste limitado.';
	   $pdf->setXY($mzx+22,$mzy+247);
	   $pdf->Cell(70,5,utf8_decode($textoCompostoObservacoes1),0,0,'L');//obs composta in45
	   $pdf->Cell(35,5,utf8_decode($textoCompostoObservacoes2),0,0,'L');//obs composta in45
	   $pdf->Cell(50,5,utf8_decode($textoCompostoObservacoes3),0,0,'L');//obs composta in45
	//todas DEMAIS especies reastante ming aveia aveia preta etc
	else:  // para azevem , alfafa, girasso, odas que nao sao in45	
	   $textoCompostoObservacoes1="A determinação de outras sementes por número ";
	   $textoCompostoObservacoes3=", foi realizada em ".$silEM.' Teste limitado.';
	   if($assinalouPUR != "SIM"):
		   $textoCompostoObservacoes1="-O-";
		   $textoCompostoObservacoes3=" ";
	   endif;
	   $pdf->setXY($mzx+22,$mzy+247);
	   $pdf->Cell(62,5,utf8_decode($textoCompostoObservacoes1),0,0,'L');//
	   $pdf->Cell(50,5,utf8_decode($textoCompostoObservacoes3),0,0,'L');//
	endif;//TEXTA QUE GRUPO E TRIGO,ARROZ,SOJA....
	
else://CASO NAO TENHA TESTE REALIZAR PUREZA
   $pdf->setXY($mzx+22,$mzy+247);
   $pdf->Cell(62,5,"-O-",0,0,'L');//
endif;	

//campo observacoes digitado na tela de registro de amostra
$pdf->setXY($mzx+22,$mzy+252);
$pdf->Cell($larguraUtil,5,utf8_decode($vetorRaioX[63]),0,0,'L');//observacoes da amostra
	
	
	
	/*eu nao sei qual destes ele vai usar
    //eles vem sempre -N- se nao tiver sido feito 
	$tzo=$vetorRaioX[234];
	$tzf=$vetorRaioX[202];
	$tzoFinal=$tzo;
	$tzfFinal=$tzf;
	//caso os dois serem -N- eu imprimo so umm vea -N-
    if($tzo=='-N-'  && $tzf=='-N-'):
	   $tzoFinal='-N-';
	   $tzfFinal='';
    endif; 
	//caso um deles for diferente de -N- vai apagar o iutro para nao ficar assim 85% -N-	
    if($tzo!='-N-') $tzfFinal='';
    if($tzf!='-N-') $tzoFinal='';
	
	
	$pdf->setXY($mzx,$mzy+253); $pdf->Cell(100,5,utf8_decode("Tetrazólio Vigorx = " .$tzoFinal.$tzfFinal ),0,0,'L');//data rubrica
*/
	
	$dataRubricaObservacao=$vetorRaioX[8].'/'.$vetorRaioX[240];
	//$dataRubricaObservacao=$vetorRaioX[240];
	$pdf->setXY($mzx+120,$mzy+253);
	$pdf->Cell(80,5,utf8_decode($dataRubricaObservacao),0,0,'C');//data rubrica

   endif;//TESTA SE É CABECALHO


   endwhile; //este while abre a amostras atraves do campo amostraLong
   endfor;//este endfor encerra a varredura da amostra inicial ate aa final  
   ob_clean(); // Quando usava essa classe o ob_clean() resolvia meu problema
$pdf->Output("arquivo.pdf","I");
		
?>
