/*==============================*/
               /*   Comentários das Funções    */
               /*==============================*/

/*----------------------------------------------------------------------------------------
--- Últimas atualizações ---
Data...........: 08/05/2002
Realizadas por.: MJDS Assessoria Processamento de Dados S/C Ltda.[Rafael(.M4Y3RS.)]
Contato........: webmaster@mjds.com.br

--- Manipulação de String ---
versão: 1.0 03/07/2001 - Rubens Farias [function TrimJS(str)]
versão: 1.0 19/10/2001 - .M4Y3RS. [function StrZero(iInt,iTam)]
versão: 1.0 19/10/2001 - .M4Y3RS. [function Mid(Str,iIni,iFim)]
versão: 1.0 19/10/2001 - .M4Y3RS. [function InStr(Str,sStr)]
versão: 1.0 19/10/2001 - .M4Y3RS. [function StrCode(Str,iPos)]
versão: 1.0 19/10/2001 - .M4Y3RS. [function Len(Str)]
versão: 1.0 19/10/2001 - .M4Y3RS. [function Replace(Str,sStr,sStrR)]
versão: 1.0 07/05/2001 - .M4Y3RS. [function StringOfChar(sfChar,ifTam)]
--- Manipulação de Números ---
versão: 1.2 24/07/2001 - .M4Y3RS. [function FormatNumber(snValor,nDecimal)]
versão: 1.1 24/07/2001 - .M4Y3RS. [function N2Calc(num)]
versão: 1.1 24/07/2001 - .M4Y3RS. [function N2Ex(num)]
versão: 1.0 15/10/2001 - .M4Y3RS. [function N2Form(objeto)]
--- Manipulação de Datas ---
versão: 1.0 19/10/2001 - .M4Y3RS. [function MesExtenso(iMes,bMode)]
versão: 1.0 26/06/2001 - .M4Y3RS. [function IsLeapYear(Year)]
versão: 1.0 19/10/2001 - .M4Y3RS. [function Day(dData)]
versão: 1.0 19/10/2001 - .M4Y3RS. [function Month(dData)]
versão: 1.0 19/10/2001 - .M4Y3RS. [function Year(dData)]
versão: 1.0 19/10/2001 - .M4Y3RS. [function DecodeDate(dData)]
versão: 1.0 25/10/2001 - .M4Y3RS. [function EncodeDate(nDia,nMes,nAno)]
versão: 1.0 26/10/2001 - .M4Y3RS. [function DiasMes(nMes,nAno)]
versão: 1.0 19/10/2001 - .M4Y3RS. [function IsDate(dData)]
versão: 1.0 19/10/2001 - .M4Y3RS. [function D2Calend(Data)]
versão: 1.0 25/10/2001 - .M4Y3RS. [function FimMes(dData)]
versão: 1.1 26/10/2001 - .M4Y3RS. [function DateAdd(byTipo,dData,nInc)]
versão: 1.0 26/10/2001 - .M4Y3RS. [function DifData(dDtFim,dDtInicio,byTpRet)]
versão: 1.0 26/10/2001 - .M4Y3RS. [function ModAno(nAno)]
versão: 1.0 28/08/2007 - .M4Y3RS. [function ValidaData(dData, Obr)]
--- Criptográficas ---
versão: 1.0 11/04/2001 - .M4Y3RS. [function EnCrypt(src)]
versão: 1.0 11/04/2001 - .M4Y3RS. [function DeCrypt(src)]
--- Manipulação de Arrays ---
versão: 1.0 19/10/2001 - .M4Y3RS. [function aSort(aArray)]
versão: 1.0 19/10/2001 - .M4Y3RS. [function aRev(aArray)]
--- Validações ---
versão: 1.0 02/05/2002 - .M4Y3RS. [function ValidaEmail(mail)]
--- Variadas ---
versão: 1.0 26/06/2001 - .M4Y3RS. [function sobretext(msg)]
versão: 1.0 26/06/2001 - .M4Y3RS. [function InsCharData(i, delKey, direction)]
versão: 1.0 15/08/2001 - .M4Y3RS. [function InsChar(i, delKey, direction, leng, pos)]
versão: 1.0 25/08/2001 - .M4Y3RS. [function OnlyNum()]
versão: 1.0 20/02/2002 - .M4Y3RS. [function OnlyDate()]
versão: 1.0 28/09/2001 - .M4Y3RS. [function calendario(oObjeto)]
versão: 1.0 28/09/2001 - .M4Y3RS. [function calendariosimu(oObjeto,dData)]
versão: 1.0 23/09/2001 - .M4Y3RS. [function Msg(msg)]
versão: 1.0 11/12/2001 - .M4Y3RS. [function MenuChange(nLine, sCorMn, sCorLk)]
versão: 1.2 01/02/2002 - .M4Y3RS. [function McOut(nLine, iMode)]
versão: 1.2 01/02/2002 - .M4Y3RS. [function McOn(nLine, iMode)]
versão: 1.2 01/02/2002 - .M4Y3RS. [function McCk(nLine, iMode)]
versão: 1.0 08/05/2002 - .M4Y3RS. [function MouseStyle(obj,modo)]
versão: 1.0 09/08/2002 - .M4Y3RS. [function goToURL(surl)]
versão: 3.0 09/08/2002 - .M4Y3RS. [function goToURL2()]
versão: 1.0 22/05/2003 - .M4Y3RS. [function returnfalse()]
--- Menus ---
versão: 1.2 01/02/2002 - .M4Y3RS. [function MenuOver(nLine)]
versão: 1.2 01/02/2002 - .M4Y3RS. [function MenuOut(nLine)]
versão: 1.1 01/02/2002 - .M4Y3RS. [function showmenuie5()]
versão: 1.1 01/02/2002 - .M4Y3RS. [function hidemenuie5()]
versão: 1.1 01/02/2002 - .M4Y3RS. [function right(e)]
-- Arquivos --
versão: 1.0 28/08/2007 - .M4Y3RS. [function AbrirArquivo(arquivo)]

Propriedade do Navegador:
navigator.appCodeName = Mozilla
navigator.appName = Microsoft Internet Explorer
navigator.appMinorVersion = 0
navigator.cpuClass = x86
navigator.platform = Win32
navigator.plugins = 
navigator.opsProfile = null
navigator.userProfile = null
navigator.systemLanguage = pt-br
navigator.userLanguage = pt-br
navigator.appVersion = 4.0 (compatible; MSIE 7.0; Windows NT 5.1; .NET CLR 1.1.4322; .NET CLR 2.0.50727)
navigator.userAgent = Mozilla/4.0 (compatible; MSIE 7.0; Windows NT 5.1; .NET CLR 1.1.4322; .NET CLR 2.0.50727)
navigator.onLine = true
navigator.cookieEnabled = true
navigator.mimeTypes = 

### OBS: O "Function" das funções tem que ser escrito em letra minúscula!! ###
-----------------------------------------------------------------------------------------*/
/* ## Constantes ## */
var d = document;
var spTpEvento = 1;
/* Funçao para mostrar data */
function copyright()
  {
  var data = new Date();
  return '<b><font color="#999999" face="Verdana" size="1">Copyright &copy; 1993 - ' + data.getFullYear() + ' MJDS. Todos os direitos reservados</font></b>';
  }
  
  
