//*Altera senha de login*//
function AlteraSenha() 
 {
  var url = "Prod_AlteraSenha.asp";
  var hWnd = window.open(url, "ChangePass", "width=235,height=140,left=100,top=100,resizable=no,scrollbars=no");
  if ( (document.window != null) && (!hWnd.opener) ) hWnd.opener = document.window;
 }

//*Altera imagem do icone na barra de titulo*//
function fMudaImg(tipo) 
 {
  var obj;

  if (!document.all&&!document.getElementById)
  return

  obj=eval("parent.frames['titulo'].document.images."+"imgmodo")
  if (obj!=null)
     {
      if (tipo == 2) 
         {
          obj.alt = "Estrutura de Documentos/Imagens";
          obj.src="Imagens/modo_doc_imagem.gif";
         }
      else
         {
          obj.alt = "Estrutura de Pastas/Documentos";
          obj.src="Imagens/modo_pasta_doc.gif";
         }
     }
 }

//*Altera imagem do icone na barra de titulo*//
function fMudaImgGeral(pFrame,pImage,pArquivo,NumParent) 
 {
  var obj;

  if (!document.all&&!document.getElementById)
  return

  if (NumParent==1)
     {
      obj=eval("parent.frames['" + pFrame + "'].document.images."+pImage)
	 }
  else if (NumParent==2)
     {
      obj=eval("parent.parent.frames['" + pFrame + "'].document.images."+pImage)
	 }
  else if (NumParent==3)
     {
      obj=eval("parent.parent.parent.frames['" + pFrame + "'].document.images."+pImage)
	 }
 
  if (obj!=null)
     {
      obj.src=pArquivo;
     }
 }

//Nao usada
function PesqGeral() {
    window.parent.parent.location.replace("Prod_Selecao.asp");
  }

//Nao usada
//function AbrirAnexoURL() {
//    var url = "Prod_Anexar.asp?Zerar=1&anexar=3&doc_codigo=" + strObjCodigo;
//	var hWnd = window.open(url,"Tipo de Documentos","width=500,height=400,resizable=yes,scrollbars=yes");
//	   if ((document.window != null) && (!hWnd.opener))
//	   hWnd.opener = document.window;
//   }

//Nao usada
//function AbrirAnexos() 
//    {
//    var url = "Prod_Anexar.asp?Zerar=1&anexar=1&doc_codigo=" + strObjCodigo;
//    var hWnd = window.open(url,"Tipo de Documentos","width=500,height=400,resizable=yes,scrollbars=yes");

//	if ((document.window != null) && (!hWnd.opener))
//	   hWnd.opener = document.window;
//    }

//Nao usada
//Esta função irá excluir todo o Conteúdo anexado do documento escolhido
//function ExcluirConteudo() 
//    {
//     if (strObjCodigo != "") {
//        vetObj = strObjCodigo.split(';');
//        if (vetObj.length == 2) {
//            if (confirm("Confirma exclusão de todas as páginas do Documento escolhido ?")) {
//                document.frames["frameOperacoes"].location.replace("Prod_Operacoes.asp?Oper=EXCLUIRCONTEUDO&doc_codigo=" + strObjCodigo);
//            }
//        }
//        else alert('Escolha apenas um documento.');
//      }
//      else alert('Escolha um documento.');
//    }

//Nao usada
//Esta função fará um refresh na página atual, passando um parâmetro
//para a exclusão do documento.
/*function Excluir() 
   { 
      if (strObjCodigo != "") {
         if (confirm("Confirma exclusão do(s) Documento(s) ?")) {
             document.frames["frameOperacoes"].location.replace("Prod_Operacoes.asp?Oper=EXCLUIR&doc_codigo=" + strObjCodigo);
	         var url = "Prod_Doc_Arvore.asp?doc_codigo_pai=<%=doc_codigo_pai%>&doc_nome=<%=Pasta%>";
	         //window.location.replace(url);
         }
      }
      else alert('Escolha um documento.');
   }
*/

//Nao usada
//Esta função fará uma chamada para uma página no IFRAME que irá copiar o documento
/*function CopiaDocumento() 
   {
      if (strObjCodigo != "")
         document.frames["frameOperacoes"].location.replace("Prod_Operacoes.asp?Oper=COPIAR&doc_codigo=" + strObjCodigo);
      else alert('Escolha um documento.');
   }
*/

