<?php
//linha 2 comentada

require_once(dirname(__FILE__).'/autoload.php');
protegeArquivo(basename(__FILE__));
class calculosEnxuto
{
function manipulaRepresentatividade($texto)
{
       //REPRESENTATIVIDADE
		  //$texto=$resgenerica->fic_repre_unid." ";
		   //exemplo 200 sc 40 kg   a=200   b=sc c=40   d=sempre kg
		   $a='';
		   $b='';
		   $c='';
		   $quilos=0;
		   list($rep1, $rep2, $rep3, $rep4) = explode(" ", $texto);
		   //$vetorMegaAmostra[6]=$rep1.$rep2.$rep3.$rep4;
		   $b=$rep2;//unidade
		   if($rep2=='sc'):
		       $a=$rep1;//captura quantidade
		       $c=$rep3;//peso unitario
			   $quilos=$a*$c;       
		   endif;
		   if($rep2=='bag'):
		       $a=$rep1;//captura quantidade
		       $c=$rep3;//peso unitario
			   $quilos=$a*$c;       
		   endif;
		   if($rep2=='t'):
		       $a=$rep1;//captura quantidade
		       $c=1000;//peso unitario
			   $quilos=$a*1000;       
		   endif;
		   if($rep2=='kg'):
		       $a=$rep1;//captura quantidade
		       $c=1;//peso unitario
			   $quilos=$a;       
		   endif;
		   
		   if($rep2=='env' || $rep2=='lata'):
		       $a=$rep1;//captura quantidade
		       $c='-O-';//peso unitario
			   $quilos=0;       
		   endif;
		   if($rep2=='-O-'):
		       $a='-O-';//captura quantidade
		       $c='-O-';//peso unitario
			   $quilos=0;       
		   endif;
		   $vetorMegaAmostra[3]=$a;//quantidade de sacas quantidade de latas etc
		   $vetorMegaAmostra[2]=$b;//unidade (bag,env,quilos, latas etc)
		   $vetorMegaAmostra[4]=$c;//peso unitario 
		   $vetorMegaAmostra[5]=$quilos;//liquido em quilos
		   $d=$rep4; 
		   $vetorMegaAmostra[90]=$a." ".$b."/".$c." ".$d;//liquido em quilos	
	       return $vetorMegaAmostra;
	
	
}//fim da funcao manipula representatividade




function capturaGeralAmostra($amostraLong)
{
   /*/COMO ESTA ORGANIZADA ESTA FUNCAO	
	//1º =  captura tudo da rean
    //2º =  captura tudo da FICHA,ESPECIE,CULTIVAR,REMETENTE,AMOSTRADOS	
	
	*/

	//aqui vou capturar tudo da REAN1
   	$genericaRean=new tabelagenerica();
	$genericaRean->tabela="rean1";
	$genericaRean->campos_valores = array(
		   "rea_teste" => NULL,
		   "rea_v1" => NULL,
		   "rea_v2" => NULL,
		   "rea_v3" => NULL,
		   "rea_v4" => NULL,
		   "rea_v5" => NULL,
		   "rea_v6" => NULL,
	);
	$genericaRean->extras_select =" where rea_ficha=".$amostraLong;
	$genericaRean->selecionaCampos($genericaRean);
    while($resgenericaRean= $genericaRean->retornaDados()):
       $teste= $resgenericaRean->rea_teste;
       if($teste=='TZO'):
	       $vetorMegaAmostra[104]=$resgenericaRean->rea_v1;
	       $vetorMegaAmostra[105]=$resgenericaRean->rea_v1;
	   endif; 	   
       if($teste=='EAC')$vetorMegaAmostra[39]=$resgenericaRean->rea_v1;
       if($teste=='PMS')$vetorMegaAmostra[38]=$resgenericaRean->rea_v1;
       if($teste=='GERM'):
	       $vetorMegaAmostra[3]=$resgenericaRean->rea_v1;//GERMINACAO
	       $vetorMegaAmostra[11]=$resgenericaRean->rea_v2;//ANORMAIS   
	       $vetorMegaAmostra[40]=$resgenericaRean->rea_v6;//INFECIONADAS  
	       $vetorMegaAmostra[12]=$resgenericaRean->rea_v3;//DURAS	   
	       $vetorMegaAmostra[13]=$resgenericaRean->rea_v4;//DORMENTES 
	       $vetorMegaAmostra[14]=$resgenericaRean->rea_v5;//MORTAS   
	   endif;	   
       if($teste=='PURE'):
	       $vetorMegaAmostra[4]=$resgenericaRean->rea_v1;//pureza->puras
	       $vetorMegaAmostra[18]=$resgenericaRean->rea_v2;//pureza->MATERIAL INERTE PERCENTUAL
	       $vetorMegaAmostra[17]=$resgenericaRean->rea_v3;//pureza->outras sementes numero
       endif; 	   	   
       if($teste=='CLV')$vetorMegaAmostra[99]=$resgenericaRean->rea_v1;
       if($teste=='INF')$vetorMegaAmostra[100]=$resgenericaRean->rea_v1;
       if($teste=='TRI')$vetorMegaAmostra[101]=$resgenericaRean->rea_v1;
       if($teste=='DTU')$vetorMegaAmostra[102]=$resgenericaRean->rea_v1;
       if($teste=='FRI')$vetorMegaAmostra[103]=$resgenericaRean->rea_v1;
    endwhile;

/*






	
	
	
	//VAI CAPTURAR TUDO DA FICHA,ESPECIE,CULTIVAR,REMETENTE,AMOSTRADOR
	   //captura tudo de especie & cultivar 
    //ENTRA DE QUAKQUER MANEIRA
    $generica=new tabelagenerica();
	$generica->tabela="especies, ficha,cultivar,remetente,amostrador";
	$generica->campos_valores = array(
			"esp_nome" => NULL,
			"esp_id" => NULL,
			"ctv_nome" => NULL,
			"esp_nome_cientifico" => NULL,
			"esp_grupo2011" => NULL,
			"esp_min_pureza" => NULL,
			"esp_min_ocv" => NULL,
			"esp_min_nocivas" => NULL,
			"esp_min_dosn" => NULL,
			"fic_lote" => NULL,
			"fic_safra" => NULL,
			"fic_funcao" => NULL,
			"fic_categoria" => NULL,
			"fic_amostra_previa" => NULL,
			"fic_amostra" => NULL,
			"fic_outrascultivares" => NULL,
			"fic_procedencia" => NULL,
			"fic_dt_entrada" => NULL,
			"fic_dt_amostragem" => NULL,
			"fic_repre_unid" => NULL,
			"fic_peneira" => NULL,
			"fic_comprovante" => NULL,
		    "prd_nome" => NULL,
			"prd_apelido" => NULL,
			"prd_municipio" => NULL,
			"prd_uf" => NULL,
			"prd_renasem" => NULL,
			"prd_telefone" => NULL,
		    "amt_nome" => NULL,
			
		);
	$generica->extras_select =" where fic_amostrador=amt_id and  fic_cultivar=ctv_id && prd_id=fic_produtor and  esp_id=ctv_especie &&  fic_id=" . $amostraLong;
    $generica->selecionaCampos($generica);
	while ($resgenerica = $generica->retornaDados()):
		$cultivar=$resgenerica->ctv_nome;
		$especieComum=$resgenerica->esp_nome;
		$especieCientifica=$resgenerica->esp_nome_cientifico;
		$idEspecie=$resgenerica->esp_id;
		$grupo2011=$resgenerica->esp_grupo2011;
		$peso_pureza_ras=$resgenerica->esp_min_pureza;
		$peso_ocv_ras=$resgenerica->esp_min_ocv;
		$peso_dosn_ras=$resgenerica->esp_min_dosn;
		$peso_nocivas_ras=$resgenerica->esp_min_nocivas;
		$vetorMegaAmostra[2]=$resgenerica->fic_lote;
		$vetorMegaAmostra[34]=$resgenerica->fic_safra;
		$vetorMegaAmostra[43]=$resgenerica->fic_funcao;
		$vetorMegaAmostra[33]=$resgenerica->fic_categoria;
		$vetorMegaAmostra[15]=$resgenerica->fic_outrascultivares;
		$vetorMegaAmostra[58]=$resgenerica->fic_procedencia;
		$vetorMegaAmostra[36]=$resgenerica->fic_dt_entrada;
		$vetorMegaAmostra[64]=$resgenerica->fic_dt_amostragem;
		$vetorMegaAmostra[35]=$resgenerica->fic_peneira;
		$vetorMegaAmostra[96]=$resgenerica->fic_comprovante;//numero do comprovante de pagamento desta a amostra ou de outras

		$vetorMegaAmostra[42]=$resgenerica->prd_nome;
		$vetorMegaAmostra[72]=$resgenerica->prd_municipio;
		$vetorMegaAmostra[73]=$resgenerica->prd_uf;
		$vetorMegaAmostra[97]=$resgenerica->prd_renasem;
		$vetorMegaAmostra[95]=$resgenerica->prd_apelido;
		$vetorMegaAmostra[103]=$resgenerica->prd_telefone;
		$vetorMegaAmostra[61]=$resgenerica->amt_nome;
		$vetorMegaAmostra[32]=$resgenerica->esp_nome;
		$vetorMegaAmostra[31]=$resgenerica->ctv_nome;


        //daqui para frente vao os compostos
		$previa=$res->fic_amostra_previa;
	    $definitiva=$res->fic_amostra;
	    if($definitiva>0):
	       $vetorMegaAmostra[1]=$definitiva;//.date("/y",strtotime($res->fic_dt_entrada));
	       $vetorMegaAmostra[76]='Defin.';
	    else:
	       $vetorMegaAmostra[1]=$previa;//.date("/y",strtotime($res->fic_dt_entrada));
	;
	       $vetorMegaAmostra[76]='Previa';
	    endif;
        //REPRESENTATIVIDADE
		  $texto=$resgenerica->fic_repre_unid." ";
		   //exemplo 200 sc 40 kg   a=200   b=sc c=40   d=sempre kg
		   $a='';
		   $b='';
		   $c='';
		   $quilos=0;
		   list($rep1, $rep2, $rep3, $rep4) = explode(" ", $texto);
		   //$vetorMegaAmostra[6]=$rep1.$rep2.$rep3.$rep4;
		   $b=$rep2;//unidade
		   if($rep2=='sc'):
		       $a=$rep1;//captura quantidade
		       $c=$rep3;//peso unitario
			   $quilos=$a*$c;       
		   endif;
		   if($rep2=='bag'):
		       $a=$rep1;//captura quantidade
		       $c=$rep3;//peso unitario
			   $quilos=$a*$c;       
		   endif;
		   if($rep2=='t'):
		       $a=$rep1;//captura quantidade
		       $c=1000;//peso unitario
			   $quilos=$a*1000;       
		   endif;
		   if($rep2=='kg'):
		       $a=$rep1;//captura quantidade
		       $c=1;//peso unitario
			   $quilos=$a;       
		   endif;
		   
		   if($rep2=='env' || $rep2=='lata'):
		       $a=$rep1;//captura quantidade
		       $c='-O-';//peso unitario
			   $quilos=0;       
		   endif;
		   if($rep2=='-O-'):
		       $a='-O-';//captura quantidade
		       $c='-O-';//peso unitario
			   $quilos=0;       
		   endif;
		   $vetorMegaAmostra[68]=$a;//quantidade de sacas quantidade de latas etc
		   $vetorMegaAmostra[69]=$b;//unidade (bag,env,quilos, latas etc)
		   $vetorMegaAmostra[70]=$c;//peso unitario 
		   $vetorMegaAmostra[71]=$quilos;//liquido em quilos
		   $d=$rep4; 
		   $vetorMegaAmostra[90]=$a." ".$b."/".$c." ".$d;//liquido em quilos
		   */
		   
		   
		   
/*
           //CONTAMINANTES
		      ///////////////captura contaminates////////////////////////////////
   	//TRABALHA COM OS CONTAMINANTES  primeiro somente calculando o total por grupo
	//vai somar os totais por grupo
	 $somaOE=0;
	 $somaSI=0;
	 $somaTO=0;
	 $somaPR=0;
	 //ENTRA DE QUAKQUER MANEIRA
	 $generica=new tabelagenerica();
     $generica->tabela="invasoras,contaminantes";
	 $generica->campos_valores = array(
			"inv_qtd" => NULL,
			"inv_codigo" => NULL,
			"con_nome_cientifico" => NULL,
		);
     $generica->extras_select =" where  inv_cod_praga=con_id and  inv_amostra=".$amostraLong;
     $generica->selecionaCampos($generica);
	 $contaContaminantes=0;
	 $vetorContaminante="";
     while ($resgenerica = $generica->retornaDados()):
	    if($resgenerica->inv_codigo=="1OES")$somaOE+=$resgenerica->inv_qtd;
	    if($resgenerica->inv_codigo=="2SIL")$somaSI+=$resgenerica->inv_qtd;
	    if($resgenerica->inv_codigo=="3NOT")$somaTO+=$resgenerica->inv_qtd;
	    if($resgenerica->inv_codigo=="4NOP")$somaPR+=$resgenerica->inv_qtd;
		$contaContaminantes++;
		$vetorContaminante[$contaContaminantes]=$resgenerica->con_nome_cientifico.'('.$resgenerica->inv_qtd.')';
	 endwhile;
     $vetorMegaAmostra[78]=$vetorContaminante;

	 //aqui verifica se todos os valores continuam zerados. Em caso positivo
	 // ele pega o valor deful para dosn que pode ser 0 ou pode ser -N-
	 //$valorParaDOSN=0;
	 //so se for o tabajara ai joga -n- no LOCAL
	 $sessao=new sessao();
     $cliente=$sessao->getVar('cliente');
	 $clientePedaco=substr($cliente,0,2);
     //if($clientePedaco=="TS")$valorParaDOSN='-N-';   //para o tabajara vale tudo
	 if($somaOE==0 && $somaSI==0  && $somaTO==0 && $somaPR==0):
	    //se os 4 totais forem zero ele adota o valor de dosn que é por padrao zero 
	    $valorParaDOSN1=$valorParaDOSN;  	 
        $valorParaDOSN2=$valorParaDOSN;
		//se a pessoa clicou SOMENTE NOCIVAS ele deve trazer -n- em nocivas 
		if($valorParaDOSN=='-N-NOC'):
           $valorParaDOSN1='0';
           $valorParaDOSN2='-N-';
		endif;
        $valorFinalOE=$valorParaDOSN1;  	 
        $valorFinalSI=$valorParaDOSN1;  	 
        $valorFinalTO=$valorParaDOSN2;  	 
        $valorFinalPR=$valorParaDOSN2;  	 
	 else://caso pelo menos um dos testes foi feito ele pega do valor lido no banco
        $valorFinalOE=$somaOE;  	 
        $valorFinalSI=$somaSI;  	 
        $valorFinalTO=$somaTO;  	 
        $valorFinalPR=$somaPR;
        //entretando ele pode ter feito silvestes e nao ter feito nocivas
		 if($somaTO==0 && $somaPR==0):
			//se a pessoa clicou SOMENTE NOCIVAS ele deve trazer -n- em nocivas 
			if($valorParaDOSN=='-N-NOC'):
	           $valorParaDOSN2='-N-';
			else:
			   $valorParaDOSN2='0';
			endif;
	        $valorFinalTO=$valorParaDOSN2;  	 
	        $valorFinalPR=$valorParaDOSN2;  	 
		 endif;//testa se as somas continuam sendo zero 
	 endif;//testa se as somas continuam sendo zero 

     //vou verificar se por acaso determinei silvestre neste caso posso colocar -n- em nocivas mesmo tendo feito silvestes

	 
     $vetorMegaAmostra[7]=$valorFinalOE;
     $vetorMegaAmostra[8]=$valorFinalSI;
     $vetorMegaAmostra[9]=$valorFinalTO;
     $vetorMegaAmostra[10]=$valorFinalPR;
     $vetorMegaAmostra[77]=$valorFinalOE+$valorFinalSI+$valorFinalTO+$valorFinalPR;
	 
     //////////final da captura dos contaminantes//////////////////////
*/



		
		
    //endwhile;

	
	
	
	

	 //vai somar x dias da entrada da amostra
	 //O 63 USEI PARA FIC_TTA o 64 para fic_dt_amostragem  o 65 para fic_aparelho=peso amostagem
   return $vetorMegaAmostra;
}

	
	
	







/*


function capturaGeralAmostraSUCATA($amostraLong)
{
                    $sessao = new sessao(); 
                    $cliente=$sessao->getVar("cliente");
   //funcao dos sonhos: captura protocolo,lote,germinacao pureza, invasoras,aprovacao, e tudo mais que tem na amostra, sindo tudo num mega vetor
   //////////////////////////
				   //ENTRA DE QUAKQUER MANEIRA
					$genericaDoc=new tabelagenerica();
					$genericaDoc->tabela="documentosponte,documentos";
					$genericaDoc->campos_valores = array(
						   "doc_numero" => NULL,
						   "doc_tipo" => NULL,
						   "doc_data" => NULL,
					);
					$genericaDoc->extras_select =" where dpo_documento_autonumerador=doc_id &&  dpo_amostra_vinculada=".$amostraLong;
					$genericaDoc->selecionaCampos($genericaDoc);
					$variosDocs="";//se tem mais de um doc ele pega todos
					while ($resgenericaDoc= $genericaDoc->retornaDados()):
		               $tipoDoc=$resgenericaDoc->doc_tipo;
		               $numeroDoc=$resgenericaDoc->doc_numero;
		               $dataDoc=date("d/m/y",strtotime($resgenericaDoc->doc_data));  
					   $documento=substr($tipoDoc,0,1).str_pad($numeroDoc, 4, "0", STR_PAD_LEFT).date("/y",strtotime($resgenericaDoc->doc_data));
					   $variosDocs=$variosDocs.substr($tipoDoc,0,1).'('.$numeroDoc.') ';//se tem mais de um doc ele pega todos ex B0052  I0007
                       //$documento='dafo';
                    endwhile;         
$vetorMegaAmostra[81]=$tipoDoc;
$vetorMegaAmostra[82]=str_pad($numeroDoc, 4, "0", STR_PAD_LEFT);
$vetorMegaAmostra[83]=date("d/m/y",strtotime($resgenericaDoc->doc_data));
$vetorMegaAmostra[87]=$variosDocs;
   //////////////////////////
   
   
   
   
   
   $user = new amostras(array(
        'fic_lote'=>post('fic_lote'),
    ));
   $user->valorpk = $fic_id;
   $user->extras_select = "WHERE fic_id=$amostraLong";
   $user->selecionaTudo($user);
   $res = $user->retornaDados();//aqui monta a tela de edição
   //aqui tem uma situacao especial
   //se existe amaostra definitiva ele nao pega o protocolo de previa
   //portanto se so tiver previa ele leva o numero da previa mesmo e coloca AP
   $previa=$res->fic_amostra_previa;
   $definitiva=$res->fic_amostra;
   if($definitiva>0):
       $vetorMegaAmostra[1]=$definitiva;//.date("/y",strtotime($res->fic_dt_entrada));
       $vetorMegaAmostra[76]='Defin.';
   else:
       $vetorMegaAmostra[1]=$previa;//.date("/y",strtotime($res->fic_dt_entrada));
;
       $vetorMegaAmostra[76]='Previa';
   endif;
   $vetorMegaAmostra[2]=$res->fic_lote;
   $idLabo=$res->fic_labo;
   $vetorRetornoGerminacao=$this->capturaGerminacao($amostraLong);
   $vetorRetornoPureza=$this->capturaPureza($amostraLong);
   //se o campo NORMAIS, for preenchido com -N- entao significa que o teste nao foi feito e todos demais campos serão preecnhcidos com -O-]
   //echo("xxxxxnormais=$vetorRetornoGerminacao[1]<br>");
   if($vetorRetornoGerminacao[1]=='-N-'):
       $vetorMegaAmostra[3]=$vetorRetornoGerminacao[1];//NORMAIS puxa o que foi digitado
   	   $vetorMegaAmostra[11]=$vetorRetornoGerminacao[2];//anormais puxa o que foi digitado
	   $vetorMegaAmostra[12]=$vetorRetornoGerminacao[3];//duras puxa o que foi digitado
	   //$vetorMegaAmostra[12]="CLI=".$cliente;//dormentes puxa o que foi digitado
	     //preenche o campo duras com -O-
	   if($cliente=='RiceTec'):
	         $vetorMegaAmostra[12]="-O-";//duras puxa o que foi digitado
	   endif;
	   $vetorMegaAmostra[13]=$vetorRetornoGerminacao[4];//dormentes puxa o que foi digitado
	   $vetorMegaAmostra[14]=$vetorRetornoGerminacao[5];//mortas puxa o que foi digitado
	   $vetorMegaAmostra[40]=$vetorRetornoGerminacao[11];//infecionadas puxa o que foi digitado
	   $vetorMegaAmostra[52]='-O-';//data teste
	   $vetorMegaAmostra[53]='-O-';//dduraçao
	   $vetorMegaAmostra[54]='-O-';//substrato
	   $vetorMegaAmostra[55]='-O-';//tratamento
	   $vetorMegaAmostra[56]='-O-';//temperatura
	   $vetorMegaAmostra[57]='-O-';//validade
	   $vetorMegaAmostra[75]='-O-';//data inicio teste
   else:
       $vetorMegaAmostra[3]=$vetorRetornoGerminacao[1];//NORMAIS puxa o que foi digitado
	   $vetorMegaAmostra[11]=$vetorRetornoGerminacao[2];//anormais
	   $vetorMegaAmostra[12]=$vetorRetornoGerminacao[3];//duras
   	   //$vetorMegaAmostra[12]="CLI=".$cliente;//dormentes puxa o que foi digitado
	     //preenche o campo duras com -O-
		 if($cliente=='RiceTec'):
	         $vetorMegaAmostra[12]="-O-";//duras puxa o que foi digitado
		 endif;
       $vetorMegaAmostra[13]=$vetorRetornoGerminacao[4];//dormentes
	   $vetorMegaAmostra[14]=$vetorRetornoGerminacao[5];//mortas
	   $vetorMegaAmostra[40]=$vetorRetornoGerminacao[11];//infecionadas
	   $vetorMegaAmostra[52]=$vetorRetornoGerminacao[6];//data teste
	   $vetorMegaAmostra[53]=$vetorRetornoGerminacao[7];//dduraçao
	   $vetorMegaAmostra[54]=$vetorRetornoGerminacao[8];//substrato
	   $vetorMegaAmostra[55]=$vetorRetornoGerminacao[10];//tratamento
	   $vetorMegaAmostra[56]=$vetorRetornoGerminacao[9];//temperatura
	   $vetorMegaAmostra[57]=$vetorRetornoGerminacao[13];//validade
	   $vetorMegaAmostra[75]=$vetorRetornoGerminacao[12];//data inicio teste
	   $vetorMegaAmostra[88]=$vetorRetornoGerminacao[14];//germinador
	   $vetorMegaAmostra[89]=$vetorRetornoGerminacao[15];//analista 
   endif;
   //$vetorMegaAmostra[12]="pif";
   $vetorRetornoVendido=$this->capturaItemVendido($amostraLong);
   $vetorMegaAmostra[5]=$vetorRetornoVendido[1];
   $vetorMegaAmostra[33]=$res->fic_categoria;
   $vetorMegaAmostra[34]=$res->fic_safra;
   $vetorMegaAmostra[35]=$res->fic_peneira;
   $vetorMegaAmostra[36]=$res->fic_dt_entrada;
   $vetorMegaAmostra[37]=$res->fic_observacao;
   $vetorMegaAmostra[43]=$res->fic_funcao;
   $vetorMegaAmostra[49]=$res->fic_pesodet_octv;
   $vetorMegaAmostra[51]=$res->fic_pesodet_nocivas;
   $vetorMegaAmostra[50]=$res->fic_pesodet_dosn;
   //$vetorMegaAmostra[57]=$res->fic_validade;
   $vetorMegaAmostra[58]=$res->fic_procedencia;
   $vetorMegaAmostra[63]=$res->fic_tta;
   $vetorMegaAmostra[64]=$res->fic_dt_amostragem;
   $vetorMegaAmostra[65]=$res->fic_aparelho;
   $vetorMegaAmostra[66]=$res->fic_tratamento;
   $vetorMegaAmostra[67]=$res->fic_complemento;
   $vetorMegaAmostra[6]=$res->fic_repre_unid;//é a representatividade original do jeito que é gravada
   $vetorMegaAmostra[74]=$res->fic_previsao;//previsao de entrega da analis
   $vetorMegaAmostra[79]=$res->fic_balanca;//balanca para pesar peso da amostra(pode nao ser a mesma usada para pesar pureza)
   $vetorMegaAmostra[80]=$res->fic_registrador;//quem protocolou a amostra
   $vetorMegaAmostra[96]=$res->fic_comprovante;//numero do comprovante de pagamento desta a amostra ou de outras

   //aqui pode sair: fic_repre_unid(original) numero de sacos ; unidade(bag/sacos/etc) 	quiloa  
   $texto=$res->fic_repre_unid." ";
   //exemplo 200 sc 40 kg   a=200   b=sc c=40   d=sempre kg
   $a='';
   $b='';
   $c='';
   $quilos=0;
   list($rep1, $rep2, $rep3, $rep4) = explode(" ", $texto);
   //$vetorMegaAmostra[6]=$rep1.$rep2.$rep3.$rep4;
   $b=$rep2;//unidade
   if($rep2=='sc'):
       $a=$rep1;//captura quantidade
       $c=$rep3;//peso unitario
	   $quilos=$a*$c;       
   endif;
   if($rep2=='bag'):
       $a=$rep1;//captura quantidade
       $c=$rep3;//peso unitario
	   $quilos=$a*$c;       
   endif;
   if($rep2=='t'):
       $a=$rep1;//captura quantidade
       $c=1000;//peso unitario
	   $quilos=$a*1000;       
   endif;
   if($rep2=='kg'):
       $a=$rep1;//captura quantidade
       $c=1;//peso unitario
	   $quilos=$a;       
   endif;
   
   if($rep2=='env' || $rep2=='lata'):
       $a=$rep1;//captura quantidade
       $c='-O-';//peso unitario
	   $quilos=0;       
   endif;
   if($rep2=='-O-'):
       $a='-O-';//captura quantidade
       $c='-O-';//peso unitario
	   $quilos=0;       
   endif;
   $vetorMegaAmostra[68]=$a;//quantidade de sacas quantidade de latas etc
   $vetorMegaAmostra[69]=$b;//unidade (bag,env,quilos, latas etc)
   $vetorMegaAmostra[70]=$c;//peso unitario 
   $vetorMegaAmostra[71]=$quilos;//liquido em quilos
   $d=$rep4; 
    
   $vetorMegaAmostra[90]=$a." ".$b."/".$c." ".$d;//liquido em quilos

   /*
  //vou precisar todas estas possibilidades
  <option>Repres.</option>
  <option>Repres(Unidade)</option>
  <option>sacas</option>
  <option>kg/sc</option>
  <option>Quilos</option>
  <option>P.Unitario</option>
	if ($pos === false) {
	    echo "Sinto muito, nós não encontramos ($needle) em ($haystack)";
	} else {
	    echo "Parabéns!\n";
	    echo "Nós encontramos a última ($needle) em ($haystack) na posição ($pos)";
	}
   //strripos($haystack, $needle,);quando quer que a busca comece numa determinada posicao
   exemplo do americano
   $haystack = 'ababcd';
   $needle   = 'aB';
   $pos = strripos($haystack, $needle);//strripos($haystack, $needle,);quando quer que a busca comece numa determinada posicao
   OUTRAS POSSIBILIDADES
    strpos() - Encontra a posição da primeira ocorrência de uma string
    stripos() - Encontra a primeira ocorrencia de uma string sem diferenciar maiúsculas e minúsculas
    strrchr() - Encontra a ultima ocorrência de um caractere em uma string
    substr() - Retorna uma parte de uma string
    stristr() - strstr sem diferenciar maiúsculas e minúsculas
    strstr() - Encontra a primeira ocorrencia de uma string

   
   $valorParaDOSN=$res->fic_dosn;//se trata de um valor deful que é adotado caso nao fOr encontrado dosn o valor pode ser 0 ou -O-
   
   //captura os testes solicitados concatenados para despejar na ficha
    $texto="";
	$userTestes = new testesSolicitados();
	$userTestes->extras_select = "where tes_ficha=".$amostraLong;
	$userTestes->selecionaTudo($userTestes);
	while ($resTestes = $userTestes->retornaDados()):
       $texto=$texto.$resTestes->tes_teste.";";
	endwhile;                
   $vetorMegaAmostra[44]=$texto;
   
   
   
   
   //captura tudo de especie & cultivar 
    //ENTRA DE QUAKQUER MANEIRA
    $generica=new tabelagenerica();
	$generica->tabela="especies, ficha,cultivar";
	$generica->campos_valores = array(
			"esp_nome" => NULL,
			"esp_id" => NULL,
			"ctv_nome" => NULL,
			"esp_nome_cientifico" => NULL,
			"esp_grupo2011" => NULL,
			"esp_min_pureza" => NULL,
			"esp_min_ocv" => NULL,
			"esp_min_nocivas" => NULL,
			"esp_min_dosn" => NULL,
		);
	$generica->extras_select =" where  fic_cultivar=ctv_id &&  esp_id=ctv_especie &&  fic_id=" . $amostraLong;
    $generica->selecionaCampos($generica);
	while ($resgenerica = $generica->retornaDados()):
		$cultivar=$resgenerica->ctv_nome;
		$especieComum=$resgenerica->esp_nome;
		$especieCientifica=$resgenerica->esp_nome_cientifico;
		$idEspecie=$resgenerica->esp_id;
		$grupo2011=$resgenerica->esp_grupo2011;
		$peso_pureza_ras=$resgenerica->esp_min_pureza;
		$peso_ocv_ras=$resgenerica->esp_min_ocv;
		$peso_dosn_ras=$resgenerica->esp_min_dosn;
		$peso_nocivas_ras=$resgenerica->esp_min_nocivas;
    endwhile;

   //captura dados do requerente 
    //ENTRA DE QUAKQUER MANEIRA
    $generica=new tabelagenerica();
	$generica->tabela="remetente,ficha";
	$generica->campos_valores = array(
			"prd_nome" => NULL,
			"prd_apelido" => NULL,
			"prd_municipio" => NULL,
			"prd_uf" => NULL,
			"prd_renasem" => NULL,
		);
	$generica->extras_select =" where  fic_produtor=prd_id and fic_id=" . $amostraLong;
    $generica->selecionaCampos($generica);
	while ($resgenerica = $generica->retornaDados()):
		$remetente=$resgenerica->prd_nome;
		$apelido=$resgenerica->prd_apelido;
		$municipioRemetente=$resgenerica->prd_municipio;
		$renasemRemetente=$resgenerica->prd_renasem;
		$ufRemetente=$resgenerica->prd_uf;
    endwhile;
   //captura dados do amostrador 
    //ENTRA DE QUAKQUER MANEIRA
    $generica=new tabelagenerica();
	$generica->tabela="amostrador,ficha";
	$generica->campos_valores = array(
			"amt_nome" => NULL,
		);
	$generica->extras_select =" where  fic_amostrador=amt_id and fic_id=" . $amostraLong;
    $generica->selecionaCampos($generica);
	while ($resgenerica = $generica->retornaDados()):
		$amostrador=$resgenerica->amt_nome;
    endwhile;


  
   ///////////////captura contaminates////////////////////////////////
   	//TRABALHA COM OS CONTAMINANTES  primeiro somente calculando o total por grupo
	//vai somar os totais por grupo
	 $somaOE=0;
	 $somaSI=0;
	 $somaTO=0;
	 $somaPR=0;
	 //ENTRA DE QUAKQUER MANEIRA
	 $generica=new tabelagenerica();
     $generica->tabela="invasoras,contaminantes";
	 $generica->campos_valores = array(
			"inv_qtd" => NULL,
			"inv_codigo" => NULL,
			"con_nome_cientifico" => NULL,
		);
     $generica->extras_select =" where  inv_cod_praga=con_id and  inv_amostra=".$amostraLong;
     $generica->selecionaCampos($generica);
	 $contaContaminantes=0;
	 $vetorContaminante="";
     while ($resgenerica = $generica->retornaDados()):
	    if($resgenerica->inv_codigo=="1OES")$somaOE+=$resgenerica->inv_qtd;
	    if($resgenerica->inv_codigo=="2SIL")$somaSI+=$resgenerica->inv_qtd;
	    if($resgenerica->inv_codigo=="3NOT")$somaTO+=$resgenerica->inv_qtd;
	    if($resgenerica->inv_codigo=="4NOP")$somaPR+=$resgenerica->inv_qtd;
		$contaContaminantes++;
		$vetorContaminante[$contaContaminantes]=$resgenerica->con_nome_cientifico.'('.$resgenerica->inv_qtd.')';
	 endwhile;
     $vetorMegaAmostra[78]=$vetorContaminante;

	 //aqui verifica se todos os valores continuam zerados. Em caso positivo
	 // ele pega o valor deful para dosn que pode ser 0 ou pode ser -N-
	 //$valorParaDOSN=0;
	 //so se for o tabajara ai joga -n- no LOCAL
	 $sessao=new sessao();
     $cliente=$sessao->getVar('cliente');
	 $clientePedaco=substr($cliente,0,2);
     //if($clientePedaco=="TS")$valorParaDOSN='-N-';   //para o tabajara vale tudo
	 if($somaOE==0 && $somaSI==0  && $somaTO==0 && $somaPR==0):
	    //se os 4 totais forem zero ele adota o valor de dosn que é por padrao zero 
	    $valorParaDOSN1=$valorParaDOSN;  	 
        $valorParaDOSN2=$valorParaDOSN;
		//se a pessoa clicou SOMENTE NOCIVAS ele deve trazer -n- em nocivas 
		if($valorParaDOSN=='-N-NOC'):
           $valorParaDOSN1='0';
           $valorParaDOSN2='-N-';
		endif;
        $valorFinalOE=$valorParaDOSN1;  	 
        $valorFinalSI=$valorParaDOSN1;  	 
        $valorFinalTO=$valorParaDOSN2;  	 
        $valorFinalPR=$valorParaDOSN2;  	 
	 else://caso pelo menos um dos testes foi feito ele pega do valor lido no banco
        $valorFinalOE=$somaOE;  	 
        $valorFinalSI=$somaSI;  	 
        $valorFinalTO=$somaTO;  	 
        $valorFinalPR=$somaPR;
        //entretando ele pode ter feito silvestes e nao ter feito nocivas
		 if($somaTO==0 && $somaPR==0):
			//se a pessoa clicou SOMENTE NOCIVAS ele deve trazer -n- em nocivas 
			if($valorParaDOSN=='-N-NOC'):
	           $valorParaDOSN2='-N-';
			else:
			   $valorParaDOSN2='0';
			endif;
	        $valorFinalTO=$valorParaDOSN2;  	 
	        $valorFinalPR=$valorParaDOSN2;  	 
		 endif;//testa se as somas continuam sendo zero 
	 endif;//testa se as somas continuam sendo zero 

     //vou verificar se por acaso determinei silvestre neste caso posso colocar -n- em nocivas mesmo tendo feito silvestes

	 
     $vetorMegaAmostra[7]=$valorFinalOE;
     $vetorMegaAmostra[8]=$valorFinalSI;
     $vetorMegaAmostra[9]=$valorFinalTO;
     $vetorMegaAmostra[10]=$valorFinalPR;
     $vetorMegaAmostra[77]=$valorFinalOE+$valorFinalSI+$valorFinalTO+$valorFinalPR;
	 
     //////////final da captura dos contaminantes//////////////////////
	 
	 ///calcula pureza/////////////
	 $vetorMegaAmostra[15]=$res->fic_outrascultivares;//outras cultivares
     $vetorMegaAmostra[16]=$res->fic_amostra_previa;
	 //se o valor de pureza tiver sido preenchido com -N- entao vai preencher 
	 //naturza do material inerte com -O- 

     if($vetorRetornoPureza[1]=='-N-'):	 
	     $vetorMegaAmostra[4] =$vetorRetornoPureza[1];//pureza
	     //$vetorMegaAmostra[4] =300;//pureza
		 $vetorMegaAmostra[17]=$vetorRetornoPureza[2];//outras sementes
		 $vetorMegaAmostra[18]=$vetorRetornoPureza[3];//material inerte
		 $vetorMegaAmostra[19]='-O-';//natureza d material inerte
		 $vetorMegaAmostra[45]=$vetorRetornoPureza[5];//peso amostra de trabalho
		 $vetorMegaAmostra[46]='-O-';//peso pureza
		 $vetorMegaAmostra[47]=$vetorRetornoPureza[7];//peso outras sementes
		 $vetorMegaAmostra[48]=$vetorRetornoPureza[8];//peso material inerte
		 $vetorMegaAmostra[84]=$vetorRetornoPureza[9];//BALANCA DA PUREZA
		 $vetorMegaAmostra[85]=$vetorRetornoPureza[11];//data teste 
		 $vetorMegaAmostra[86]=$vetorRetornoPureza[10];//operador/analista
		 //estes 3 campos sao definidos mais acima nesta classe/nesta funcao
		 $vetorMegaAmostra[49]='-O-';
         $vetorMegaAmostra[51]='-O-';
         $vetorMegaAmostra[50]='-O-';
     else:
	     $vetorMegaAmostra[4] =$vetorRetornoPureza[1];//pureza
		 $vetorMegaAmostra[17]=$vetorRetornoPureza[2];//outras sementes
		 $vetorMegaAmostra[18]=$vetorRetornoPureza[3];//material inerte
		 $vetorMegaAmostra[19]=$vetorRetornoPureza[4];//natureza d material inerte
		 $vetorMegaAmostra[45]=$vetorRetornoPureza[5];//peso amostra de trabalho
		 $vetorMegaAmostra[46]=$vetorRetornoPureza[6];//peso pureza
		 $vetorMegaAmostra[47]=$vetorRetornoPureza[7];//peso outras sementes
		 $vetorMegaAmostra[48]=$vetorRetornoPureza[8];//peso material inerte
		 $vetorMegaAmostra[84]=$vetorRetornoPureza[9];//BALANCA DA PUREZA
		 $vetorMegaAmostra[85]=$vetorRetornoPureza[11];//data teste
		 $vetorMegaAmostra[86]=$vetorRetornoPureza[10];//operador/analista
	 endif; 
	 
	 
	 
	 
	 	 
	 //$vetorMegaAmostra[4]="99";
	 $vetorMegaAmostra[20]=$somaOE+$somaSI+$somaTO+$somaPR;//natureza d material inerte
	 //captura o valor e a sigla das outras determinacoes
	 $valorOutrasDetes=$this->captura_outras_determinacoes($amostraLong,$idEspecie,$idLabo,'deteboletim');
	 $vetorMegaAmostra[21]=$valorOutrasDetes[1];//resultado OUTRAS DETERMINAÇOES1
	 $vetorMegaAmostra[22]=$valorOutrasDetes[2];//resultadoOUTRAS DETERMINAÇOES2
	 $vetorMegaAmostra[23]=$valorOutrasDetes[3];//resultadoOUTRAS DETERMINAÇOES3
	 $vetorMegaAmostra[24]=$valorOutrasDetes[4];//resultadoOUTRAS DETERMINAÇOES4
	 if($cliente=='RiceTec'):
		 $vetorMegaAmostra[21]='-O-';//resultado OUTRAS DETERMINAÇOES1
		 $vetorMegaAmostra[22]='-O-';//resultadoOUTRAS DETERMINAÇOES2
		 $vetorMegaAmostra[23]='-O-';//resultadoOUTRAS DETERMINAÇOES3
		 $vetorMegaAmostra[24]='-O-';//resultadoOUTRAS DETERMINAÇOES4
	 endif;
	 
	 
	 
	 //$eacel=$this->captura_OD_Especifica($amostraLong,'EAC');
     //CAPTURA OUTRAS DETERMINACAOES 
	 $vetorMegaAmostra[39]=$this->captura_OD_Especifica($amostraLong,'EAC');//resultado de EACEL
	 $vetorMegaAmostra[38]=$this->captura_OD_Especifica($amostraLong,'PMS');//resultado de PMS
	 $vetorMegaAmostra[41]=$this->captura_OD_Especifica($amostraLong,'FRI');//resultado de FRIO
     	 
     $vetorMegaAmostra[25]=$res->fic_amostra_previa;//pega o numero da amostra previa 
	 $vetorMegaAmostra[26]=$valorOutrasDetes[5];//sigla das OUTRAS DETERMINAÇOES1
	 $vetorMegaAmostra[27]=$valorOutrasDetes[6];//sigla das OUTRAS DETERMINAÇOES1
	 $vetorMegaAmostra[28]=$valorOutrasDetes[7];//sigla das OUTRAS DETERMINAÇOES1
	 $vetorMegaAmostra[29]=$valorOutrasDetes[8];//sigla das OUTRAS DETERMINAÇOES1
	 $vetorMegaAmostra[30]=$especieCientifica;//capturou especie
	 $vetorMegaAmostra[31]=$cultivar;//
	 $vetorMegaAmostra[32]=$especieComum;//
	 $vetorMegaAmostra[91]=$peso_pureza_ras;//
	 $vetorMegaAmostra[92]=$peso_ocv_ras;//
	 $vetorMegaAmostra[93]=$peso_nocivas_ras;//
	 $vetorMegaAmostra[94]=$peso_dosn_ras;//


     $vetorMegaAmostra[59]=$idEspecie;
     $vetorMegaAmostra[60]=$grupo2011;
	 $vetorMegaAmostra[61]=$amostrador;//amostrador/produtor/cooperante
     $vetorMegaAmostra[62]=$vetorRetornoPureza[4];//natureza do material inerte
	 $vetorMegaAmostra[42]=$remetente;//
	 $vetorMegaAmostra[72]=$municipioRemetente;//
	 $vetorMegaAmostra[73]=$ufRemetente;//
	 $vetorMegaAmostra[95]=$apelido;//
	 $vetorMegaAmostra[97]=$renasemRemetente;//


	 //vai somar x dias da entrada da amostra
	 

	 
	 
	 //O 63 USEI PARA FIC_TTA o 64 para fic_dt_amostragem  o 65 para fic_aparelho=peso amostagem
   return $vetorMegaAmostra; 	    	
}//final de captura geral amostra



function capturaGeralRaioXsucata($amostraLong)
{
    
 /*	
	$sessao = new sessao(); 
	$idLabo=$sessao->getVar('idLabo');
	//captura os dados intrisecos da amostra
  


   $user = new amostras();
   $user->valorpk = $fic_id;
   $user->extras_select = "WHERE fic_id=$amostraLong";
   $user->selecionaTudo($user);
   $res = $user->retornaDados();//aqui monta a tela de edição
   //aqui tem uma situacao especial
   //se existe amaostra definitiva ele nao pega o protocolo de previa
   //portanto se so tiver previa ele leva o numero da previa mesmo e coloca AP
   $previa=$res->fic_amostra_previa;
   $definitiva=$res->fic_amostra;
   $vetorRaioX[1]=$definitiva;
   $vetorRaioX[2]=$previa;
   if($definitiva>0):
       $vetorRaioX[10]=$definitiva;//.date("/y",strtotime($res->fic_dt_entrada));
   else:
       $vetorRaioX[10]=$previa.'p';//.date("/y",strtotime($res->fic_dt_entrada));
   endif;
   $vetorRaioX[8]=date("d/m/y",strtotime($res->fic_dt_entrada));
   $vetorRaioX[9]=$res->fic_lote;
  
   //$sqlSeletor="select fic_id from cultivar,ficha,remetente,especies where   fic_labo=".$idLabo."  AND  prd_id=fic_produtor AND  ctv_id=fic_cultivar AND  ctv_especie=esp_id and ".$pedacoAno.$pedacos." order by fic_amostra";	   
	//ENTRA DE QUAKQUER MANEIRA
	$genericaFicha=new tabelagenerica();
	$genericaFicha->tabela=" cultivar,ficha,remetente,especies ";
	$genericaFicha->campos_valores = array(
		   "fic_id" => NULL,
		   "fic_lote" => NULL,
		   "fic_safra" => NULL,
		   "esp_nome" => NULL,
		   "prd_nome" => NULL,
		   "prd_apelido" => NULL,
		   "prd_renasem" => NULL,
		   "prd_uf" => NULL,
		   "prd_municipio" => NULL,
		   "ctv_nome" => NULL,
		   "fic_amostra" => NULL,
		   "fic_amostra_previa" => NULL,
           );
	$genericaFicha->extras_select =" where fic_labo=".$idLabo."  AND  prd_id=fic_produtor AND  ctv_id=fic_cultivar AND  ctv_especie=esp_id and fic_id=".$amostraLong;
    //echo $genericaFicha->extras_select;
	$genericaFicha->selecionaCampos($genericaFicha);
	$resgenericaFicha= $genericaFicha->retornaDados();
   //aqui tem uma situacao especial
   //se existe amaostra definitiva ele nao pega o protocolo de previa
   //portanto se so tiver previa ele leva o numero da previa mesmo e coloca AP
   $previa=$resgenericaFicha->fic_amostra_previa;
   $definitiva=$resgenericaFicha->fic_amostra;
   $vetorRaioX[1]=$definitiva;
   $vetorRaioX[2]=$previa;
   if($definitiva>0):
       $vetorRaioX[10]=$definitiva;//.date("/y",strtotime($res->fic_dt_entrada));
   else:
       $vetorRaioX[10]=$previa.'p';//.date("/y",strtotime($res->fic_dt_entrada));
   endif;
   $vetorRaioX[8]=date("d/m/y",strtotime($resgenericaFicha->fic_dt_entrada));
   $vetorRaioX[9]=$resgenericaFicha->fic_lote;
   $vetorRaioX[42]=$resgenericaFicha->ctv_nome;
   $vetorRaioX[43]=$resgenericaFicha->esp_nome;
   $vetorRaioX[44]=$resgenericaFicha->prd_nome;
   $vetorRaioX[45]=$resgenericaFicha->prd_apelido;
   $vetorRaioX[48]=$resgenericaFicha->fic_safra;
   $vetorRaioX[49]=$resgenericaFicha->prd_municipio;
   $vetorRaioX[50]=$resgenericaFicha->prd_renasem;
   $vetorRaioX[51]=$resgenericaFicha->prd_uf;
   $vetorRaioX[52]=$resgenericaFicha->prd_telefone;

  //captura os testes solicitados concatenados para despejar na ficha
    $texto="";
	$userTestes = new testesSolicitados();
	$userTestes->extras_select = "where tes_ficha=".$amostraLong;
	$userTestes->selecionaTudo($userTestes);
	while ($resTestes = $userTestes->retornaDados()):
       $texto=$texto.$resTestes->tes_teste.";";
	endwhile;                
    $vetorRaioX[47]=$texto;
    //captura os documentos
	//ENTRA DE QUAKQUER MANEIRA
	$genericaDoc=new tabelagenerica();
	$genericaDoc->tabela="documentosponte,documentos";
	$genericaDoc->campos_valores = array(
		   "doc_numero" => NULL,
		   "doc_tipo" => NULL,
		   "doc_data" => NULL,
	);
	$genericaDoc->extras_select =" where dpo_documento_autonumerador=doc_id &&  dpo_amostra_vinculada=".$amostraLong;
	$genericaDoc->selecionaCampos($genericaDoc);
	$variosDocs="";//se tem mais de um doc ele pega todos
    $vetorDoc="";
	$docAcumulado="";
	while ($resgenericaDoc= $genericaDoc->retornaDados()):
       $indice=0;//pode ser que fez mais de um doc
	   $tipoDoc=$resgenericaDoc->doc_tipo;
       if($tipoDoc=='Boletim')$indice=3;
       if($tipoDoc=='Informe')$indice=4;
       if($tipoDoc=='Plural')$indice=5;
       if($tipoDoc=='Termo')$indice=6;
       if($tipoDoc=='Certificado')$indice=7;
	   $numeroDoc=$resgenericaDoc->doc_numero;
       $dataDoc=date("d/m/Y",strtotime($resgenericaDoc->doc_data));  
       $vetorRaioX[$indice]=$dataDoc.$numeroDoc;
       if($indice>0)$docAcumulado=$docAcumulado.substr($tipoDoc,0,1).$numeroDoc.';';   //pega a primera letra depois o numero    
       $vetorRaioX[41]=$docAcumulado;    
    endwhile;         



   //aqui vou capturar tudo da REAN1
   	$genericaRean=new tabelagenerica();
	$genericaRean->tabela="rean1";
	$genericaRean->campos_valores = array(
		   "rea_teste" => NULL,
		   "rea_v1" => NULL,
		   "rea_v2" => NULL,
	);
	$genericaRean->extras_select =" where rea_ficha=".$amostraLong;
	$genericaRean->selecionaCampos($genericaRean);
    while($resgenericaRean= $genericaRean->retornaDados()):
       $teste= $resgenericaRean->rea_teste;
       if($teste=='TZO')$vetorRaioX[11]=$resgenericaRean->rea_v1;
       if($teste=='EAC')$vetorRaioX[12]=$resgenericaRean->rea_v1;
       if($teste=='PMS')$vetorRaioX[13]=$resgenericaRean->rea_v1;
       if($teste=='GERM')$vetorRaioX[14]=$resgenericaRean->rea_v1;
       if($teste=='PURE')$vetorRaioX[15]=$resgenericaRean->rea_v1;
       if($teste=='CLV')$vetorRaioX[16]=$resgenericaRean->rea_v1;
       if($teste=='INF')$vetorRaioX[17]=$resgenericaRean->rea_v1;
       if($teste=='TRI')$vetorRaioX[18]=$resgenericaRean->rea_v1;
       if($teste=='DTU')$vetorRaioX[19]=$resgenericaRean->rea_v1;



    endwhile;
	
	
	
    return $vetorRaioX;
}





*/
				
}///////////final da classe calculos////////////////////
 ?>