function data()
  {
  hoje = new Date();
  dia = hoje.getDate();
  dias = hoje.getDay();
  mes = hoje.getMonth();
  ano = hoje.getYear();
  if (dia < 10)
    dia = "0" + dia;
    
  if (ano < 2000)
	  ano = "19" + ano;
	  
function CriaArray (n)
  {
	  this.length = n;
  }
  NomeDia = new CriaArray(7)
  NomeDia[0] = "Domingo"
  NomeDia[1] = "Segunda-feira"
  NomeDia[2] = "Terça-feira"
  NomeDia[3] = "Quarta-feira"
  NomeDia[4] = "Quinta-feira"
  NomeDia[5] = "Sexta-feira"
  NomeDia[6] = "Sábado"
  NomeMes = new CriaArray(12)
  NomeMes[0] = "Janeiro"
  NomeMes[1] = "Fevereiro"
  NomeMes[2] = "Março"
  NomeMes[3] = "Abril"
  NomeMes[4] = "Maio"
  NomeMes[5] = "Junho"
  NomeMes[6] = "Julho"
  NomeMes[7] = "Agosto"
  NomeMes[8] = "Setembro"
  NomeMes[9] = "Outubro"
  NomeMes[10] = "Novembro"
  NomeMes[11] = "Dezembro"
    document.write (NomeDia[dias] + ", " + dia + " de " + NomeMes[mes] + " de " + ano)
  }


/*========================================================================================*/
/*                                 Manipulção de String                                   */
/*========================================================================================*/
function TrimJS(str){
   String = str
   Resultado = str
   //
   var i
   i = 0
   if (Resultado.charCodeAt(2-1) == '32'){
      }
   while (Resultado.charCodeAt(0) == '32'){
      Resultado = String.substring(i,String.length);
      i++;
      }
   //
   while(Resultado.charCodeAt(Resultado.length-1) == "32"){
      Resultado = Resultado.substring(0,Resultado.length-1);
      }
      return Resultado
      String = ""
   }
/*----------------------------------------------------------------------------------------*/
function StrZero(iInt,iTam){
   var Str = "";
   var iI = 0;
   //
   for (iI = 0; iI < iTam; iI++)
      Str = Str + "0";
   //
   Str = Str + ""+iInt;
   //Str = Str + String(iInt);
   //
   return Mid(Str ,Len(Str)-iTam, Len(Str))
   }
/*----------------------------------------------------------------------------------------*/
function Mid(Str,iIni,iFim){
   return Str.substring(iIni,iFim)
   }
/*----------------------------------------------------------------------------------------*/
function InStr(Str,sStr){
   return Str.indexOf(sStr)
   }
/*----------------------------------------------------------------------------------------*/
function StrCode(Str,iPos){
   return Str.charCodeAt(iPos)
   }
/*----------------------------------------------------------------------------------------*/
function Len(Str){
   //alert(Str + " = " + Str.length)
   Str = ""+Str
   return Str.length
   }                        
/*----------------------------------------------------------------------------------------*/
function Replace(Str,sStr,sStrR){
   var StrB  = Str
   var StrK  = ""
   var StrBk = ""
   var i     = 0
   //
   for(i = 0 ; i < Len(Str); i++ ){
      StrK = Mid(StrB,i,i+1);
      StrBk += TrimJS(StrK.replace(sStr,sStrR));
      }
   //
   return StrBk;
   }
/*----------------------------------------------------------------------------------------*/
/*retorna uma string de caracteres especificado por 'sfChar' com a quantidade de
determinada por 'ifTam' */
function StringOfChar(sfChar,ifTam){
var ifSto;
var sStoRes = "";
   //
   for (ifSto = 0; ifSto < ifTam; ifSto++)
      sStoRes = sStoRes.concat(sfChar);
   //
   return sStoRes;
   }
/*----------------------------------------------------------------------------------------*/
/*========================================================================================*/
/*                                 Manipulção de Números                                  */
/*========================================================================================*/
//Function isNumericJS(Num)
/*Function NumInStr(Str){
   i=0;  
   var TamStr = Str.length;

   while(i<=TamStr){
      char = parseString(Str.charAt(i));
      if ((char == "0") || (char == "1") || (char == "2") || (char == "3") || (char == "4")||
          (char == "5") || (char == "6") || (char == "7") || (char == "8") || (char == "9"))     
          num += 1; 
      return num;
      }
   }
*/
/*----------------------------------------------------------------------------------------*/
/* Formata Número colocando decimais definidas por 'nDecimal' */
function FormatNumber(snValor,nDecimal){
   var vsnValor = N2Calc(snValor);
   //alert("FN\n>" + vsnValor + '\n>' + snValor + '\n>' + YKek)

   if (!isNaN(vsnValor)){
      var numOfDecimal = (nDecimal == null) ?  2 : nDecimal;
      var number = 1;

      number  = Math.pow(10, numOfDecimal);
      vsnValor = Math.round(vsnValor * number) / number;
      vsnValor = "" + vsnValor;

      if (vsnValor.indexOf(".") == 0)
         vsnValor = "0" + vsnValor;

      if (nDecimal > 0){
         if (vsnValor.indexOf(".") == -1)
            vsnValor = vsnValor + ".";
          //
          while ((vsnValor.indexOf(".") + 1) > (vsnValor.length - numOfDecimal))
             vsnValor = vsnValor + "0";
         }
      vsnValor = Replace(vsnValor,".",",");
      //
      var sNumDecimais = Mid(vsnValor,vsnValor.indexOf(","),Len(vsnValor))
      var aPontos = new Array(Len(vsnValor));
      var aNewNum = new Array(Len(vsnValor)*2);
      //
      var iCountp = 0;
      var iCt     = 0;
      var sNum  = "";
      var sNewR = "";
      var aStr  = "";
      //
      for (i = ((Len(vsnValor) - numOfDecimal)-2); i >= 0; i--){
         aPontos[i] = Mid(vsnValor,i,i+1)
         if (iCountp == 3){
            sNum += "." + aPontos[i];
            iCountp = 0;
            }
         else
            sNum += aPontos[i];

         iCountp += 1;
         }

      for(i = 0 ; i < Len(sNum); i++)
         aNewNum[i] = Mid(sNum,i,i+1)


      for(i = (Len(sNum)-1) ; i >= 0; i--)
         sNewR += aNewNum[i];

      vsnValor = sNewR + sNumDecimais;
      }
   else
      vsnValor = "0";
      //
   return vsnValor;
   }
/*----------------------------------------------------------------------------------------*/
/* Substitui pontos -> n/d e virgula -> pontos para executar calculos */
function N2Calc(numf){
   return Replace(Replace(numf,".",""),",",".");
   }
/*----------------------------------------------------------------------------------------*/
/* Substitui pontos por virgula, para exibir o valor ao usuário */
function N2Ex(num){
   return Replace(""+num,".",",");
   }

/*----------------------------------------------------------------------------------------*/
function N2Form(oObjeto){
   //alert(oObjeto + " -> " + oObjeto.value)
   if (!isNaN(N2Calc(oObjeto.value)))
      oObjeto.value = FormatNumber(oObjeto.value,2);      
   else
      oObjeto.value = FormatNumber(0,2);
   }