//Nao usada
//Esta função fará uma chamada para uma página no IFRAME que irá duplicar o documento
/*function DuplicaDocumento(obj_codigo_pai)
   {
    document.frames["frameOperacoes"].location.replace("Prod_Operacoes.asp?Oper=DUPLICAR&doc_codigo_pai=" + obj_codigo_pai);
    document.location.replace("Prod_Doc_Arvore.asp?doc_codigo_pai=<%=Request.QueryString("doc_codigo_pai")%>&doc_nome=<%=Request.QueryString("doc_nome")%>");
   }
*/

//Nao usada
//Esta função fará uma chamada para uma página no IFRAME que irá transferir o documento
/*function TransfereDocumento(obj_codigo_pai)
   {
    document.frames["frameOperacoes"].location.replace("Prod_Operacoes.asp?Oper=TRANSFERIR&doc_codigo_pai=" + doc_codigo_pai);
    document.location.replace("Prod_Doc_Arvore.asp?doc_codigo_pai=<%=Request.QueryString("doc_codigo_pai")%>&doc_nome=<%=Request.QueryString("doc_nome")%>");
   }
*/

//Nao usada
//Esta função abrirá uma página separada, para o usuário escolher qual
//tipo de documento ele irá criar.
/*function AcaoNovo(Pai,TipoDoc)
   {
	var url = "Prod_TipoDocumento.asp?praonde=Prod_Doc_Arvore.asp&target=frm_doc_arvore&doc_codigo_pai=" + Pai +  "&tipodoc=" + TipoDoc + "&width=" + window.screen.width;
	var hWnd = window.open(url,"Tipo de Documentos","width=400,height=400,resizable=yes,scrollbars=yes,top=0,left=0");
	if ((document.window != null) && (!hWnd.opener))
	hWnd.opener = document.window;
   }
*/

//Nao usada
//Esta função digitalizara um documento
/*function Digitaliza() 
    {
      if (strObjCodigo != "") {
         document.frames["frameDigitaliza"].location.replace("Prod_Digitaliza.asp?doc_codigo=" + strObjCodigo);
      }
      else alert('Escolha um documento.');
   }
*/

//Nao usada
/*function Pasta_AbrirForm() 
 { 
  var flag = false;
  var codigo;
  
  if (strObjCodigo == "") 
     {alert('Escolha uma pasta.');}    
  else {
        vetObjCodigo = strObjCodigo.split(";");
        if (vetObjCodigo.length > 2)
           alert('Escolha apenas uma pasta.');
        else {
           codigo = vetObjCodigo[0];
           flag = true;
             }   
       }
  if(flag) 
    {
     var url = "";
     var inputs = document.frmPasta.elements.tags("INPUT");
     for (i=0; i<inputs.length; i++) 
	     {
	      if (inputs[i].name == codigo) url = inputs[i].value + "&width=" + window.screen.width;
         }
	 window.parent.parent.frames["frm_Docs"].frames["frm_doc_arvore"].location.replace(url);
    }   
 }
*/

//Nao usada
//Esta função fará um refresh na página atual, passando um parâmetro
//para a exclusão do documento.
/*function Pasta_excluir() 
  { 
    if (strObjCodigo != "") 
	   {
        if (confirm("Confirma exclusão da(s) Pasta(s) Selecionada(s)?")) 
		   {
            document.frames["frameOperacoes"].location.replace("Prod_Operacoes.asp?Tipo=PASTA&Oper=EXCLUIR&doc_codigo=" + strObjCodigo);
            //document.location.replace("bkm_estruturapasta.asp");
           }
       }
    else
       alert('Escolha uma Pasta.');
  }
*/

//Nao usada
//Esta função fará uma chamada para uma página no IFRAME que irá copiar o documento
//function CopiaDocumento() {
/*function Pasta_CopiaDocumento() 
   {
     if (strObjCodigo != "") 
	    {
         for (var i=0; i<=document.images.length-1; i++) 
		     {
              if (document.images.item(i).title == "check") 
                 document.images.item(i).src = "Imagens/ico_unchecked.gif";
             }
         document.frames["frameOperacoes"].location.replace("Prod_Operacoes.asp?Tipo=PASTA&Oper=COPIAR&doc_codigo=" + strObjCodigo);
         strObjCodigo = "";
        }   
     else
        alert('Nenhuma Pasta foi selecionada para cópia');   
   }
*/

//Nao usada
//Esta função fará uma chamada para uma página no IFRAME que irá duplicar o documento
/*function Pasta_DuplicaDocumento()
   {
    document.frames["frameOperacoes"].location.replace("Prod_Operacoes.asp?Oper=DUPLICAR&Tipo=PASTA&doc_codigo_pai=" + strObjCodigo);
    strObjCodigo = "";
   }
*/

