<?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");

$objetocalculo = new calculos(); //calcula todos valores finais
$sessao = new sessao();
$composto=$sessao->getVar('controle');
list($mesNumero, $anoAmostra, $nomeFuncao, $nomeCategoria, $tipoRelatorio) = explode("*", $composto);
$legendaNatureza=$nomeFuncao.'/'.$nomeCategoria;
$mes=$objetocalculo->mesExtenso($mesNumero);
$legendaPeriodo='Período:'.$mes.'/'.$anoAmostra;
$finalidade=$sessao->getVar('finalidade');
$cliente=$sessao->getVar('cliente');
$senhaCli=$sessao->getVar('iduser');
$idLabo=$sessao->getVar('idLabo');
$inicio=$sessao->getVar('inicio');
$final=$sessao->getVar('final');
$finalidade=$sessao->getVar('finalidade');
$enquadramento=$finalidade;$nomeOperador=$sessao->getVar('nomeuser');
$amostraLong=$sessao->getVar('amostraLong');
//echo("ooooooodentro do imprimedeas2014amostralong= $amostraLong<br>");
$vetorCabecalho=$objetocalculo->dadoslaboratorio();

$pdf=new FPDF('L','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=10;
		     $margemEsquerda=10;
			 $margemDireita=$maximoLAdobe-6;
			 $larguraUtil=$maximoLAdobe-16;
			 $futer=$maximoHAdobe-10;
			 //$larguraUtil=$maximoLAdobe;
			 $cinza=220;
		     $fonte="Arial";
			 $nomeOperador=5;
			 $pdf->SetFillColor($cinza,$cinza,$cinza); 

             $pdf->SetFont('Times','',8);
			 
			 //cabecalho
			 
     			//$pdf->Cell(140,5,$vetorCabecalho[0],0,1,'L');//lab nome
     			//$pdf->Cell(140,5,$vetorCabecalho[1],0,1,'L');//lab nome
     			//$pdf->Cell(140,5,$vetorCabecalho[2],0,1,'L');//lab nome
     			//$pdf->Cell(140,5,'Amostras:'.$finalidade.' Ano:'.$anoCorrente,0,1,'L');//lab nome
                $larg1=15;
                $larg2=15;
                $larg3=30;
                $larg4=55;
                $larg5=55;
 
	        $inicio=1;
			$final=3;

			 //ENTRA DE QUAKQUER MANEIRA
			$generica=new tabelagenerica();
			
/////////////////parte puxada do antigo/////////////////////////////////////
	 $maximoLAdobe=297;
	 $maximoHAdobe=210;
     $margemEsquerda=10;
	 $margemDireita=$maximoLAdobe-7;
	 //largura de uma margem a outra = 281  se eu imprimo algo esta soma nao pode ultrapassar este valor
	 $larguraUtil=$maximoLAdobe-17;
	 $cinza=220;
	 $pdf->SetFillColor($cinza,$cinza,$cinza);
	 $grosso=0.7;
	 $medio=0.4;
	 $fino=0.3;
	 $extraFino=0.2;
	 //ESTAS COTAS SAO AS COTRAS DAS LINHAS HORINTAIS GROSSAS QUE SERVEM DE ORIGEM PARA O QUE VEM A SEGUIR
	 $cota1=2;
     $cota1a=15;
	 $cota2=23;
	 $cota3=31;//cabecalho inicial amplo
	 $cota4=43;//final do cabecalho e inicio dos dados
	 
	 
	 //definicoes das larguras das coluna
	      #############mega colunas#####################################
     //MEGACOLUNA sao as colunas que vam acima das colunas e que devem estar emparelhados com as colunas depois
	 $largura[1]=6;//uf
	 $largura[2]=16;//safra
	 $largura[3]=64;//especie
	 $largura[4]=18;//cultivar
	 $largura[5]=6;//numero
	 $largura[6]=18;//respres
	 $largura[7]=15;//categoria
	 $largura[8]=9;//abaixo
	 $largura[9]=12;//no padrao
	 $largura[10]=9;//>90
	 $largura[11]=9;//p
	 $largura[12]=9;//oc
	 $largura[13]=9;//oe
	 $largura[14]=9;//ss
	 $largura[15]=9;//nt
	 $largura[16]=9;//np
	 $largura[17]=9;//det1
	 $largura[18]=9;//det2
	 $largura[19]=9;//det3
	 $largura[20]=6;//aprovadas
	 $largura[21]=20;//repre aprov
     //cria as 4 larguras do setor de megacoluna
	 $larguraMega1=$largura[1]+$largura[2]+$largura[3]+$largura[4];
	 $larguraMega2=$largura[5]+$largura[6]+$largura[7];
	 $larguraMega3=$largura[8]+$largura[9]+$largura[10]+$largura[11]+$largura[12]+$largura[13]+$largura[14]+$largura[15]+$largura[16]+$largura[17]+$largura[18]+$largura[19];
	 $larguraMega4=$largura[20]+$largura[21];
     //CRIA 3 POSICOES PARA AS LINHAS VERTICAIS DESTA AREA
     $posicao0=$margemEsquerda;
     $posicao1=$posicao0+$largura[1];
     $posicao2=$posicao1+$largura[2];
     $posicao3=$posicao2+$largura[3];
     $posicao4=$posicao3+$largura[4];
     $posicao5=$posicao4+$largura[5];
     $posicao6=$posicao5+$largura[6];
     $posicao7=$posicao6+$largura[7];
     $posicao8=$posicao7+$largura[8];
     $posicao9=$posicao8+$largura[9];
     $posicao10=$posicao9+$largura[10];
     $posicao11=$posicao10+$largura[11];
     $posicao12=$posicao11+$largura[12];
     $posicao13=$posicao12+$largura[13];
     $posicao14=$posicao13+$largura[14];
     $posicao15=$posicao14+$largura[15];
     $posicao16=$posicao15+$largura[16];
     $posicao17=$posicao16+$largura[17];
     $posicao18=$posicao17+$largura[18];
     $posicao19=$posicao18+$largura[19];
     $posicao20=$posicao19+$largura[20];

	 
	 $cota7=180; //assinatura
     $cota8=200;  //usara 195 se for colocar o rodape na munheca, mas pode usar a funcao footer que da mais 5 milimetros
	 $margem=25;
	 $larguraDaLinha=3.5;
	 
	 
	 
	 ############################//aqui joga os dados no relatorio############################
     //aqui cria o corpo do relatorio deas
    // $sql="SELECT prd_uf,fic_id,fic_safra,esp_nome_cientifico,ctv_nome,fic_repre_unid,fic_outrascultivares FROM especies,cultivar,remetente,documentos,ficha,documentosponte where    doc_labo=".$idLabo." &&  fic_funcao='".$nomeFuncao."' &&  fic_categoria='".$nomeCategoria."' &&  fic_cultivar=ctv_id and ctv_especie=esp_id and fic_produtor=prd_id and doc_tipo='Boletim' and dpo_amostra_vinculada=fic_id && dpo_documento_autonumerador=doc_id &&  year(doc_data)='".$anoAmostra."'  and  MONTH(doc_data)='".$mesNumero."' order by prd_uf,fic_safra,esp_nome_cientifico,ctv_nome";
	    //ENTRA DE QUAKQUER MANEIRA
 	 	$generica=new tabelagenerica();
		$generica->tabela="especies,cultivar,remetente,documentos,ficha,documentosponte";
		$generica->campos_valores = array(
				"prd_uf" => NULL,
				"fic_id" => NULL,
				"fic_safra" => NULL,
				"esp_nome_cientifico" => NULL,
				"ctv_nome" => NULL,
				"fic_repre_unid" => NULL,
				"fic_outrascultivares" => NULL,
				"fic_binario" => NULL,
				"fic_categoria" => NULL,
				
			);
		$generica->extras_select =" where    doc_labo=".$idLabo." &&  fic_funcao='".$nomeFuncao."' &&  fic_cultivar=ctv_id and ctv_especie=esp_id and fic_produtor=prd_id and doc_tipo='Boletim' and dpo_amostra_vinculada=fic_id && dpo_documento_autonumerador=doc_id &&  year(doc_data)='".$anoAmostra."'  and MONTH(doc_data)='".$mesNumero."' order by prd_uf,fic_safra,esp_nome_cientifico,ctv_nome,fic_categoria";
		
		//echo("rrrrrrgenerica=$generica->extras_select<br>");
		$registros=0;
	    $generica->selecionaCampos($generica);
		while ($resgenerica = $generica->retornaDados()):
		    $registros++;
			$vetorCorpo[$registros][0]=$resgenerica->fic_id;
			$vetorCorpo[$registros][1]=$resgenerica->prd_uf;
			$vetorCorpo[$registros][2]=$resgenerica->fic_safra;
			$vetorCorpo[$registros][3]=$resgenerica->esp_nome_cientifico;
			$vetorCorpo[$registros][4]=$resgenerica->ctv_nome;
			$vetorCorpo[$registros][6]=$resgenerica->fic_repre_unid;
			$vetorCorpo[$registros][7]=$resgenerica->fic_outrascultivares;
			$vetorCorpo[$registros][8]=$resgenerica->fic_binario;
			$vetorCorpo[$registros][9]=$resgenerica->fic_categoria;
	    endwhile;

		//echo("registros encontrados=$registros  sql=$sql") ;
		//$vetorCorpo=registrosXcampos($sql); //cria vetor resgate de inbasoras este vetor vai servir para listar as invasoras depois
         
	     //aqui vai preparar o vator final, contando amostras, contando representatividade, contando representatividade reprovada e amostras reprovadas
		$uf="@";
		$safra="@";
		$especie="@";
		$cultivar="@";
		$binario="@";
		$categoria="@";

		$linhaVetor=0;
		$somaFinalAnalisadas=0;
        $somaFinalTonBruta=0;
        $somaFinalAprovadas=0;
        $somaFinalTonAprovada=0;

		$somaRepre=0;
		$somaRepreAprovada=0;
		for($i=1;$i<=$registros;$i++):
		     $somaFinalAnalisadas++;
	         $amostraLong=$vetorCorpo[$i][0];//idAmostra
			 //este é o grupo de variaveis que fazem ele criar uma linha extra
	         $uf1=$vetorCorpo[$i][1];//uf
	         $safra1=$vetorCorpo[$i][2];//safra
	         $especie1=$vetorCorpo[$i][3];//especie
	         $cultivar1=$vetorCorpo[$i][4];//cultivar
			 $categoria1=$vetorCorpo[$i][9];//categoria
	         $repre=$vetorCorpo[$i][6];//representatividade
			 $toneladas=$objetocalculo->emTones($repre); //chama a funcao que converte  
			 
             $somaFinalTonBruta+=$toneladas;
	         $outrasCultivares=$vetorCorpo[$i][7];//outras cultivares
	         $binario=$vetorCorpo[$i][8];//binario
			 //echo $especie1 .$safra1.$uf1.$cultivar.$cultivar1;

			 if($especie!=$especie1 || $safra!=$safra1 || $uf!=$uf1 || $cultivar!=$cultivar1  || $categoria!=$categoria1  )
	         {
			     //echo("dddddddddeu diferente");
				 //atribui os valores igal a leitura para iniciar um grupo
			     if($categoria!=$categoria1  )
                    $categoria1=$categoria1."c";
				 
				 
	             $especie=$especie1;
	             $cultivar=$cultivar1;
	             $safra=$safra1;
	             $uf=$uf1;
	             $categoria=$categoria1;
                 //zera os totais
	             $conta=0;
	             $repreTon=0;
	             $germAbaixo=0;			 
	             $germDentro=0;			 
	             $germAcima=0;			 
	             $pureAbaixo=0;
	             $ocvFora=0;
	             $outrasEspecies=0;
	             $silvestres=0;
				 $toleradas=0;
				 $proibidas=0;
				 $det1=0;
				 $det2=0;
				 $det3=0;
				 $amostrasAprovadas=0;
	             $tonAprov=0;  			 
 	             $linhaVetor++;			 
	         }   
             
			 //se o valor do binario for 1 significa reprovado
			 $GE1=substr($binario,0,1);//1º ITEM DO BINARIO
			 $GE2=substr($binario,1,1);//2º ITEM DO BINARIO
			 $GE3=substr($binario,2,1);//3º ITEM DO BINARIO
			 $PUR=substr($binario,3,1);//4º ITEM DO BINARIO
			 $CTV=substr($binario,4,1);//5º ITEM DO BINARIO
			 $OES=substr($binario,5,1);//6º ITEM DO BINARIOO  oes
			 $SIL=substr($binario,6,1);//7º ITEM DO BINARIO  sil
			 $NCT=substr($binario,7,1);//8º ITEM DO BINARIO  
			 $NCP=substr($binario,8,1);//9º ITEM DO BINARIO
			 $SIN=substr($binario,9,1);//10º ITEM DO BINARIO
             


			 
			 //$vetorRepInvasoras= padrao2012_invasoras($amostraLong);
			 //echo("((((dentro do deas)))))))))))germinacao=$germiPerc   resultadode germinacao= $vetorReprovacao[0] <br>");
			 $repreTon+=$toneladas;
	         $somaRepre=$repreTon;

			 //item germinacao
			 $reprovou="NAO";
	         if($GE1=="1")
	         {
	            $reprovou="SIM"; 	
	    		$germAbaixo++;
	         }
	         if($GE2=="1") $germDentro++;
	         if($GE3=="1") $germAcima++;
			 //item pureza
			 if($PUR=="1")
	         {
			     $pureAbaixo++;
	             $reprovou="SIM"; 	
	         }
	         //item outras cultivares
			 if($CTV=="OCV")
	         {   
			     //echo("encontrou reprovacaoxxxxxxxxxxxx ocv=$vetorReprovacao[2]<br>");
			     $ocvFora++;
	             $reprovou="SIM";
	         }

	  

			 if($OES=='1')
	         {
			     $outrasEspecies++;
	             $reprovou="SIM";
	         }

			 if($SIL=="1")
	         {
			     $silvestres++;
	             $reprovou="SIM";
	         }
			 if($NCT=="1")
	         {
			     $toleradas++;
	             $reprovou="SIM";
	         }
			 if($NCP=="1")
	         {
			     $proibidas++;
	             $reprovou="SIM";
	         }
			 
			 if($reprovou=="NAO")
	         {
			     $amostrasAprovadas++;
                 $somaFinalAprovadas++;
				 //$toneladas=$objetocalculo->emTones($repre); //chama a funcao que converte  
				 $tonAprov+=$toneladas;
				 $somaRepreAprovada+=$toneladas;
				 $somaFinalTonAprovada+=$toneladas;
				 //$tonAprov+=1000*emTones($repre);
			 }
			 
	         //soma toneladas
	         $conta++;
			 
	         $vetorFinal[$linhaVetor][1]=$uf1;
	         $vetorFinal[$linhaVetor][2]=$safra1;
	         $vetorFinal[$linhaVetor][3]=$especie1;
	         $vetorFinal[$linhaVetor][4]=$cultivar1;
	         $vetorFinal[$linhaVetor][5]=$conta;
	         $vetorFinal[$linhaVetor][6]=$repreTon;
	         $vetorFinal[$linhaVetor][7]=$categoria1;
	         $vetorFinal[$linhaVetor][8]=$germAbaixo;
	         $vetorFinal[$linhaVetor][9]=$germDentro;
	         $vetorFinal[$linhaVetor][10]=$germAcima;
	         $vetorFinal[$linhaVetor][11]=$pureAbaixo;
	         $vetorFinal[$linhaVetor][12]=$ocvFora;
			 

	         $vetorFinal[$linhaVetor][13]=$outrasEspecies;
	         $vetorFinal[$linhaVetor][14]=$silvestres;
	         $vetorFinal[$linhaVetor][15]=$toleradas;
	         $vetorFinal[$linhaVetor][16]=$proibidas;
	         $vetorFinal[$linhaVetor][17]=$det1;
	         $vetorFinal[$linhaVetor][18]=$det2;
	         $vetorFinal[$linhaVetor][19]=$det3;
	         $vetorFinal[$linhaVetor][20]=$amostrasAprovadas;
	         $vetorFinal[$linhaVetor][21]=$tonAprov;
		   endfor;//for que percorre o numero de registros
		   //coloca os totais
           $vetorFinal[$linhaVetor+1][5]=$somaFinalAnalisadas;
           $vetorFinal[$linhaVetor+1][6]=$somaFinalTonBruta;
           $vetorFinal[$linhaVetor+1][20]=$somaFinalAprovadas;
	       $vetorFinal[$linhaVetor+1][21]=$somaFinalTonAprovada;
		   
		   
     //final da criação do corpo do relatorio deas    
	 if($linhaVetor==0):
	   $linhaVetor=1;
	   for($j=1;$j<=21;$j++):
	         if($largura[$j]>20):
    		     $vetorFinal[1][$j]='-O-';
			 else:
    		     $vetorFinal[1][$j]='-O-';
			 endif;
	   endfor;
	 endif;
	 	 
     //aqui que vai imprimir o vetor final com tantas linhas como determina $linhavetor
     $linhaComeco=0;
	 for($i=1;$i<=$linhaVetor+2;$i++):
         //se linha comeco = 0 vai imprimir cabecalho
		 if($linhaComeco==0):
		 	 $pdf->AddPage();//adicionando a primera pafina 
	         //$cotaCalculada=$cota4;

		     //moldura externa DO CABECALHO
			 $pdf->SetLineWidth($grosso);
			 $altura=$cota1a-$cota1;
             $pdf->Rect($margemEsquerda,$cota1,$larguraUtil,$altura);			  
		     //moldura externa do corpo	
			 $altura=$cota8-$cota2;
             $pdf->Rect($margemEsquerda,$cota2,$larguraUtil,$altura);			  
		     //LINHAS FINAL DO CABEÇALHO E AS 2 DIVISORIAS DO CABECALHO
			 $pdf->SetLineWidth($fino);
			 $larguraColuna1=90;
			 $larguraColuna2=120;
			 $larguraColuna3=70;
			 $posicaoColuna1=$margemEsquerda;
			 $posicaoColuna2=$posicaoColuna1+$larguraColuna1;
			 $posicaoColuna3=$posicaoColuna2+$larguraColuna2;
			 $pdf->Line($posicaoColuna2,$cota1,$posicaoColuna2,$cota1a);//primeira linha vertical do cabecalho
			 $pdf->Line($posicaoColuna3,$cota1,$posicaoColuna3,$cota1a);//segunda linha  vetical do cabecalho
		     ####################################CABECALHO  esquerda################################################
		     $cotaLocal=$cota1+1;
			 $pdf->SetFont('Times','',9);
			 $pdf->setXY($margemEsquerda,$cotaLocal);
			 $pdf->Cell($larguraColuna1,4,'MINISTERIO DA AGRICULTURA E DO ABASTECIMENTO?',0,0,'C');//lab nome
			 $pdf->Cell($larguraColuna2,4,utf8_decode($vetorCabecalho[0]),0,0,'C');//lab nome
			 $pdf->Cell($larguraColuna3,4,utf8_decode($legendaPeriodo),0,1,'C');//natureza
			 $pdf->setXY($margemEsquerda,$cotaLocal+4);//SEGUNDA LINHA
			 $pdf->Cell($larguraColuna1,4,'SECRETARIA DE DEFESA AGROPECUARIA',0,0,'C');//lab nome
			 $pdf->Cell($larguraColuna2,4,utf8_decode($vetorCabecalho[1]),0,0,'C');//lab nome
			 $pdf->Cell($larguraColuna3,4,'NATUREZA DA ANALISE:',0,1,'C');//natureza
			 $pdf->setXY($margemEsquerda,$cotaLocal+8);//TERCEIRA LINHA
			 $pdf->Cell($larguraColuna1,4,utf8_decode('COORDENAÇÃO DE LABORATÓRIO VEGETAL'),0,0,'C');//lab nome
			 $pdf->Cell($larguraColuna2,4,utf8_decode($vetorCabecalho[2]),0,0,'C');//lab nome
			 $pdf->Cell($larguraColuna3,4,utf8_decode($legendaNatureza),0,1,'C');//VALOR DA NATUREZA
			 	 
			 //########################imprime identificacao#####################################
			 $cotaLocal=$cota1a+1;
			 $pdf->setXY($margemEsquerda,$cotaLocal);
			 $pdf->Cell($larguraUtil,5,utf8_decode('DEAS - DEMONSTRATIVO DE EXECUÇÃO DE ANÁLISE DE SEMENTES(Q)'),1,1,'C',1);
			 
		     $cotaLocal=$cota2;
			 $pdf->Line($margemEsquerda,$cota3,$margemDireita,$cota3);//linha abaixo do cabecalho geral	
			 $pdf->Line($posicao4,$cota2,$posicao4,$cota7);//vertical no final de caracterizacao das amostras	
			 $pdf->Line($posicao7,$cota2,$posicao7,$cota7);//vertical depois da palavra amosta	
			 $pdf->Line($posicao19,$cota2,$posicao19,$cota7);//vertical depois da palavra ESPECIFICAÇÃO DOS RESULTADOS ANALÍTICOS
			 $pdf->setXY($margemEsquerda,$cotaLocal+2);
			 $pdf->Cell($larguraMega1,4,utf8_decode('CARACTERIZAÇÃO DAS AMOSTRAS'),0,1,'C');//esta linha é centrada nao acompanha a cota das demais
			 //primeira linha
			 $pdf->setXY($posicao4,$cotaLocal);
			 $pdf->Cell($larguraMega2,4,'AMOSTRAS',0,0,'C');
			 $pdf->Cell($larguraMega3,4,utf8_decode('ESPECIFICAÇÃO DOS RESULTADOS ANALÍTICOS'),0,0,'C');
			 $pdf->SetFont('Arial','',7);
			 $pdf->Cell($larguraMega4,4,'AMOSTRAS DENTRO',0,0,'C');
			 $pdf->SetFont('Times','',9);
			 //NOVA LINHA
			 $pdf->setXY($posicao4,$cotaLocal+4);
			 $pdf->Cell($larguraMega2,4,'ANALISADAS',0,0,'C');
			 $pdf->Cell($larguraMega3,4,utf8_decode('(Nº DE AMOSTRAS)'),0,0,'C');
			 $pdf->SetFont('Arial','',7);
			 $pdf->Cell($larguraMega4,4,utf8_decode('DOS PADRÕES'),0,0,'C');

		     ###############cabeçalhop das colunas propriemente ditas##############
			 $cotaLocal=$cota3;
			 $pdf->Line($margemEsquerda,$cota4,$margemDireita,$cota4);//linha de fechamento das colunas
			 $pdf->setXY($margemEsquerda,$cotaLocal+4);
			 $pdf->Cell($largura[1],4,'UF',0,0,'C');
			 $pdf->Cell($largura[2],4,'SAFRA',0,0,'C');
			 $pdf->Cell($largura[3],4,utf8_decode('ESPÉCIE'),0,0,'C');
			 $pdf->Cell($largura[4],4,'CULTIVAR',0,0,'C');
			 $pdf->Cell($largura[5],4,utf8_decode('Nº'),0,0,'C');
			 //Primeira lilha
			 $pdf->setXY($posicao5,$cotaLocal);
			 $pdf->Cell($largura[6],4,'REPRESEN',0,0,'C');
		     $larguraAcumulada=$largura[8]+$largura[9]+$largura[10]; 	 
			 $pdf->setXY($posicao7,$cotaLocal);
			 $pdf->Cell($larguraAcumulada,4,utf8_decode('%GERMINAÇÃO'),1,0,'C');
		     $larguraAcumulada=$largura[11]+$largura[12]+$largura[13]+$largura[14]+$largura[15]+$largura[16]+$largura[17]+$largura[18]+$largura[19]; 	 
			 $pdf->Cell($larguraAcumulada,4,utf8_decode('FATORES DE REPROVAÇÃO'),1,0,'C');
			 $pdf->Cell($largura[20],4,utf8_decode('Nº'),0,0,'C');
			 $pdf->Cell($largura[21],4,'REPRESEN',0,0,'C');
		     //SEGUNDA LINHA - CONTEM MAIS DADOS E NAO TEM ACUMULADOS	 
			 $pdf->setXY($posicao5,$cotaLocal+4);
			 $pdf->Cell($largura[6],4,'TATIVI-',0,0,'C');
			 $pdf->Cell($largura[7],4,'Categoria',0,0,'C');
			 $pdf->Cell($largura[8],4,'<PE',0,0,'C');
			 $pdf->Cell($largura[9],4,'>=PE',0,0,'C');
			 $pdf->Cell($largura[10],4,'>90',0,0,'C');
			 $pdf->Cell($largura[11],4,'SP',0,0,'C');
			 $pdf->Cell($largura[12],4,'OC',0,0,'C');
			 $pdf->Cell($largura[13],4,'OE',0,0,'C');
			 $pdf->Cell($largura[14],4,'SS',0,0,'C');
			 $pdf->Cell($largura[15],4,'NT',0,0,'C');
			 $pdf->Cell($largura[16],4,'NP',0,0,'C');
			 $pdf->Cell($largura[17],4,'-',0,0,'C');
			 $pdf->Cell($largura[18],4,'-',0,0,'C');
			 $pdf->Cell($largura[19],4,'-',0,0,'C');
			 $pdf->Cell($largura[20],4,'',0,0,'C');
			 $pdf->Cell($largura[21],4,'TATIVI-',0,0,'C');

		     //SEGUNDA LINHA - CONTEM MAIS DADOS E NAO TEM ACUMULADOS	 
			 $pdf->setXY($posicao5,$cotaLocal+8);
			 $pdf->Cell($largura[6],4,'DADE(t)',0,0,'C');
			 $pdf->Cell($largura[7],4,'',0,0,'C');
			 $pdf->Cell($largura[8],4,'',0,0,'C');
			 $pdf->Cell($largura[9],4,'<=90%',0,0,'C');
			 $pdf->Cell($largura[10],4,'',0,0,'C');
			 $pdf->Cell($largura[11],4,'',0,0,'C');
			 $pdf->Cell($largura[12],4,'',0,0,'C');
			 $pdf->Cell($largura[13],4,'',0,0,'C');
			 $pdf->Cell($largura[14],4,'',0,0,'C');
			 $pdf->Cell($largura[15],4,'',0,0,'C');
			 $pdf->Cell($largura[16],4,'',0,0,'C');
			 $pdf->Cell($largura[17],4,'-',0,0,'C');
			 $pdf->Cell($largura[18],4,'-',0,0,'C');
			 $pdf->Cell($largura[19],4,'-',0,0,'C');
			 $pdf->Cell($largura[20],4,'',0,0,'C');
			 $pdf->Cell($largura[21],4,'DADE(t)',0,0,'C');

			 //LINHAS VERTICAIS
			 $pdf->Line($posicao1,$cota3,$posicao1,$cota7);//LINHA VERTICAL DAS COULUNAS FINAIS	
			 $pdf->Line($posicao2,$cota3,$posicao2,$cota7);//LINHA VERTICAL DAS COULUNAS FINAIS	
			 $pdf->Line($posicao3,$cota3,$posicao3,$cota7);//LINHA VERTICAL DAS COULUNAS FINAIS	
			 $pdf->Line($posicao5,$cota3,$posicao5,$cota7);//LINHA VERTICAL DAS COULUNAS FINAIS	
			 $pdf->Line($posicao6,$cota3,$posicao6,$cota7);//LINHA VERTICAL DAS COULUNAS FINAIS	
		     $cota3a=$cota3+4;
			 $pdf->Line($posicao7,$cota3a,$posicao7,$cota7);//LINHA VERTICAL DAS COULUNAS FINAIS	
			 $pdf->Line($posicao8,$cota3a,$posicao8,$cota7);//LINHA VERTICAL DAS COULUNAS FINAIS	
			 $pdf->Line($posicao9,$cota3a,$posicao9,$cota7);//LINHA VERTICAL DAS COULUNAS FINAIS	
			 $pdf->Line($posicao10,$cota3a,$posicao10,$cota7);//LINHA VERTICAL DAS COULUNAS FINAIS	
			 $pdf->Line($posicao11,$cota3a,$posicao11,$cota7);//LINHA VERTICAL DAS COULUNAS FINAIS	
			 $pdf->Line($posicao12,$cota3a,$posicao12,$cota7);//LINHA VERTICAL DAS COULUNAS FINAIS	
			 $pdf->Line($posicao13,$cota3a,$posicao13,$cota7);//LINHA VERTICAL DAS COULUNAS FINAIS	
			 $pdf->Line($posicao14,$cota3a,$posicao14,$cota7);//LINHA VERTICAL DAS COULUNAS FINAIS	
			 $pdf->Line($posicao15,$cota3a,$posicao15,$cota7);//LINHA VERTICAL DAS COULUNAS FINAIS	
			 $pdf->Line($posicao16,$cota3a,$posicao16,$cota7);//LINHA VERTICAL DAS COULUNAS FINAIS	
			 $pdf->Line($posicao17,$cota3a,$posicao17,$cota7);//LINHA VERTICAL DAS COULUNAS FINAIS	
			 $pdf->Line($posicao19,$cota3,$posicao19,$cota7);//LINHA VERTICAL DAS COULUNAS FINAIS	
			 $pdf->Line($posicao20,$cota3,$posicao20,$cota7);//LINHA VERTICAL DAS COULUNAS FINAIS	
			 $pdf->Line($margemEsquerda,$cota7,$margemDireita,$cota7);//fechamento embaixo
         endif;//testa se a variavel linhaComeco valezero	



         //impriem o corpos
		 		 	
         $linhaComeco++;         
		 $cotaCalculada=$cota4+$linhaComeco*4;
		 $pdf->setXY($margemEsquerda,$cotaCalculada-4);
		 if($i==$linhaVetor+1)$vetorFinal[$i][2]="TOTAL=";
         for($j=1;$j<=21;$j++)
		 {
		     if($i==$linhaVetor+2)$vetorFinal[$i][$j]="-O-";
			 $alinhamento='C';//deful
		     $pdf->SetFont('Arial','',6);
             if($j==6 || $j==21):
			    $alinhamento='R';
                $toneladas=$vetorFinal[$i][$j];
                $vetorFinal[$i][$j]=number_format($toneladas,6,',','.');
			 endif; 
             if($j==3):
		        $pdf->SetFont('Arial','I',6);
			 endif; 
    		 $pdf->Cell($largura[$j],4,utf8_decode($vetorFinal[$i][$j]),1,0,$alinhamento);
		 }
		 if($linhaComeco==30):
		    $linhaComeco=0;
		 
		 endif;
	 endfor;//percorre todas linhas do vetor
	 
	 
	 
	 

////dados tecnico///////
	 $vetorTecnico=$objetocalculo->dadostecnico($idLabo,'BOLE');
	 
     $cotaLocal=$cota7; 	 
	 $posicaoAssinatura=200;
	 
	 $idTecnico=$vetorTecnico[5];
	 $assinaturaAtivada=$vetorTecnico[4];
	 if($assinaturaAtivada=='SIM'):
		 $caminhoFinalTecnico="ImagensClientes/a".$idTecnico.".JPG";
		 $pdf->Image($caminhoFinalTecnico,229,$posicaoAssinatura-20,61,14,'JPG');
     endif;
	 
	 
	 
	 $pdf->setXY($posicaoAssinatura,$cotaLocal);
	 $dia=date("d")."/".date("m")."/".date("Y");
     $pdf->Cell(100,4,utf8_decode($vetorCabecalho[6]).", ".$dia,0,0,'C');
     $cota7a=$cota7+10;
	 $pdf->Line($posicaoAssinatura,$cota7a,280,$cota7a);//LINHA VERTICAL DAS COULUNAS FINAIS	
	 $pdf->setXY($posicaoAssinatura,$cota7a);
	 $pdf->Cell(100,4,utf8_decode($vetorTecnico[1]),0,0,'C');
	 $cota7b=$cota7+14;
	 $pdf->setXY($posicaoAssinatura,$cota7b);
	 $pdf->Cell(100,4,'RENASEM:'.$vetorTecnico[3].'  CREA:'.$vetorTecnico[2],0,0,'C');
//fim da parte puxada do antigo////////////////////
			
			
			
			
			
			
			
			 
		ob_clean(); // Quando usava essa classe o ob_clean() resolvia meu problema
$pdf->Output("arquivo.pdf","I");

		
		
?>