/*========================================================================================*/
/*                                 Manipulção de Data                                     */
/*========================================================================================*/
function MesExtenso(iMes,bMode){
   if (!bMode){
      switch(iMes){
         case 0: sMes = "Janeiro"
                 break;
         case 1: sMes = "Fevereiro"
                 break;
         case 2: sMes = "Março"
                 break;
         case 3: sMes = "Abril"
                 break;
         case 4: sMes = "Maio"
                 break;
         case 5: sMes = "Junho"
                 break;
         case 6: sMes = "Julho"
                 break;
         case 7: sMes = "Agosto"
                 break;
         case 8: sMes = "Setembro"
                 break;
         case 9: sMes = "Outubro"
                 break;
         case 10:sMes = "Novembro"
                 break;
         case 11:sMes = "Dezembro"
                 break;
         }
      }
   else{
      switch(iMes){
         case 0: sMes = "Jan";
                 break;
         case 1: sMes = "Fev";
                 break;
         case 2: sMes = "Mar";
                 break;
         case 3: sMes = "Abr";
                 break;
         case 4: sMes = "Mai";
                 break;
         case 5: sMes = "Jun";
                 break;
         case 6: sMes = "Jul";
                 break;
         case 7: sMes = "Ago";
                 break;
         case 8: sMes = "Set";
                 break;
         case 9: sMes = "Out";
                 break;
         case 10:sMes = "Nov";
                 break;
         case 11:sMes = "Dez";
                 break;
         }
      }
   return sMes
   }
/*----------------------------------------------------------------------------------------*/
/* Verifica se o ano é bisexto */
function IsLeapYear(Ano){
   var Ano1 = Ano % 4;
   var Ano2 = Ano % 100;
   var Ano3 = Ano % 400;
   //
   //if (Ano mod 4 = 0) or (Ano mod 100 = 0) and (Ano mod 400 = 0) then
   if ((Ano1 == 0) || (Ano2 == 0) && (Ano3 == 0))
      return true;
   else
      return false;
   }
/*----------------------------------------------------------------------------------------*/
function Day(dData){
   return DecodeDate(dData)[1]
   }
/*----------------------------------------------------------------------------------------*/
function Month(dData){
   return DecodeDate(dData)[2]
   }
/*----------------------------------------------------------------------------------------*/
function Year(dData){
   return DecodeDate(dData)[3]
   }
/*----------------------------------------------------------------------------------------*/
function DecodeDate(dData){
   iTam = Len(dData);
   if (iTam > 10)
      iTam = 10;
   ic   = 1;
   i    = 0;
   var iposchar = new Array(2,iTam)

   for(i = 0; i < iTam; i++){
      if ((dData.charAt(i) == "/") && (ic < 3)){
         iposchar[1,i] = dData.charAt(i);
         iposchar[2,ic] = i;
         ic += 1;
         }
      else
         iposchar[0,i] = dData.charAt(i);
      }

   d = Mid(dData,0,iposchar[1,1]);
   m = Mid(dData,iposchar[2,1]+1, iposchar[2,2]);
   y = Mid(dData,iposchar[2,2]+1, iTam);

   var iPosDate = new Array(3);

   //iPosDate[0] = d + "/" + m + "/" + y
   iPosDate[0] = EncodeDate(d,m,y);
   iPosDate[1] = d;
   iPosDate[2] = m;
   iPosDate[3] = y;
   //
   return iPosDate
   }
/*----------------------------------------------------------------------------------------*/
function EncodeDate(nDia,nMes,nAno){
   if ((Len(nAno) > 0) && (Len(nAno) < 3))
      return StrZero(nDia,2) + "/" + StrZero(nMes,2) + "/" + ModAno(StrZero(nAno,2));
   else
      return StrZero(nDia,2) + "/" + StrZero(nMes,2) + "/" + StrZero(nAno,4);
   }
/*----------------------------------------------------------------------------------------*/
function DiasMes(nMes ,nAno){
   /*/var bYear = (nAno == null) ?  false : bYear;
   /if (bType)
         {
      ndData = DecodeDate(dData)
      nDia = ndData[1];
      nMes = ndData[2];
      nAno = ndData[3];
         }
   /*/
   if (!isNaN(nMes)){
      nMes -= 1;
      var aDiaMes = new Array(11);

      aDiaMes[00] = 31
      aDiaMes[01] = 28
      aDiaMes[02] = 31
      aDiaMes[03] = 30
      aDiaMes[04] = 31
      aDiaMes[05] = 30
      aDiaMes[06] = 31
      aDiaMes[07] = 31
      aDiaMes[08] = 30
      aDiaMes[09] = 31
      aDiaMes[10] = 30
      aDiaMes[11] = 31

      if ((IsLeapYear(nAno)) && (nMes == 1))
         aDiaMes[01] = 29;

      return aDiaMes[nMes]
      }
   else
      return 0
   }
/*----------------------------------------------------------------------------------------*/
/* Verifica se dData é uma data ou não */
function IsDate(dData){
   ndData = DecodeDate(dData);
   nDia = parseFloat(ndData[1]);
   nMes = parseFloat(ndData[2]);
   nAno = parseFloat(ndData[3]);

   if ( (!isNaN(nDia)) && (!isNaN(nMes)) && (!isNaN(nAno)) ){
      if ((nMes == 1) && (IsLeapYear(nAno)) && (DiasMes(nMes,nAno) == 29) ||
         (nDia > 0) && (nDia <= DiasMes(nMes,nAno)))
         bRes = true;
      else
         bRes = false;
      }
   else
      bRes = false;

   return bRes
   }
/*----------------------------------------------------------------------------------------*/
function D2Calend(Data){
   for (i = 0; i <= Data.length; i++){
      if (isNaN(Data.charAt(i))){
         Separador = Data.charAt(i)

         if (Separador != "/")
            Data_valida = false;

         Dia = Mid(Data,0,Data.indexOf(Separador));
         Mes = Mid(Data,eval(Data.indexOf(Separador) + 1),Data.lastIndexOf(Separador));
         //Ano = Data.substring(eval(Data.lastIndexOf(Separador) + 1),Data.length)
         Ano = Mid(Data,eval(Data.lastIndexOf(Separador) + 3),Data.length);
         }//end if
      }//end for
   return String(D2Calend);
   }
/*----------------------------------------------------------------------------------------*/
/* Restorna o último dia do mês */
function FimMes(dData){
   return DiasMes(Month(dData),Year(dData));
   }