//Nao usada
//Esta função fará uma chamada para uma página no IFRAME que irá transferir o documento
/*function Pasta_TransfereDocumento()
   {
    document.frames["frameOperacoes"].location.replace("Prod_Operacoes.asp?Oper=TRANSFERIR&doc_codigo_pai=" + strObjCodigo);
    document.location.replace("Prod_Pasta_Arvore.asp");
    strObjCodigo = "";
   }
*/

//Nao usada
//Esta função abrirá uma página separada, para o usuário escolher qual
//tipo de documento ele irá criar.
/*function Pasta_acaoNovo(Pai,TipoDoc)
   {
    var flag = false;
    if (strObjCodigo == "") 
	   {
        strObjCodigo = "-1";
        flag = true;
       }    
    else 
	   {
        vetObjCodigo = strObjCodigo.split(";");
        if (vetObjCodigo.length > 2)
           alert('Escolha apenas uma pasta.');
        else 
		  {
           strObjCodigo = vetObjCodigo[0];
           flag = true;
          }   
       }
    if(flag) 
	   {
	    var url = "Prod_TipoDocumentos.asp?praonde=Prod_Doc_Arvore.asp&target=frm_doc_arvore&doc_codigo_pai=" + strObjCodigo +  "&tipodoc=" + TipoDoc;
	    var hWnd = window.open(url,"Tipo de Documentos","width=400,height=400,resizable=yes,scrollbars=yes,top=0,left=0");
	    if ((document.window != null) && (!hWnd.opener))
	    hWnd.opener = document.window;
	    strObjCodigo = strObjCodigo + ";";
	   }
	
   }
*/

var strObjCodigo = ""

function Remove(ObjCodigo) {

  var tam = strObjCodigo.length;
     
  // Tamanho do ObjCodigo a ser adicionado
  var tamAdd = ObjCodigo.length;
     
  // Variaveis para auxiliar na verificacao se o obj_codigo ja existe
  var cont = 0;
  var contAdd = 0;
     
  // Variavel para verificar se o ObjCodigo ja existe.
  var JaExiste = 0;
     
  // Variavel para auxiliar na comparacao com do ObjCodigo
  var nova = ObjCodigo + "!";

  var Remover = "";

  if (strObjCodigo != "") {
     while (cont < tam) {
       if (nova.substring(contAdd,contAdd+1) == strObjCodigo.substring(cont,cont+1)) {
           cont++;
           contAdd++;
           if (nova.substring(contAdd,contAdd+1) == "!") {
               cont = tam + 1;
               contAdd = 0;
               JaExiste = 1;
               Remover = ObjCodigo + ";";
               strObjCodigo = strObjCodigo.replace(Remover, "");
           }
       }
       else
       {
          var i = 0;
          for(i=0;i<=tam;i++) {
             if (strObjCodigo.substring(cont,cont+1) == ";") {
                 cont++;
                 contAdd = 0;
                 i = tam + 1;
             }
             else
               cont++;
          }//end for
       }//end else
     }// end while
  }// end if strObjCodigo!=""
}  

function Adiciona(ObjCodigo) {

  var tam = strObjCodigo.length;
     
  // Tamanho do ObjCodigo a ser adicionado
  var tamAdd = ObjCodigo.length;
     
  // Variaveis para auxiliar na verificacao se o obj_codigo ja existe
  var cont = 0;
  var contAdd = 0;
     
  // Variavel para verificar se o ObjCodigo ja existe.
  var JaExiste = 0;
     
  // Variavel para auxiliar na comparacao com do ObjCodigo
  var nova = ObjCodigo + "!";

  if (strObjCodigo != "") {
     while (cont < tam) {
       if (nova.substring(contAdd,contAdd+1) == strObjCodigo.substring(cont,cont+1)) {
           cont++;
           contAdd++;
           if (nova.substring(contAdd,contAdd+1) == "!") {
               cont = tam + 1;
               contAdd = 0;
               JaExiste = 1;
           }
       }
       else
       {
          var i = 0;
          for(i=0;i<=tam;i++) {
             if (strObjCodigo.substring(cont,cont+1) == ";") {
                 cont++;
                 contAdd = 0;
                 i = tam + 1;
             }
             else
               cont++;
          }//end for
       }//end else
     }// end while
  }// end if strObjCodigo!=""

  //Se a palavra ja existir, ela nao e adicionada
  if (JaExiste == 0) {
      strObjCodigo = strObjCodigo + ObjCodigo + ";";
      return(true);
      //alert(strObjCodigo);
  }
  else return(false);    
     
}//end function Adiciona(ObjCodigo)