/*----------------------------------------------------------------------------------------*/
function DateAdd(byTipo,dData,nInc){
   /*######### Parâmetros ##########
   byTipo:
   - d = soma ou subtrai dias
   - m = soma ou subtrai meses
   - y = soma ou subtrai anos
   dData:
   - Data para efetuar as operações
   nInc:
   - Quantidade a somar ou subtrair
   ###############################*/
   //
   var nData = 0
   var nDia  = 0
   var nMes  = 0
   var nAno  = 0
   var nMode = ""
   //
   //alert("id ->" + dData)
   nData = DecodeDate(dData);
   nDia  = parseFloat(nData[1]);
   nMes  = parseFloat(nData[2]);
   nAno  = parseFloat(nData[3]);
   nMode = byTipo.toLowerCase();
   //
   i     = 0;
   iCont = Math.abs(nInc);
   //
   if (nInc < 0)
      nIncM = -1;
   else
      nIncM = +1;
   //
   //alert(dData + " = " + nDia+"="+nData[1] + "-" + nMes+"="+parseInt(nData[2]) + "-" +nAno+"="+nData[3])
   //
   //Adiciona dias a Data
   switch(nMode){
      case "d":
         for (i = 0 ; i < iCont ; i++){
            nDia += nIncM;
            //
            if (nDia < 1){
               nMes -= 1;
               nDia = DiasMes(nMes,nAno);
               //
               if (nMes < 1){
                  nMes = 12;
                  nAno -= 1;
                  }
               }
            //
            if (nDia > DiasMes(nMes,nAno)){
               nMes += 1;
               nDia = 1;
               //
               if (nMes > 12){
                  nMes = 1;
                  nAno += 1;
                  }
               }
            }
         break;
      //
      //Adiciona meses a Data
      case "m":
         for (i = 0 ; i < iCont ; i++){
            nMes += nIncM;
            if (nMes < 1){
               nMes = 12;
               nAno -= 1;
               }
            else if (nMes > 12){
               nMes = 1;
               nAno += 1;
               }
            }
         if (nDia > DiasMes(nMes,nAno))
            nDia = DiasMes(nMes,nAno);
         else if (nDia < 0)
            nDia = 1;
         break;
      //
      //Adiciona anos a Data
      case "y":
         nAno = parseFloat(nAno) + parseFloat(nInc);
         break;
      }
   return EncodeDate(nDia,nMes,nAno)
   }
/*----------------------------------------------------------------------------------------*/




//function DifData(dDtFim,dDtInicio:TDateTime;bTpRet:Byte):String;
function DifData(dDtFim,dDtInicio,byTpRet){
   
	 
	 /*########## Parâmetros ############
   dDtFim:
   - Data Final
   dDtInicio:
   - Data Inicial
   byTpRet(Modo do retorno):
   - 1: Ano (aaaa)
   - 2: Mês (mmmm)
   - 3: Dias(dddd)
   - Defalult: (aammdd)
   ##################################*/
   //Zera as variáveis
   var wAnoBase,wAnoFim,wAnoInicio = ""
   var wDiaBase,wDiaFim,wDiaInicio = ""
   var wMesBase,wMesFim,wMesInicio = ""
   var wMeses, sResult = ""
   var dUltDia = ""
   var wDiabasea, wDiaBaseR= ""
	 var dDtUltima = new Date();
   var i = 0
   //Separa a data em Dia, Mes e Ano
   dDtFim  = DecodeDate(dDtFim);
  

    wDiaFim = dDtFim[1];
   wMesFim = dDtFim[2];
   wAnoFim = dDtFim[3];
   //Separa a data em Dia, Mes e Ano
   dDtInicio  = DecodeDate(dDtInicio);
   wDiaInicio = dDtInicio[1];
   wMesInicio = dDtInicio[2];
   wAnoInicio = dDtInicio[3];
   
   
   //Verifica se o dia final é menor que o inicial
	 
   if (wDiaFim < wDiaInicio){
		 
     dUltDia = FimMes(dDtInicio[0]);
     
		 //dDtUltima = EncodeDate(dUltDia,wMesInicio,wAnoInicio);
     //Separa a data em Dia, Mes e Ano
    // dUltDia  = DecodeDate(dDtUltima);
		 
     wDiaBase = dUltDia;
     wMesBase = wMesInicio;
     wAnoBase = wAnoInicio;
     //

//     wDiaFim = wDiaFim + wDiaBase;
//     wMesInicio = wMesInicio + 1;
     }
   //Verifica se o mês final é menor que o inicial
   if (wMesFim < wMesInicio){
      wMesFim = parseFloat(wMesFim) + 12;
      wAnoInicio = parseFloat(wAnoInicio) + 1;
	//  alert(wAnoInicio); 
      }
   //
   wAnoBase = wAnoFim - wAnoInicio;
   wMesBase = wMesFim - wMesInicio;
   wDiaBase = wDiaFim - wDiaInicio;

//   alert(wAnoInicio);
  
  //
   if (byTpRet == 1){
      wMeses = (wAnoBase*12) + wMesBase;
			alert("wAnoBase = "+wAnoBase);
			alert("wMesBase = "+wMesBase);
			alert("wMeses = "+wMeses);
      if (wDiaBase > 14)
         wMeses = wMeses + 1;
      sResult =  StrZero(wMeses,4);
      }
   else if (byTpRet == 2){
     wDiasCalc = wMesBase + ((wAnoBase)*12);
     wDiaBaseR = DiasMes(wMesInicio,wAnoInicio) - wDiaInicio; //Dia q restam no mes
     dDtBaseDia = dDtInicio[0];
     //
     for (i = 0; i < wDiasCalc; i ++){
        dDtBaseDia = DateAdd("m",""+dDtBaseDia,1);
        wDiaBaseR  = parseFloat(wDiaBaseR) + parseFloat(DiasMes(Month(dDtBaseDia),Year(dDtBaseDia)));
        }
     wDiaBaseR = (parseFloat(wDiaBaseR) - (DiasMes(wMesFim,wAnoFim) - wDiaFim));
     if (isNaN(wDiaBaseR))
        sResult = 0;
     else
        sResult = wDiaBaseR;
     }
   //
   switch(byTpRet){
      case 0:
         return StrZero(wAnoBase,4)
         break;
      case 1:
      case 2:
         return sResult
         break;
      /*case 2:
         return sResult
         break;*/
      default:
         return StrZero(wAnoBase,2) + StrZero(wMesBase,2) + StrZero(wDiaBase,2);
         break;
      }
   }
/*----------------------------------------------------------------------------------------*/
function ModAno(nAno){
   if ((Len(nAno) > 0) && (Len(nAno) < 3)){
      if ((parseFloat(nAno) < 50) && (parseFloat(nAno) >= 00))
         return "20"+nAno
      else
         return "19"+nAno
      }
   }
/*========================================================================================*/
/*                                    Criptográficas                                      */
/*========================================================================================*/
/* Encripta uma string */
function EnCrypt(src){
var Key, Src, iStringChar, iKeyChar
var iCryptChar, strEncrypted, i
   //
   Key = "";
   strEncrypted = "";
   //
   for (i=0; i<=src.length; i++){//loop de 0 ao tamanho da String
      //Monta a Chave de criptografia
      Key = Key + String.fromCharCode(i+64);
      }
   for (i=0; i < src.length; i++){//loop de 0 ao tamanho da String
      //Pega o código da caractere da posicao i da Chave
      iKeyChar     = Key.substr(i,1).charCodeAt(0);
      //Pega o código da caractere da posicao i da String
      iStringChar  = src.substr(i,1).charCodeAt(0); 
      iCryptChar   = iStringChar + iKeyChar; //Soma os códigos da chave e da String
      iCryptChar   = iKeyChar ^ iStringChar; //Eleva o valor da chave ao da String
      //Adiona à variável o caracter correspondente à 'iCryptChar'
      strEncrypted = strEncrypted + String.fromCharCode(iCryptChar); 
      }
   return strEncrypted;
   }
/*----------------------------------------------------------------------------------------*/
/* Decripta uma string */
function DeCrypt(src){
var Key, Src, iStringChar, iKeyChar
var iDeCryptChar, strDecrypted, i

   Key = "";
   strDecrypted = "";
   //
   for (i=0; i<=src.length; i++){//loop de 0 ao tamanho da String
      //Monta a Chave de criptografia
      Key = Key + String.fromCharCode(i+64);
      }

   for (i=0; i < src.length; i++){//loop de 0 ao tamanho da String
      //Pega o código da caractere da posicao i da Chave
      iKeyChar     = Key.substr(i,1).charCodeAt(0);
      //Pega o código da caractere da posicao i da String
      iStringChar  = src.substr(i,1).charCodeAt(0);  
      iDeCryptChar = iStringChar + iKeyChar; //Soma os códigos da chave e da String
      iDeCryptChar = iKeyChar ^ iStringChar; //Eleva o valor da chave ao da String
      //Adiona à variável o caracter correspondente à 'iCryptChar'
      strDecrypted = strDecrypted + String.fromCharCode(iDeCryptChar);
      }
   return strDecrypted;
   }
/*========================================================================================*/
/*                              Manipulação de Arrays                                     */
/*========================================================================================*/
// Organiza as informações do Array em ordem crescente //
function aSort(aArray){
   return aArray.sort();
   }
/*----------------------------------------------------------------------------------------*/
// Organiza as informações do Array em ordem decrescente //
function aRev(aArray){
   return aArray.reverse();
   }
/*========================================================================================*/
/*                                    Validações                                          */
/*========================================================================================*/
/* Retorna se o e-mail é valido ou não */
function ValidaEmail(mail){
   var ret = false;
   if (typeof(mail) != "undefined"){
      mail = mail.match(/(\w+)@(.+)\.(\w+)$/);
      if (mail != null){
         if ((mail[3].length==2) || (mail[3].length==3))
            ret = true;
         }
      }
   return ret;
   }
/*========================================================================================*/
/*                                    Variados                                            */
/*========================================================================================*/
/* Altera a mensagem da barra de Status */
function sobretext(msg){
   window.status = msg
   }
/*----------------------------------------------------------------------------------------*/
/* Altera a mensagem da barra de Status */
function StsMsg(msg){
   window.status = msg
   }
/*----------------------------------------------------------------------------------------*/
/* Insere caracteres durante a digitação */
function InsCharData(i, delKey, direction) {
   if (i.value.length < 7) {
      if (delKey!=9) {
         if (delKey!=8 && delKey!=46 && delKey!=16 && !(delKey>36 && delKey<41)){
            var fieldLen = i.value.length
            if ((delKey >= 48 && delKey <= 57) || (delKey >= 96 && delKey <=105)){
               if (fieldLen == 2) {
                  i.value = i.value + "/";
                  }
               } 
            else {
               if (direction == "up") {
                  if (i.value.length == 0)
                     i.value = "";
                  else
                     i.value = i.value.substring(0,i.value.length-1);
                  }
            }
         i.focus();
         }
      } 
      else {
         if (direction == "down")
            CheckDate(i);
         }
      }
   }
/*----------------------------------------------------------------------------------------*/
/* Insere um caractere na string durante a digitação */
function InsChar(i, delKey, direction, leng, pos) {
   if (i.value.length < leng) {
      if (delKey!=9) {
         if (delKey!=8 && delKey!=46 && delKey!=16 && !(delKey>36 && delKey<41)){
            var fieldLen = i.value.length
            if ((delKey >= 48 && delKey <= 57) || (delKey >= 96 && delKey <=105)){
               if (fieldLen == pos) 
                  i.value = i.value + "/";
               }
            else {
               if (direction == "up"){
                  if (i.value.length == 0)
                     i.value = "";
                  else
                     i.value = i.value.substring(0,i.value.length-1);
                  }
            }
         i.focus();
         }
      } 
      else{
         if (direction == "down") 
            CheckDate(i);
         }
      }
   }
/*----------------------------------------------------------------------------------------*/

function OnlyNum(){
   switch(event.keyCode){
      case 44:
      case 46:
      case 48:
      case 49:
      case 50:
      case 51:
      case 52:
      case 53:
      case 54:
      case 55:
      case 56:
      case 57:
      case 58:
         event.keyCode = event.keyCode;
         break;
      default:
         event.keyCode = '127';
         break;
      }
   }
   


function ApenasNumInteiro(){
   switch(event.keyCode){
      case 48:
      case 49:
      case 50:
      case 51:
      case 52:
      case 53:
      case 54:
      case 55:
      case 56:
      case 57:
      case 58:
         event.keyCode = event.keyCode;
         break;
      default:
         event.keyCode = '127';
         break;
      }
   }
   
/*----------------------------------------------------------------------------------------*/


 
	 
function OnlyDate(){
   if ((event.keyCode > 46) && (event.keyCode < 58))
      event.keyCode = event.keyCode;
   else
      event.keyCode = '127';
   }
/*----------------------------------------------------------------------------------------*/
function Msg(msg){
   alert(msg);
   }
/*----------------------------------------------------------------------------------------*/
/*Abre Calendario*/
function calendario(oObjeto){
   window.open('calendario.asp?sObject='+oObjeto ,'calendario','status=no,scrollbars=no,width=176,height=105')
   }
/*----------------------------------------------------------------------------------------*/
/*Abre Calendario*/
function calendariosimu(oObjeto,dData){
   window.open('../calendariop.asp?sObject='+oObjeto+'&data='+dData,'calendario','status=no,scrollbars=no,width=176,height=105')
   }
/*----------------------------------------------------------------------------------------*/
/* Mostra os sistemas*/
function SistZoom(sfSist){
   window.open('sistzoom.asp?sistema='+sfSist,'Zoom','toolbar=no,location=no,status=no,menubar=no,scrollbars=yes,resizable=yes,directories=no,copyhistory=no, height=585, width=780, top=0, left=0');
   }
/*----------------------------------------------------------------------------------------*/
/*A funcao abaixo altera a cor das linhas das tabelas atraves do arquivo
de folha de estilos (CSS).
** Especificações das funcoes **
'McOn : Quando o mouse passa em cima da linha/registro(link)
'McOut: Quando o mouse sai de cima da linha/registro(link)
'McCk : Quando o mouse seleciona a linha/registro(link)
*/
ant = "";
antCls = "";
ant1 = "";
antCls1 = "";
function McOn(nLine){
   if (nLine != ant)
      nLine.className += "on";
   }   
   
/*----------------------------------------------------------------------------------------*/
function McOut(nLine, iMode){
   if (nLine != ant)
      nLine.className = "lineN"+iMode;
   }
/*----------------------------------------------------------------------------------------*/
function McCk(nLine,iMode){	
   if (nLine != ant){
      if (typeof(ant) == 'object')
         ant.className = antCls;
      ant    = nLine;
      antCls = "lineN"+iMode;

      nLine.className = "lineChk";
      }
   }
	 
/*----------------------------------------------------------------------------------------*/	 
function McOn1(nLine){
   if (nLine != ant1)
      nLine.className += "on";
   }   
   
/*----------------------------------------------------------------------------------------*/
function McOut1(nLine, iMode){
   if (nLine != ant1)
      nLine.className = "lineN"+iMode;
   }	 
	 
function McCk1(nLine,iMode){
   if (nLine != ant1)
	 {
     if (typeof(ant1) == 'object')
        ant1.className = antCls1;
     ant1    = nLine;
     antCls1 = "lineN"+iMode;
     nLine.className = "lineChk2";
     }
   }	 
/*----------------------------------------------------------------------------------------*/
/* Muda o estilo do cursor */
function MouseStyle(obj,modo){
var sMouseStyle = (modo == null) ?  0 : modo;
  switch(modo){
     case 1:
     case "hand":
        sMouseStyle = "hand";
        break;
     case 2:
     case "wait":
        sMouseStyle = "wait";
        break;
     default:
        sMouseStyle = "default";
        break;
     }
  obj.style.cursor = sMouseStyle;
  }

/*----------------------------------------------------------------------------------------*/
/* redireciona a página do browse */
function goToURL(surl){
   window.location = surl;
   }

/*----------------------------------------------------------------------------------------*/
/* redireciona a página do browse */
function goToURL2() { //v3.0
  var i, args=goToURL2.arguments;
  document.returnValue = false;
  for (i=0; i<(args.lengh-1); i+=2)
     eval(args[i]+".location='"+args[i+1]+"'");
   }
/*----------------------------------------------------------------------------------------*/
/* retorna um valor falso! Utilizada para bloquear o menu com o botão direito */
function returnfalse(){
   return false;
   }
/*----------------------------------------------------------------------------------------*/
/* Verifica o nome da Janela */
function VerificaJanela(sjanela, snome, surl, bret) { //v3.0
var bRet1 = ((bret!="undefined")&&(bret!=0)) ? true : false;
var surl1 = ((surl!="undefined")&&(surl!="")) ? "redirect.asp" : surl;
var bRetorno;

   if (sjanela.name.toLowerCase() == snome.toLowerCase())
      bRetorno = true;
   //else if (sjanela.name.toLowerCase() != parent.name.toLowerCase())
   //   self.close();
   else{
      bRetorno = false;
      if (bRet1) window.parent.location = "";
      }
   return bRetorno;
   }
/*----------------------------------------------------------------------------------------*/
function AutoFrame(script_name) {
   if (window==parent) {
      parent.location.replace('default.asp?redir='+script_name)
   }
}
/*----------------------------------------------------------------------------------------*/
function OpcaoMenu(op){
   window.open('../menu.asp?item='+op,'menu','');
   }
/*----------------------------------------------------------------------------------------*/
/*========================================================================================*/
/*                                      Menu                                              */
/*========================================================================================*/
// Altera o cor do menu nos eventos onMouseOver e onMouseOut
function MenuOver(nLine){
   nLine.className = "MnOver";
   }
function MenuOut(nLine){
   nLine.className = "MnOut";
   }
/*
// Antigo
function MenuChange(nLine, sCorMn, sCorLk)
   {
   var optionl  = "mn"  + nLine;
   var optionlk = "mnl" + nLine;
   //alert(optionl + "\n" + optionlk)
   //
   document.all[optionl].bgColor       = sCorMn;
   document.all[optionl].style.cursor  = "hand";
   document.all[optionlk].style.color  = sCorLk;
   }
    */
/*----------------------------------------------------------------------------------------*/
function showmenuie5(){
   //Find out how close the mouse is to the corner of the window
   var rightedge  = document.body.clientWidth-event.clientX;
   var bottomedge = document.body.clientHeight-event.clientY;
   //
   //if the horizontal distance isn't enough to accomodate the width of the context menu
   if (rightedge < ie5menu.offsetWidth)
      //move the horizontal position of the menu to the left by it's width
      ie5menu.style.left = document.body.scrollLeft+event.clientX-ie5menu.offsetWidth;
   else
      //position the horizontal position of the menu where the mouse was clicked
      ie5menu.style.left = document.body.scrollLeft+event.clientX;
      //
      //same concept with the vertical position
      if (bottomedge<ie5menu.offsetHeight)
         ie5menu.style.top = document.body.scrollTop+event.clientY-ie5menu.offsetHeight;
      else
         ie5menu.style.top = document.body.scrollTop+event.clientY;
      //
      ie5menu.style.visibility = "visible";
      return false;
   }
/*----------------------------------------------------------------------------------------*/
function hidemenuie5(){
   ie5menu.style.visibility = "hidden";
   }
/*----------------------------------------------------------------------------------------*/
function right(e) {
  if (navigator.appName == 'Netscape' && (e.which == 3 || e.which == 2)){
     return false;
     }
  return true;
  }
/*----------------------------------------------------------------------------------------*/
if (document.layers) 
   window.captureEvents(Event.MOUSEDOWN);
/*----------------------------------------------------------------------------------------*/
//Auxiliares para identificar o evento do Click com o botao direito
document.onmousedown = right;
window.onmousedown   = right;
/*----------------------------------------------------------------------------------------*/

/*----------------------------------------------------------------------------------------*
 ################## TESTES ############################
function Now()
   {
/*   var now = new Date();
   alert(now)
   return now*
   }
/*----------------------------------------------------------------------------------------*
function Date(dDate)
   {
/*   var ndDate = (dDate == null) ?  Now() : dDate;
   var nrdDate = ndDate.getDate();
   return nrdDate

   /*var now = new Date();
   var nowDay = now.getDay();
   var nowDate = now.getDate();
   var nowMonth = now.getMonth() + 1;
   var nowMonth0 = now.getMonth() + 1;
   var nowYear = now.getFullYear();
   var timezone = now.getTimezoneOffset();
   var min = now.getMinutes();
   var hour = now.getHours();*
   }
   /**/
/*----------------------------------------------------------------------------------------*/

function copyright(sCor)
  {
  //color="#9c9a9c"
  var sCorCopy = (sCor == null) ?  "#FFFFFF" : sCor;
  var data = new Date();
  return '<font color="' + sCorCopy + '" face="Verdana" size="1">Copyright &copy; 2001 - ' + data.getFullYear() + ' UBB Prev. Todos os direitos reservados &nbsp;</span>';
  }
  
  function PosicionaTela1(par,modo){
var iAlt, iLar, valor

    alert(modo +' - ' +par);
   switch(modo){
      case 0:
         valor = (window.screen.height-par)/2;
         break;
      case 1:
         valor = (window.screen.width-par)/2;
         break;

      }
   alert(valor);
   return valor
   }

function McCkMenu(nLine,iMode){
   if (nLine != ant){
      if (typeof(ant) == 'object')
         ant.className = antCls;

      ant    = nLine;
      antCls = "lineN"+iMode;

      nLine.className = "lineChk5";
      }
   }  

function addfavoritos()
  {
    if (document.all)
    window.external.AddFavorite(bookmarkurl,bookmarktitle)
  }
  
  function MM_swapImgRestore() { //v3.0
  var i,x,a=document.MM_sr; 
  for(i=0;a&&i<a.length&&(x=a[i])&&x.oSrc;i++) 
    x.src=x.oSrc;
}
function MM_preloadImages() { //v3.0
  var d=document; 
  
  if(d.images){ 
    if(!d.MM_p) 
	   d.MM_p=new Array();
		
    var i,j=d.MM_p.length,a=MM_preloadImages.arguments; 
	 for(i=0; i<a.length; i++)
      if (a[i].indexOf("#")!=0){ 
	     d.MM_p[j]=new Image; 
		  d.MM_p[j++].src=a[i];
      }
  }
}

function MM_findObj(n, d) { //v4.01
  var p,i,x;  
  if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
    d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);
  }
  if(!(x=d[n])&&d.all) 
    x=d.all[n]; 
	 
  for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
    for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);
      if(!x && d.getElementById) x=d.getElementById(n); 
  
  return x;
}

function MM_swapImage() { //v3.0
  var i,j=0,x,a=MM_swapImage.arguments; 
  document.MM_sr=new Array; 
  
  for(i=0;i<(a.length-2);i+=3)
    if ((x=MM_findObj(a[i]))!=null){
		document.MM_sr[j++]=x; 
		if(!x.oSrc) 
		x.oSrc=x.src; 
		x.src=a[i+2];
	 }
}
/*
function FormataValor(campo,tammax,teclapres) {
var tecla = teclapres.keyCode;
vr = document.form[campo].value;
vr = vr.replace( "/", "" );
vr = vr.replace( "/", "" );
vr = vr.replace( ",", "" );
vr = vr.replace( ".", "" );
vr = vr.replace( ".", "" );
vr = vr.replace( ".", "" );
vr = vr.replace( ".", "" );
tam = vr.length;
if (tam < tammax && tecla != 8){ tam = vr.length; }
if (tecla == 8 ){ tam = tam - 1; }
if ( tecla == 8 || tecla >= 48 && tecla <= 57 || tecla >= 96 && tecla <= 105 ){
if ( tam <= 2 ){
document.form[campo].value = vr; }
if ( (tam > 2) && (tam <= 5) ){
document.form[campo].value = vr.substr( 0, tam - 2 ) + ',' + vr.substr( tam - 2, tam ); }
if ( (tam >= 6) && (tam <= 8) ){
document.form[campo].value = vr.substr( 0, tam - 5 ) + '.' + vr.substr( tam - 5, 3 ) + ',' + vr.substr( tam - 2, tam ); }
if ( (tam >= 9) && (tam <= 11) ){
document.form[campo].value = vr.substr( 0, tam - 8 ) + '.' + vr.substr( tam - 8, 3 ) + '.' + vr.substr( tam - 5, 3 ) + ',' + vr.substr( tam - 2, tam ); }
if ( (tam >= 12) && (tam <= 14) ){
document.form[campo].value = vr.substr( 0, tam - 11 ) + '.' + vr.substr( tam - 11, 3 ) + '.' + vr.substr( tam - 8, 3 ) + '.' + vr.substr( tam - 5, 3 ) + ',' + vr.substr( tam - 2, tam ); }
if ( (tam >= 15) && (tam <= 17) ){
document.form[campo].value = vr.substr( 0, tam - 14 ) + '.' + vr.substr( tam - 14, 3 ) + '.' + vr.substr( tam - 11, 3 ) + '.' + vr.substr( tam - 8, 3 ) + '.' + vr.substr( tam - 5, 3 ) + ',' + vr.substr( tam - 2, tam );}
}
}*/
  
	function MascaraMoeda(objTextBox, SeparadorMilesimo, SeparadorDecimal, e){
    var sep = 0;
    var key = '';
    var i = j = 0;
    var len = len2 = 0;
    var strCheck = '0123456789';
    var aux = aux2 = '';
    var whichCode = (window.Event) ? e.which : e.keyCode;
    if (whichCode == 13) return true;
    key = String.fromCharCode(whichCode); // Valor para o código da Chave
    if (strCheck.indexOf(key) == -1) return false; // Chave inválida
    len = objTextBox.value.length;
    for(i = 0; i < len; i++)
        if ((objTextBox.value.charAt(i) != '0') && (objTextBox.value.charAt(i) != SeparadorDecimal)) break;
    aux = '';
    for(; i < len; i++)
        if (strCheck.indexOf(objTextBox.value.charAt(i))!=-1) aux += objTextBox.value.charAt(i);
    aux += key;
    len = aux.length;
    if (len == 0) objTextBox.value = '';
    if (len == 1) objTextBox.value = '0'+ SeparadorDecimal + '0' + aux;
    if (len == 2) objTextBox.value = '0'+ SeparadorDecimal + aux;
    if (len > 2) {
        aux2 = '';
        for (j = 0, i = len - 3; i >= 0; i--) {
            if (j == 3) {
                aux2 += SeparadorMilesimo;
                j = 0;
            }
            aux2 += aux.charAt(i);
            j++;
        }
        objTextBox.value = '';
        len2 = aux2.length;
        for (i = len2 - 1; i >= 0; i--)
        objTextBox.value += aux2.charAt(i);
        objTextBox.value += SeparadorDecimal + aux.substr(len - 2, len);
    }
    return false;
}
/*---------------------------*/

function DataAtual()
{  var result;
   var dtAtual = new Date();
  
  dia = dtAtual.getDate();
  dias = dtAtual.getDay();
  mes = dtAtual.getMonth()+1;
  ano = dtAtual.getYear();


  return StrZero(dia,2) + "/" + StrZero(mes,2) + "/" + ModAno(StrZero(ano,2));
	
//	return EncodeDate(dia,mes,ano);
}


function FormatarMascara(src, mask)
{
   var i = src.value.length;
   var saida = mask.substring(0,1);
   var texto = mask.substring(i)
   if (texto.substring(0,1) != saida)
   {
      src.value += texto.substring(0,1);
   }
}

// Valida Data
function y2k(number) { return (number < 1000) ? number + 1900 : number; }
function ValidaData(dData, Obr) {   
	//dt dd/mm/aaaa
	var day   = dData.substr(0,2); 
	var month = dData.substr(3,2);
	var year  = y2k(dData.substr(6,4));
	if (Obr == 1){
		if( (dData.length == 10 || dData.length == 8) ){
   		var today = new Date();
   		year = ((!year) ? y2k(today.getYear()):year);
   		month = ((!month) ? today.getMonth():month-1);
		
	   	if (!day) return false
		
   		var test = new Date(year,month,day);
   		if ( (y2k(test.getYear()) == year) && (month == test.getMonth()) && (day == test.getDate()) ){
//				eval("document.all." + tdDesc).style.color= "#737373";
				return true;
			}else{
//				eval("document.all." + tdDesc).style.color= "red"; 
				return false;
			}
		}else{
//			eval("document.all." + tdDesc).style.color= "red"; 
			return false;	
		}
	}else{
		if( dData.length == 10 || dData.length == 8 ){
   		var today = new Date();
   		year = ((!year) ? y2k(today.getYear()):year);
   		month = ((!month) ? today.getMonth():month-1);
		
	   	if (!day) return false
		
   		var test = new Date(year,month,day);
   		if ( (y2k(test.getYear()) == year) && (month == test.getMonth()) && (day == test.getDate()) ){
//				eval("document.all." + tdDesc).style.color= "#737373";
				return true;
			}else{
//				eval("document.all." + tdDesc).style.color= "red"; 
				return false;
			}
		}else{
			if(dData.length == ""){
//				eval("document.all." + tdDesc).style.color= "#737373";
				return true;
			}else{
//				eval("document.all." + tdDesc).style.color= "red";
				return true;
			}
		}
	}
}

function voltar(pagina)
{
 window.open('default.asp?secao='+pagina,'_self');
}	

function AbrirArquivo(arquivo){

	window.open('download/'+arquivo, '_blank');
}

function DonwloadArquivo(arquivo, param){
   if ( param == '1') 
	{
	  window.open('download/'+arquivo, '_blank');
	}
	else 
	{
 	  window.open('../download/'+arquivo, '_blank');
   }
}

function DonwArq(fdpl,ano){
   if ( fdpl == '104004' || fdpl == '104005' || fdpl == '104008') 
	{
	  window.open('ID'+fdpl+'/Entidade/relatorio_anual_g1_'+ano+'.pdf', '_blank');
	}
	else if (fdpl == '104009')
	{
  	  window.open('ID'+fdpl+'/Entidade/relatorio_anual_g2_'+ano+'.pdf', '_blank');
   }
	else
	{
	  window.open('ID'+fdpl+'/Entidade/relatorio_anual_g3_'+ano+'.pdf', '_blank');
	}
}

function AbrirArquivoInterno(arquivo){
	window.open('../download/'+arquivo, '_blank');
}
function MontaDataSQL(pData){
	Dia = Day(TrimJS(pData));
	Mes= Month(TrimJS(pData));
	Ano= Year(TrimJS(pData));
		if(Dia.length==1){
			Dia= "0"+Dia;
		};
		if(Mes.length==1){
			Mes= "0"+Mes;
		};			
		sResult= TrimJS(Ano)+Mes+Dia;
		return sResult;
}

/*
Antida joão
function FecharJanela(parametro)
{
	if (spTpEvento > 0)
	{
		if(navigator.appVersion.indexOf("MSIE 7.0") > 0)
		{
			window.open("Default.aspx?hcl="+parametro, "_self");
		}
		else
			if(navigator.appVersion.indexOf("MSIE 6.0") > 0)
			{
				window.open("Default.aspx?hcl="+parametro, "_blank");
			}
			else
			{
				window.open("Default.aspx?hcl="+parametro, "_blank");
			}
//		window.open("Default.aspx?hcl="+parametro, "_blank");
	}
}
*/


/*
function FecharJanela(parametro)
{
	if (spTpEvento > 0)
	{
		if(navigator.appVersion.indexOf("MSIE 7.0") > 0)
		{
			window.open("CadLoginOut.aspx?fc="+parametro, "_self");
		}
		else
			if(navigator.appVersion.indexOf("MSIE 6.0") > 0)
			{
				window.open("CadLoginOut.aspx?fc="+parametro, "_blank");
			}
			else
			{
				window.open("CadLoginOut.aspx?fc="+parametro, "_blank");
			}
//		window.open("Default.aspx?hcl="+parametro, "_blank");
	}
}
*/

function SetaVariavelEvento()
{
	spTpEvento = 0;
}

function onLoadLink() {
	var aLink = document.getElementsByTagName('a');
	var aInput = document.getElementsByTagName('input');
	if (aInput)
		for (var j = 0; j < aInput.length; ++j)
			if (aInput[j].name == 'botton' || ! aInput[j].onclick)
				aInput[j].onclick = SetaVariavelEvento;
	
	
	if (aLink)				
		for (var i = 0; i < aLink.length; ++i)
			if (!(aLink[i].onclick))
				aLink[i].onclick = SetaVariavelEvento;
}

// ## Seta todos os label para cursor hand ##
function onLoadLabel() {
    var aLabel = document.getElementsByTagName('label');
	
    if (aLabel)				
			for (var i = 0; i < aLabel.length; ++i)
					if (!(aLabel[i].onmouseover))
							aLabel[i].onmouseover = aLabel[i].style.cursor = "hand"; SetaVariavelEvento();
}

var BrowserDetect = {
	init: function () {
		this.browser = this.searchString(this.dataBrowser) || "An unknown browser";
		this.version = this.searchVersion(navigator.userAgent)
			|| this.searchVersion(navigator.appVersion)
			|| "an unknown version";
		this.OS = this.searchString(this.dataOS) || "an unknown OS";
	},
	searchString: function (data) {
		for (var i=0;i<data.length;i++)	{
			var dataString = data[i].string;
			var dataProp = data[i].prop;
			this.versionSearchString = data[i].versionSearch || data[i].identity;
			if (dataString) {
				if (dataString.indexOf(data[i].subString) != -1)
					return data[i].identity;
			}
			else if (dataProp)
				return data[i].identity;
		}
	},
	searchVersion: function (dataString) {
		var index = dataString.indexOf(this.versionSearchString);
		if (index == -1) return;
		return parseFloat(dataString.substring(index+this.versionSearchString.length+1));
	},
	dataBrowser: [
		{ 	string: navigator.userAgent,
			subString: "OmniWeb",
			versionSearch: "OmniWeb/",
			identity: "OmniWeb"
		},
		{
			string: navigator.vendor,
			subString: "Apple",
			identity: "Safari"
		},
		{
			prop: window.opera,
			identity: "Opera"
		},
		{
			string: navigator.vendor,
			subString: "iCab",
			identity: "iCab"
		},
		{
			string: navigator.vendor,
			subString: "KDE",
			identity: "Konqueror"
		},
		{
			string: navigator.userAgent,
			subString: "Firefox",
			identity: "Firefox"
		},
		{
			string: navigator.vendor,
			subString: "Camino",
			identity: "Camino"
		},
		{		// for newer Netscapes (6+)
			string: navigator.userAgent,
			subString: "Netscape",
			identity: "Netscape"
		},
		{
			string: navigator.userAgent,
			subString: "MSIE",
			identity: "Explorer",
			versionSearch: "MSIE"
		},
		{
			string: navigator.userAgent,
			subString: "Gecko",
			identity: "Mozilla",
			versionSearch: "rv"
		},
		{ 		// for older Netscapes (4-)
			string: navigator.userAgent,
			subString: "Mozilla",
			identity: "Netscape",
			versionSearch: "Mozilla"
		}
	],
	dataOS : [
		{
			string: navigator.platform,
			subString: "Win",
			identity: "Windows"
		},
		{
			string: navigator.platform,
			subString: "Mac",
			identity: "Mac"
		},
		{
			string: navigator.platform,
			subString: "Linux",
			identity: "Linux"
		}
	]

};
BrowserDetect.init();


var sIdAnt = "";
			
function mostra(mostra){
	if (mostra != sIdAnt) {
		document.getElementById(mostra).style.visibility='visible';
		document.getElementById(mostra).style.display='block'
		if (sIdAnt != "") {
			document.getElementById(sIdAnt).style.visibility='hidden';
			document.getElementById(sIdAnt).style.display='none';
		}
		sIdAnt = mostra;
	} 
}