function print_r( input, _indent )
{        
     var indent            =    ( typeof( _indent ) == 'string' ) ? _indent + '    ' : '    '
     var parent_indent     =    ( typeof( _indent ) == 'string' ) ? _indent : '';
     var output            =    '';
    
     // Tipo de Elemento do Array
    
     switch( typeof( input ) )
     {
         case 'string':
             output        =    "'" + input + "'\n";
         break;        
         case 'number':
             output        =    input + "\n";
         break;                
         case 'boolean':
             output        =    ( input ? 'true' : 'false' ) + "\n";
         break;        
         case 'object':
             output        =    ( ( input.reverse ) ? 'Array' : 'Object' ) + "\n";    
             output       +=    parent_indent + "(\n";            
             for( var i in input )
             {
                 output +=    indent + '[' + i + '] => ' + print_r( input[ i ], indent );
             }            
             output       +=    parent_indent + ")\n"
         break;
     }    
     return output;
}


function Sleep(naptime){
  naptime = naptime;
  var sleeping = true;
  var now = new Date();
  var alarm;
  var startingMSeconds = now.getTime();
  while(sleeping){
	 alarm = new Date();
	 alarmMSeconds = alarm.getTime();
	 if(alarmMSeconds - startingMSeconds > naptime){
		 sleeping = false;
	}
  }
}

function mouseX(evt) {
			if (!evt) evt = window.event; 
			if (evt.pageX) return evt.pageX; 
			else if (evt.clientX)return evt.clientX + (document.documentElement.scrollLeft ?  document.documentElement.scrollLeft : document.body.scrollLeft); 
			else return 0;
}
function mouseY(evt) {
	if (!evt) evt = window.event; 
	if (evt.pageY) return evt.pageY; 
	else if (evt.clientY)return evt.clientY + (document.documentElement.scrollTop ? document.documentElement.scrollTop : document.body.scrollTop); 
	else return 0;
}

function vCampoNulo(campo){
   nome = campo;
   campo = get_field(campo);
   if (campo.value == ""){
      alert("Preencha o Campo '"+nome.toUpperCase()+"'");
      return false;
   }else {
      return true;  
   }
   
}
function part_number(p_str){
   var num = '';
	for (var i=0;i<p_str.length; i++){
		for (v_num=0; v_num<10; v_num++)
		{
			if (p_str.substr(i,1) == v_num+''){
				num = num + p_str.substr(i,1);
			}
		}
	}
	return (num*1);
}
//
//
//
function get_action(p_name_form, p_name_function_data){
   var param = 'demonstrativo_producao.php?_load_data=' + p_name_function_data;
   var add_param;
   
   for (var i=0; i<document.forms[p_name_form].elements.length; i++){
      obj = document.forms[p_name_form].elements[i];
      add_param = false;      
      if (obj.tagName == 'INPUT' || obj.tagName == 'SELECT'){
         add_param = true;
         if ((obj.type == 'checkbox' || obj.type == 'radio') && obj.checked == false){
            add_param = false;
         }
      }
      if (add_param == true){
         param = param + '&' + obj.name + '=' + obj.value;
      }
   }
   
   return param;
}

function SubmitAjax(p_object_name, p_event, p_action, p_validate){
   var param;
   var obj;
   var cmd;
   
   if (p_validate == 1){
      eval('var ret = validate_' + p_object_name + '();');
      if (ret == false) return false;
   }
   
   if (p_event == 'DELETE'){
      if (!confirm('Tem certeza que deseja apagar o registro!')){
         return false;
      }
   }
   
   param = 'datetime=' + new Date();
   param = param + '&object=' + p_object_name;
   param = param + '&event='  + p_event;
   var add_param = false;
   for (var i=0; i<document.forms['frm_' + p_object_name].elements.length; i++){
      obj = document.forms['frm_' + p_object_name].elements[i];
      add_param = false;      
      if (obj.tagName == 'INPUT' || obj.tagName == 'SELECT'){
         add_param = true;
         if ((obj.type == 'checkbox' || obj.type == 'radio') && obj.checked == false){
            add_param = false;
         }
      }
      if (add_param == true){
         param = param + '&' + obj.name + '=' + obj.value;
      }
   }
   $.blockUI( '<p class="mensagem">Processando...</p>' );
   $.ajax(
      {
         type: "POST",
         url: p_action,
         data: param,
         success: function(data){
					      $.unblockUI();            
                     eval('callback_' + p_object_name + '(data);');
                  }
      }
   );
}
//
//
//
function findPos(obj) {
	var curleft = curtop = 0;
	if (obj.offsetParent) {
		curleft = obj.offsetLeft
		curtop = obj.offsetTop
		while (obj = obj.offsetParent) {
			curleft += obj.offsetLeft
			curtop += obj.offsetTop
		}
	}
	return [curleft,curtop];
}
//
//
//
function setLyr(obj,lyr)
{
	var coors = findPos(obj);
	var x = document.getElementById(lyr);
	x.style.top =  (coors[1]+10) + 'px';
	x.style.left = (coors[0]) + 'px';
}

//
// Ordena um Combobox
//
function sort_combo(p_obj, p_type){
   var data_value = new Array();
   var data = new Array();

   for(var i=0; i<p_obj.length; i++){
      data_value[i] = p_obj.options[i].value;
      data[p_obj.options[i].value] = p_obj.options[i].text;
   }

   if (p_type == 'DATE'){
      var xdata = new Array();
      for(var i=0; i<data_value.length; i++){
         if (data_value[i]){
            var value = data_value[i].substr(6,4) + '' +
            data_value[i].substr(3,2) + '' +
            data_value[i].substr(0,2);
         }else{
            var value = data_value[i];
         }
         xdata[value] = data_value[i];
         data_value[i] = value;
      }
      data_value.sort();
      for(var i=0; i<data_value.length; i++){
         data_value[i] = xdata[data_value[i]];
      }
   }else if (p_type == 'NUMBER'){
      for(var i=0; i<data_value.length; i++){
         if ((data_value[i] * 1)){
            data_value[i] = data_value[i] * 1;
         }
      }
      data_value.sort();
   }else{
      data_value.sort();
   }
   var new_data = new Array();
   for(var i=0; i<data_value.length; i++){
      p_obj.options[i].value = data_value[i];
      p_obj.options[i].text  = data[data_value[i]];
   }
}


function lpad(str, len, pad) {

   if (typeof(len) == "undefined") { var len = 0; }
   if (typeof(pad) == "undefined") { var pad = ' '; }

   if (len + 1 >= str.length) {
      str = Array(len + 1 - str.length).join(pad) + str;
   }

   return str;

}

function validate_count_caracter(obj,p_nro_caracter,p_id_div,e){
   if (obj.value.length > p_nro_caracter)
   {
      e     = (netscape) ? e       : event;
      tecla = (netscape) ? e.which : e.keyCode;
      if(netscape)
      return e.cancelBubble=false;
      else
      return e.returnValue=false;
   }
   imp_html_div(obj.value.length+' de ' + p_nro_caracter,p_id_div);
}


function AbrirPaleta(p_nome_button){
   if(document.getElementById("paction" + p_nome_button).style.visibility == "hidden"){
      document.getElementById("paction" + p_nome_button).style.visibility = "visible";
      if (event){
         document.getElementById("paction" + p_nome_button).style.top = event.offsetY;
         document.getElementById("paction" + p_nome_button).style.left = event.offsetX;
      }
   }else{
      document.getElementById("paction" + p_nome_button).style.visibility = "hidden";
   }
}

function setBackGround(p_name_element, p_color){
   get_field(p_name_element).style.background = p_color;
}

function setValueColor(p_name_element, p_value){
   get_field(p_name_element).value = p_value;
   if (p_value == '') p_value = '#FFFFFF';
   get_field(p_name_element).style.background = p_value;
}


function hideSelect()
{
   var v_tamanho = 150;
   if (v_tamanho > document.forms[0].length)
   {
      v_tamanho = document.forms[0].length;
   }
   for (var v_indice=0; v_indice < v_tamanho; v_indice++)
   {
      if (document.forms[0].elements[v_indice].type == "select-one")
      {
         document.forms[0].elements[v_indice].style.visibility='hidden';
      }
   }
}

function showSelect()
{
   var v_tamanho = 150;
   if (v_tamanho > document.forms[0].length)
   {
      v_tamanho = document.forms[0].length;
   }
   for (var v_indice=0; v_indice < v_tamanho; v_indice++)
   {
      if (document.forms[0].elements[v_indice].type == "select-one")
      {
         document.forms[0].elements[v_indice].style.visibility='visible';
      }
   }
}


var lastScrollX = 0;
var lastScrollY = 0;

function heartBeat(p_name_div) {
   var ie=document.all;

   if (ie){
      diffY = document.body.scrollTop;
      diffX = document.body.scrollright;
   }else{
      diffY = self.pageYOffset;
      diffX = self.pageXOffset;
   }
   if(diffY != lastScrollY) {
      percent = .1 * (diffY - lastScrollY);
      if(percent > 0) percent = Math.ceil(percent);
      else percent = Math.floor(percent);

      if (ie){
         document.getElementById(p_name_div).style.pixelTop += percent;
      }else{
         document.getElementById(p_name_div).top += percent;
      }
      lastScrollY = lastScrollY + percent;
   }
   if(diffX != lastScrollX) {
      percent = .1 * (diffX - lastScrollX);
      if(percent > 0) percent = Math.ceil(percent);
      else percent = Math.floor(percent);

      if (ie){
         document.getElementById(p_name_div).style.pixelright += percent;
      }else{
         document.getElementById(p_name_div).right += percent;
      }
      lastScrollX = lastScrollX + percent;
   }
}

function heartBeatTop(p_name_div) {
   var ie=document.all;

   if (ie){
      diffY = document.body.scrollTop;
      diffX = document.body.scrollright;
   }else{
      diffY = self.pageYOffset;
      diffX = self.pageXOffset;
   }
   if(diffY != lastScrollY) {
      percent = .1 * (diffY - lastScrollY);
      if(percent > 0) percent = Math.ceil(percent);
      else percent = Math.floor(percent);

      if (ie){
         document.getElementById(p_name_div).style.pixelTop += percent;
      }else{
         document.getElementById(p_name_div).top += percent;
      }
      lastScrollY = lastScrollY + percent;
   }
   if(diffX != lastScrollX) {
      percent = .1 * (diffX - lastScrollX);
      if(percent > 0) percent = Math.ceil(percent);
      else percent = Math.floor(percent);

      if (ie){
         document.getElementById(p_name_div).style.pixelright += percent;
      }else{
         document.getElementById(p_name_div).right += percent;
      }
      lastScrollX = lastScrollX + percent;
   }
}


function val_radio(p_name,p_msg){

   var c = this.document.forms[0].elements[p_name];


   if (!c.length){
      if (c.checked){
         return true;
      }else{
         alert(p_msg);
         return false;
      }
   }else{
      var found = false;
      for (var i=0 ; i < c.length; i++){
         if (c[i].checked){
            found = true;
         }
      }
      if (found == false){
         alert(p_msg);
         return false;
      }else{
         return true;
      }
   }
}

function div_grid_load(p_name)
{
   if (get_field('desc_'+p_name+'[]'))
   {
      str = '<table width="461"  border="0" cellpadding="0" cellspacing="0">\n';
      str = str + '<tr>\n';
      str = str + '    <td width="294" class="linha_titulo">Descrição</td>\n';
      str = str + '    <td width="30" class="linha_titulo">Excluir</td>\n';
      str = str + '  </tr>\n';

      css = 'odd';
      var g_display = get_field('desc_'+p_name+'[]');
      if (g_display.length)
      {
         for (var i=0; i<g_display.length; i++)
         {
            str = str + '  <tr class="'+css+'">\n';
            str = str + '    <td class="left">'+ g_display[i].value +'</td>\n';
            str = str + '    <td class="center">\n';
            str = str + '    <a href="javascript:div_grid_del(\''+p_name+'\',0,\''+g_display[i].value+'\');">\n';
            str = str + '    <img src="../images/excluir1.gif" width="16" height="15" border="0">\n';
            str = str + '    </a></td>\n';
            str = str + '    <input type="hidden" name="id_'+p_name+'[]" value="0">\n';
            str = str + '    <input type="hidden" name="desc_'+p_name+'[]" value="'+g_display[i].value+'">\n';
            str = str + '  </tr>\n';

            if (css == 'odd') css = 'even';
            else css = 'odd';

         }
      }
      else
      {
         str = str + '  <tr class="'+css+'">\n';
         str = str + '    <td class="left">'+ g_display.value +'</td>\n';
         str = str + '    <td class="center">\n';
         str = str + '    <a href="javascript:div_grid_del(\''+p_name+'\',0,\''+g_display.value+'\');">\n';
         str = str + '    <img src="../images/excluir1.gif" width="16" height="15" border="0">\n';
         str = str + '    </a></td>\n';
         str = str + '    <input type="hidden" name="id_'+p_name+'[]" value="0">\n';
         str = str + '    <input type="hidden" name="desc_'+p_name+'[]" value="'+g_display.value+'">\n';
         str = str + '  </tr>\n';

         if (css == 'odd') css = 'even';
         else css = 'odd';
      }
      str = str + '</table>\n';
      imp_html_div(str,'div_'+p_name);
   }
   //
}

function div_grid_add(p_name,p_display)
{
   var v_display = document.forms[0].elements[p_display];

   if (v_display.value == ''){
      alert('O filtro deve ser informado primeiro!');
      v_display.focus();
      return false;
   }

   str = '<table width="461"  border="0" cellpadding="0" cellspacing="0">\n';
   str = str + '<tr>\n';
   str = str + '    <td width="294" class="linha_titulo">Descrição</td>\n';
   str = str + '    <td width="30" class="linha_titulo">Excluir</td>\n';
   str = str + '  </tr>\n';

   if (this.document.forms[0].elements['id_'+p_name+'[]'])
   {
      var id = this.document.forms[0].elements['id_'+p_name+'[]'];
      var display = this.document.forms[0].elements['desc_'+p_name+'[]'];

      var css = 'odd';
      if (id.length)
      {
         for (var i=0; i<id.length; i++)
         {
            str = str + '  <tr class="'+css+'">\n';
            str = str + '    <td class="left">'+ display[i].value +'</td>\n';
            str = str + '    <td class="center">\n';
            str = str + '    <a href="javascript:div_grid_del(\''+p_name+'\',\''+id[i].value+'\',\''+display[i].value+'\');">\n';
            str = str + '    <img src="../images/excluir1.gif" width="16" height="15" border="0">\n';
            str = str + '    </a></td>\n';
            str = str + '    <input type="hidden" name="id_'+p_name+'[]" value="'+id[i].value+'">\n';
            str = str + '    <input type="hidden" name="desc_'+p_name+'[]" value="'+display[i].value+'">\n';
            str = str + '  </tr>\n';

            if (css == 'odd') css = 'even';
            else css = 'odd';

         }
      }
      else
      {
         str = str + '  <tr class="'+css+'">\n';
         str = str + '    <td class="left">'+ display.value +'</td>\n';
         str = str + '    <td class="center">\n';
         str = str + '    <a href="javascript:div_grid_del(\''+p_name+'\',\''+id.value+'\',\''+display.value+'\');">\n';
         str = str + '    <img src="../images/excluir1.gif" width="16" height="15" border="0">\n';
         str = str + '    </a></td>\n';
         str = str + '    <input type="hidden" name="id_'+p_name+'[]" value="'+id.value+'">\n';
         str = str + '    <input type="hidden" name="desc_'+p_name+'[]" value="'+display.value+'">\n';
         str = str + '  </tr>\n';

         if (css == 'odd') css = 'even';
         else css = 'odd';
      }
   }

   str = str + '  <tr class="'+css+'">\n';
   str = str + '    <td class="left">'+ v_display.value +'</td>\n';
   str = str + '    <td class="center">\n';
   str = str + '    <a href="javascript:div_grid_del(\''+p_name+'\',0,\''+v_display.value+'\');">\n';
   str = str + '    <img src="../images/excluir1.gif" width="16" height="15" border="0">\n';
   str = str + '    </a></td>\n';
   str = str + '    <input type="hidden" name="id_'+p_name+'[]" value="0">\n';
   str = str + '    <input type="hidden" name="desc_'+p_name+'[]" value="'+v_display.value+'">\n';
   str = str + '  </tr>\n';
   str = str + '</table>\n';
   //
   v_display.value = '';
   //
   imp_html_div(str,'div_'+p_name);
}

function div_grid_del(p_name,p_id,p_display)
{
   str = '<table width="461"  border="0" cellpadding="0" cellspacing="0">\n';
   str = str + '<tr>\n';
   str = str + '    <td width="294" class="linha_titulo">Descrição</td>\n';
   str = str + '    <td width="30" class="linha_titulo">Excluir</td>\n';
   str = str + '  </tr>\n';
   if (document.forms[0].elements['id_'+p_name+'[]'])
   {
      var id = document.forms[0].elements['id_'+p_name+'[]'];
      var display = this.document.forms[0].elements['desc_'+p_name+'[]'];

      var css = 'odd';
      if (id.length)
      {
         for (var i=0; i<id.length; i++)
         {
            if (p_display != display[i].value)
            {
               str = str + '  <tr class="'+css+'">\n';
               str = str + '    <td class="left">'+ display[i].value +'</td>\n';
               str = str + '    <td class="center">\n';
               str = str + '    <a href="javascript:div_grid_del(\''+p_name+'\',\''+id[i].value+'\',\''+display[i].value+'\');">\n';
               str = str + '    <img src="../images/excluir1.gif" width="16" height="15" border="0">\n';
               str = str + '    </a></td>\n';
               str = str + '    <input type="hidden" name="id_'+p_name+'[]" value="'+id[i].value+'">\n';
               str = str + '    <input type="hidden" name="desc_'+p_name+'[]" value="'+display[i].value+'">\n';
               str = str + '  </tr>\n';

               if (css == 'odd') css = 'even';
               else css = 'odd';
            }
         }
      }
      else
      {
         if (p_display != display.value)
         {
            str = str + '  <tr class="'+css+'">\n';
            str = str + '    <td class="left">'+ display.value +'</td>\n';
            str = str + '    <td class="center">\n';
            str = str + '    <a href="javascript:div_grid_del(\''+p_name+'\',\''+id.value+'\',\''+display.value+'\');">\n';
            str = str + '    <img src="../images/excluir1.gif" width="16" height="15" border="0">\n';
            str = str + '    </a></td>\n';
            str = str + '    <input type="hidden" name="id_'+p_name+'[]" value="'+id.value+'">\n';
            str = str + '    <input type="hidden" name="desc_'+p_name+'[]" value="'+display.value+'">\n';
            str = str + '  </tr>\n';

            if (css == 'odd') css = 'even';
            else css = 'odd';
         }
      }
   }
   str = str + '</table>\n';
   imp_html_div(str,'div_'+p_name);
}



function get_xmlhttp(){
   var xmlhttp='';
   try{
      xmlhttp = new XMLHttpRequest();
   }catch(ee){
      try{
         xmlhttp = new ActiveXObject("Msxml2.XMLHTTP");
      }catch(e){
         try{
            xmlhttp = new ActiveXObject("Microsoft.XMLHTTP");
         }catch(E){
            xmlhttp = false;
         }
      }
   }
   return xmlhttp;
}

function load_grid(){
   null;
}
//-- --------------------------------------------------------
//
//-- --------------------------------------------------------
function show_load_data(){
   var conteudo=document.getElementById('load_data');
   conteudo.style.visibility = 'visible';
   conteudo.innerHTML='<div class="carregando"><img id="" src="../images/load.gif"  border="0">Aguarde...</div>';
}

function get_conteudo_e(p_link, p_name_div_process){
   if (p_name_div_process){
	   $('#' + p_name_div_process).block( '<p class="mensagem">Processando...</p>' );
   }else{
	   $.blockUI( '<p class="mensagem">Processando...</p>' );
   }
   xmlhttp = get_xmlhttp();
   xmlhttp.open("GET", p_link,true);

   xmlhttp.onreadystatechange=function() {
      if (xmlhttp.readyState==4){
		 if (p_name_div_process){
		     $('#' + p_name_div_process).unblock();
		 }else{
			 $.unblockUI();
		 }
         eval(xmlhttp.responseText);
      }
   }

   xmlhttp.send(null);
}
//-- --------------------------------------------------------
//
//-- --------------------------------------------------------
function get_conteudo(p_link, p_name_div){

   $('#load_Data').block( '<p class="mensagem">Processando...</p>' );
   xmlhttp = get_xmlhttp();
   xmlhttp.open("GET", p_link,true);

   xmlhttp.onreadystatechange=function() {
      if (xmlhttp.readyState==4){
         document.getElementById(p_name_div).innerHTML=xmlhttp.responseText;
		 $('#load_Data').unblock();
      }
   }

   xmlhttp.send(null);
}

function get_conteudo_exe_js(p_link, p_name_div, p_exec_js){

   $('#load_Data').blockUI( '<p class="mensagem">Processando...</p>' );
   xmlhttp = get_xmlhttp();
   xmlhttp.open("GET", p_link,true);

   xmlhttp.onreadystatechange=function() {
      if (xmlhttp.readyState==4){
         document.getElementById(p_name_div).innerHTML=xmlhttp.responseText;
         eval(p_exec_js);
		 $('#load_Data').unblockUI();
      }
   }

   xmlhttp.send(null);
}
//-- --------------------------------------------------------
//
//-- --------------------------------------------------------
function carrega(p_name_div,p_link){

   //Exibe o texto carregando no div conteúdo
   var conteudo=document.getElementById(p_name_div)
   conteudo.innerHTML='<div class="carregando">carregando...</div>'

   //Abre a url
   xmlhttp = get_xmlhttp();
   xmlhttp.open("GET", p_link,true);

   //Executada quando o navegador obtiver o código
   xmlhttp.onreadystatechange=function() {

      if (xmlhttp.readyState==4){

         //Lê o texto
         var texto=xmlhttp.responseText

         //alert(texto);

         //Exibe o texto no div conteúdo
         var conteudo=document.getElementById(p_name_div)
         conteudo.innerHTML=texto
         conteudo.focus();
      }
   }
   xmlhttp.send(null)
}
//-- --------------------------------------------------------
//
//-- --------------------------------------------------------
function menu_show_close(p_valor)
{
   if (eval('g_'+p_valor) == '')
   {
      if (document.all)
      {
         eval('g_'+p_valor+'= document.all[\''+p_valor+'\'].innerHTML;');
         document.all[p_valor].innerHTML='';
         document.all['menu_'+p_valor+''].src='../images/menu_abrir.gif';
      }
      else
      {
         eval('g_'+p_valor+'= document.getElementById(\''+p_valor+'\').innerHTML;');
         document.getElementById(p_valor).innerHTML='';
         document.getElementById('menu_'+p_valor).src='../images/menu_abrir.gif';
      }
   }
   else
   {
      if (document.all)
      {
         eval('document.all[\''+p_valor+'\'].innerHTML = g_'+p_valor);
         eval('g_'+p_valor+'= \'\'');
         document.all['menu_'+p_valor].src='../images/menu_fechar.gif';
      }
      else
      {
         eval('document.getElementById(\''+p_valor+'\').innerHTML = g_'+p_valor);
         eval('g_'+p_valor+'= \'\'');
         document.getElementById('menu_'+p_valor).src='../images/menu_fechar.gif';
      }
   }

}


function seeker_multiple_load(p_name)
{
   str = '<table width="461"  border="0" cellpadding="0" cellspacing="0">\n';
   str = str + '<tr>\n';
   str = str + '    <td width="157" class="linha_titulo">Chave</td>\n';
   str = str + '    <td width="294" class="linha_titulo">Resultado</td>\n';
   str = str + '    <td width="30" class="linha_titulo">Excluir</td>\n';
   str = str + '  </tr>\n';

   css = 'odd';
   for (var i=0; i<g_id.length; i++)
   {
      str = str + '  <tr class="'+css+'">\n';
      str = str + '    <td class="left">'+ g_search[i] +'</td>\n';
      str = str + '    <td class="left">'+ g_display[i] +'</td>\n';
      str = str + '    <td class="center">\n';
      str = str + '    <a href="javascript:seeker_multiple_del(\''+p_name+'\',\''+g_id[i]+'\',\''+g_search[i]+'\');">\n';
      str = str + '    <img src="../images/excluir1.gif" width="16" height="15" border="0">\n';
      str = str + '    </a></td>\n';
      str = str + '    <input type="hidden" name="id_mult_'+p_name+'[]" value="'+g_id[i]+'">\n';
      str = str + '    <input type="hidden" name="search_mult_'+p_name+'[]" value="'+g_search[i]+'">\n';
      str = str + '    <input type="hidden" name="display_mult_'+p_name+'[]" value="'+g_display[i]+'">\n';
      str = str + '  </tr>\n';

      if (css == 'odd') css = 'even';
      else css = 'odd';

   }
   str = str + '</table>\n';
   //
   g_id = [];
   g_search = [];
   g_display = [];
   //
   imp_html_div(str,'div_'+p_name);
}

function seeker_multiple_add(p_name,p_search,p_display)
{
   var v_search = document.forms[0].elements[p_search];
   var v_display = document.forms[0].elements[p_display];
   var v_id = document.forms[0].elements['id_'+p_name];

   if (v_id.value == '')
   {
      alert('O filtro deve ser informado primeiro!');
      v_search.focus();
      return false;
   }

   // variavel para indicar se o valor a ser inserido é repetido
   var repetido=0;

   str = '<table width="461"  border="0" cellpadding="0" cellspacing="0">\n';
   str = str + '<tr>\n';
   str = str + '    <td width="157" class="linha_titulo">Chave</td>\n';
   str = str + '    <td width="294" class="linha_titulo">Resultado</td>\n';
   str = str + '    <td width="30" class="linha_titulo">Excluir</td>\n';
   str = str + '  </tr>\n';

   if (this.document.forms[0].elements['id_mult_'+p_name+'[]'])
   {
      var id = this.document.forms[0].elements['id_mult_'+p_name+'[]'];
      var search = this.document.forms[0].elements['search_mult_'+p_name+'[]'];
      var display = this.document.forms[0].elements['display_mult_'+p_name+'[]'];

      var css = 'odd';
      if (id.length)
      {
         for (var i=0; i<id.length; i++)
         {

            // testa se é repetido
            if (id[i].value==v_id.value) repetido = 1;

            str = str + '  <tr class="'+css+'">\n';
            str = str + '    <td class="left">'+ search[i].value +'</td>\n';
            str = str + '    <td class="left">'+ display[i].value +'</td>\n';
            str = str + '    <td class="center">\n';
            str = str + '    <a href="javascript:seeker_multiple_del(\''+p_name+'\',\''+id[i].value+'\',\''+search[i].value+'\');">\n';
            str = str + '    <img src="../images/excluir1.gif" width="16" height="15" border="0">\n';
            str = str + '    </a></td>\n';
            str = str + '    <input type="hidden" name="id_mult_'+p_name+'[]" value="'+id[i].value+'">\n';
            str = str + '    <input type="hidden" name="search_mult_'+p_name+'[]" value="'+search[i].value+'">\n';
            str = str + '    <input type="hidden" name="display_mult_'+p_name+'[]" value="'+display[i].value+'">\n';
            str = str + '  </tr>\n';

            if (css == 'odd') css = 'even';
            else css = 'odd';

         }
      }
      else
      {
         // testa se é repetido
         if (id.value==v_id.value) repetido = 1;

         str = str + '  <tr class="'+css+'">\n';
         str = str + '    <td class="left">'+ search.value +'</td>\n';
         str = str + '    <td class="left">'+ display.value +'</td>\n';
         str = str + '    <td class="center">\n';
         str = str + '    <a href="javascript:seeker_multiple_del(\''+p_name+'\',\''+id.value+'\',\''+search.value+'\');">\n';
         str = str + '    <img src="../images/excluir1.gif" width="16" height="15" border="0">\n';
         str = str + '    </a></td>\n';
         str = str + '    <input type="hidden" name="id_mult_'+p_name+'[]" value="'+id.value+'">\n';
         str = str + '    <input type="hidden" name="search_mult_'+p_name+'[]" value="'+search.value+'">\n';
         str = str + '    <input type="hidden" name="display_mult_'+p_name+'[]" value="'+display.value+'">\n';
         str = str + '  </tr>\n';

         if (css == 'odd') css = 'even';
         else css = 'odd';
      }
   }


   if (!repetido) {
      str = str + '  <tr class="'+css+'">\n';
      str = str + '    <td class="left">'+ v_search.value +'</td>\n';
      str = str + '    <td class="left">'+ v_display.value +'</td>\n';
      str = str + '    <td class="center">\n';
      str = str + '    <a href="javascript:seeker_multiple_del(\''+p_name+'\',\''+v_id.value+'\',\''+v_search.value+'\');">\n';
      str = str + '    <img src="../images/excluir1.gif" width="16" height="15" border="0">\n';
      str = str + '    </a></td>\n';
      str = str + '    <input type="hidden" name="id_mult_'+p_name+'[]" value="'+v_id.value+'">\n';
      str = str + '    <input type="hidden" name="search_mult_'+p_name+'[]" value="'+v_search.value+'">\n';
      str = str + '    <input type="hidden" name="display_mult_'+p_name+'[]" value="'+v_display.value+'">\n';
      str = str + '  </tr>\n';
      str = str + '</table>\n';
   } else {
      alert('Item repetido!');
   }
   //
   v_id.value = '';
   v_search.value = '';
   v_display.value = '';
   //
   imp_html_div(str,'div_'+p_name);
}

function seeker_multiple_del(p_name,p_id,p_search)
{
/*   str = '<table width="461"  border="0" cellpadding="0" cellspacing="0">\n';
   str = str + '<tr>\n';
   str = str + '    <td width="157" class="linha_titulo">Chave</td>\n';
   str = str + '    <td width="294" class="linha_titulo">Resultado</td>\n';
   str = str + '    <td width="30" class="linha_titulo">Excluir</td>\n';
   str = str + '  </tr>\n';*/

   if (document.forms[0].elements['id_mult_'+p_name+'[]'])
   {
      var id = document.forms[0].elements['id_mult_'+p_name+'[]'];
      var search = document.forms[0].elements['search_mult_'+p_name+'[]'];
      var display = this.document.forms[0].elements['display_mult_'+p_name+'[]'];

      var css = 'odd';
      if (id.length)
      {
         str = '<table width="461"  border="0" cellpadding="0" cellspacing="0">\n';
         if (id.length>1) {
            str = str + '<tr>\n';
            str = str + '    <td width="157" class="linha_titulo">Chave</td>\n';
            str = str + '    <td width="294" class="linha_titulo">Resultado</td>\n';
            str = str + '    <td width="30" class="linha_titulo">Excluir</td>\n';
            str = str + '  </tr>\n';
         }
         
         
         for (var i=0; i<id.length; i++)
         {
            if (p_id != id[i].value && p_search != search[i].value)
            {
               str = str + '  <tr class="'+css+'">\n';
               str = str + '    <td class="left">'+ search[i].value +'</td>\n';
               str = str + '    <td class="left">'+ display[i].value +'</td>\n';
               str = str + '    <td class="center">\n';
               str = str + '    <a href="javascript:seeker_multiple_del(\''+p_name+'\',\''+id[i].value+'\',\''+search[i].value+'\');">\n';
               str = str + '    <img src="../images/excluir1.gif" width="16" height="15" border="0">\n';
               str = str + '    </a></td>\n';
               str = str + '    <input type="hidden" name="id_mult_'+p_name+'[]" value="'+id[i].value+'">\n';
               str = str + '    <input type="hidden" name="search_mult_'+p_name+'[]" value="'+search[i].value+'">\n';
               str = str + '    <input type="hidden" name="display_mult_'+p_name+'[]" value="'+display[i].value+'">\n';
               str = str + '  </tr>\n';

               if (css == 'odd') css = 'even';
               else css = 'odd';
            }
         }
      }
      else
      {
         str = '<table width="461"  border="0" cellpadding="0" cellspacing="0">\n';
         /*str = str + '<tr>\n';
         str = str + '    <td width="157" class="linha_titulo">Chave</td>\n';
         str = str + '    <td width="294" class="linha_titulo">Resultado</td>\n';
         str = str + '    <td width="30" class="linha_titulo">Excluir</td>\n';
         str = str + '  </tr>\n';*/
         if (p_id != id.value && p_search != search.value)
         {
            str = str + '  <tr class="'+css+'">\n';
            str = str + '    <td class="left">'+ search.value +'</td>\n';
            str = str + '    <td class="left">'+ display.value +'</td>\n';
            str = str + '    <td class="center">\n';
            str = str + '    <a href="javascript:seeker_multiple_del(\''+p_name+'\',\''+id.value+'\',\''+search.value+'\');">\n';
            str = str + '    <img src="../images/excluir1.gif" width="16" height="15" border="0">\n';
            str = str + '    </a></td>\n';
            str = str + '    <input type="hidden" name="id_mult_'+p_name+'[]" value="'+id.value+'">\n';
            str = str + '    <input type="hidden" name="search_mult_'+p_name+'[]" value="'+search.value+'">\n';
            str = str + '    <input type="hidden" name="display_mult_'+p_name+'[]" value="'+display.value+'">\n';
            str = str + '  </tr>\n';

            if (css == 'odd') css = 'even';
            else css = 'odd';
         }
      }
   }
   str = str + '</table>\n';
   imp_html_div(str,'div_'+p_name);

}

function ordenar(p_campo,p_desc)
{
   var order = get_field('order');
   var desc = get_field('desc');
   order.value = p_campo;
   desc.value = p_desc;
   document.forms[0].submit();
}

function Apaga(id, table_name, pagina)
{
   this.ifrExcluir.location = 'excluir.php?id='+id+'&table_name='+table_name+'&pagina=\''+pagina+'\'';
}


function validaChar(chars,e) //usar "e" no caso de netscape passando o obj. "event"
{
   var RE = new RegExp("["+chars+"]");

   e     = (!document.all) ? e       : window.event;
   tecla = (!document.all) ? e.which : e.keyCode;
   if(!document.all)
   {
      var teclas_ex = ((tecla == 8) || (tecla == 13) || (tecla == 0));  // 0 =>'ESC-DEL'
      return ((-1 == String.fromCharCode(tecla).search(RE)) && (!teclas_ex)) ? e.cancelBubble=true : e.cancelBubble=false;
   }
   else
   return (-1 == String.fromCharCode(tecla).search(RE)) ? e.returnValue=false : e.returnValue=true;
}

function SoNumero()
{
   validaChar('0-9.,-');
   //return (event.keyCode < 48 || event.keyCode > 57) ? event.returnValue=false : event.returnValue=true;
}

function SemLetras()
{
   return validaChar('a-zA-ZçÇ') ? event.returnValue=false : event.returnValue=true;
   //	return ((event.keyCode > 65) && (event.keyCode < 122)) ? event.returnValue=false : event.returnValue=true;
}

function seeker(p_name_obj,p_value) {
   var v_obj = this.document.forms[0].elements[p_name_obj];

   if (!v_obj.length)
   {
      if (v_obj.value == p_value)
      {
         return true;
      }
      else
      {
         return false;
      }
   }
   else
   {
      for (var i=0; i < v_obj.length; i++)
      {
         if (v_obj[i].value == p_value)
         {
            return true;
         }
      }
      return false;
   }
}
//
//
//
function get_field(p_name_field)
{
   if (g_forms)
   return this.document.forms[g_forms].elements[p_name_field];
   else
   return this.document.forms[0].elements[p_name_field];
}
//
//
//
function get_date(p_name_field)
{
   var data = (g_forms)?document.forms[g_forms].elements[p_name_field]:document.forms[0].elements[p_name_field];
   var v_data = new Date (data.value.substr(6,4) / 1,
   data.value.substr(3,2) - 1,
   data.value.substr(0,2) / 1);
   return v_data;
}

function caracter_is_number(valor)
{
   var i = 0;
   for (i=0; i<10 ; i++)
   {
      if (valor == i)
      {
         return true;
      }
   }
   return false;
}

function is_number(valor)
{
   for (var i=0; i<valor.length; i++)
   {
      if ( !caracter_is_number( valor.substr(i,1) ) )
      {
         return false;
      }
   }
   return true;

}

function validate_number(obj)
{
   if ( !is_number(obj.value) )
   {
      alert('Número inválido!');
      obj.value='';
   }
}

function compara_numero(obj_ini,obj_fim,descricao)
{
   if (obj_ini.value != '' || obj_fim.value != '')
   {
      if (obj_ini.value == '')
      {
         alert('Favor informar ' + descricao + ' inicial!');
         obj_ini.focus();
         return false;
      }

      if (obj_fim.value == '')
      {
         alert('Favor informar ' + descricao + ' final!');
         obj_fim.focus();
         return false;
      }

      var v_ini = obj_ini.value * 1;
      var v_fim = obj_fim.value * 1;

      if (v_ini > v_fim)
      {
         alert(descricao + ' final deve ser maior que ' + descricao + ' inicial!');
         obj_fim.focus();
         return false;
      }
   }
   return true;
}

function valida_data (dt_ini,dt_fim,dias,msg_campo)
{
   var f_dt_ini = get_field(dt_ini);
   var f_dt_fim = get_field(dt_fim);
   var v_dt_ini =  get_date(dt_ini);
   var v_dt_fim =  get_date(dt_fim);
   var v_msg;

   if (f_dt_ini.value == '')
   {
      v_msg = 'Favor informar a data ';
      v_msg = v_msg + msg_campo;
      v_msg = v_msg + ' início!'
      alert(v_msg);
      f_dt_ini.focus();
      return false;
   }

   if (f_dt_fim.value == '')
   {
      v_msg = 'Favor informar a data ';
      v_msg = v_msg + msg_campo;
      v_msg = v_msg + ' fim!'
      alert(v_msg);
      f_dt_fim.focus();
      return false;
   }


   if (v_dt_ini > v_dt_fim)
   {
      alert('Data início deve ser maior que a data fim!');
      f_dt_ini.focus();
      return false;
   }

   v_dt_ini = up_date(v_dt_ini,dias);

   if (f_dt_ini.value != '' &&
   f_dt_fim.value != '' &&
   (v_dt_fim >= v_dt_ini) )
   {
      alert('O período deve ser entre '+ dias +' dias!');
      f_dt_fim.focus();
      return false;
   }

   return true;
}


function valida_valor (p_vlr_inicio,
p_vlr_fim,
p_msg_campo,
p_obrigatio)
{
   vlr_inicio = get_field(p_vlr_inicio);
   vlr_fim = get_field(p_vlr_fim);


   if (vlr_inicio.value == '' && vlr_fim.value != '')
   {
      alert('Favor informar o valor início do ' + p_msg_campo + '!');
      vlr_inicio.focus();
      return false;
   }

   if (vlr_inicio.value != '' && vlr_fim.value == '')
   {
      alert('Favor informar o valor fim do ' + p_msg_campo + '!');
      vlr_fim.focus();
      return false;
   }

   if (vlr_inicio.value != '' && vlr_fim.value != '')
   {
      p_obrigatio = 1;
   }

   if (p_obrigatio == 1)
   {

      if (vlr_inicio.value == '')
      {
         alert('Favor informar o valor início do ' + p_msg_campo + '!');
         vlr_inicio.focus();
         return false;
      }

      if (vlr_fim.value == '')
      {
         alert('Favor informar o valor fim do ' + p_msg_campo + '!');
         vlr_fim.focus();
         return false;
      }

      v_vlr_inicio = vlr_inicio.value;
      v_vlr_fim = vlr_fim.value;

      v_vlr_inicio = replace(v_vlr_inicio,'.','');
      v_vlr_inicio = replace(v_vlr_inicio,',','.');
      v_vlr_inicio = v_vlr_inicio / 1;

      v_vlr_fim = replace(v_vlr_fim,'.','');
      v_vlr_fim = replace(v_vlr_fim,',','.');
      v_vlr_fim = v_vlr_fim / 1;

      if (v_vlr_inicio > v_vlr_fim)
      {
         alert('Valor início do ' + p_msg_campo + ' deve ser menor que o valor final do ' + p_msg_campo + '!');
         vlr_inicio.focus();
         return false;
      }
   }

   return true;
}

function up_date (p_data,nro_dia)
{
   p_data.setDate( p_data.getDate()+nro_dia );
   return p_data;
}

function imp_html_div(info,name){
   var ie=document.all
   var dom=document.getElementById
   var ns4=document.layers

   if (ie){
      document.all[name].innerHTML = info;
   } else if (ns4) {
      document.layers[name].document.open();
      document.layers[name].document.write(info);
      document.layers[name].document.close();
   } else if (dom) {
      document.getElementById(name).innerHTML= info;
   }
}

function top_imp_html_div(info,name){
   var ie=document.all
   var dom=document.getElementById
   var ns4=document.layers

   if (ie){
      top.document.all[name].innerHTML = info;
   } else if (ns4) {
      top.document.layers[name].document.open();
      top.document.layers[name].document.write(info);
      top.document.layers[name].document.close();
   } else if (dom) {
      top.document.getElementById(name).innerHTML= info;
   }
}

function top_opener_imp_html_div(info,name){
   var ie=document.all
   var dom=document.getElementById
   var ns4=document.layers

   if (ie){
      top.opener.document.all[name].innerHTML = info;
   } else if (ns4) {
      top.opener.document.layers[name].document.open();
      top.opener.document.layers[name].document.write(info);
      top.opener.document.layers[name].document.close();
   } else if (dom) {
      top.opener.document.getElementById(name).innerHTML= info;
   }
}

function Limpar(nome_botao){
   imp_html_div ('','mensagem');
   document.forms[0].elements[nome_botao].disabled = false;
   document.forms[0].reset();
}

function Entrar(nome_botao,msg){

   var info;
   
   if (msg == '')
   {
      info = 'Aguarde estamos efetuando a pesquisa...'
   }
   else
   {
      info = msg;
   }
	document.forms[0].elements[nome_botao].disabled = true;
    document.forms[0].submit();
   imp_html_div (info,'mensagem');

   /*if (g_forms)
   {
      document.forms[g_forms].elements[nome_botao].disabled = true;
      document.forms[g_forms].submit();
   }
   else
   {
      document.forms[0].elements[nome_botao].disabled = true;
      document.forms[0].submit();
   }*/
}
/*
------------------------------------------------------------------------------

------------------------------------------------------------------------------
*/
function pad(Objeto,tamanho,caracter,posicao)
{
   if (Objeto.value != ''){
      var v_qtd, string;
      v_qtd = tamanho - Objeto.value.length;
      string = '';
      for (var indice=0; indice < v_qtd; indice++){
         string = string + caracter;
      }

      if (posicao == "L"){
         string = string + Objeto.value;
      }else if (posicao == "R"){
         string = Objeto.value +  string;
      }

      Objeto.value = string;
   }
}
/*------------------------------------------------------------------------------
Mudar a cor do foco na entrada e saida
------------------------------------------------------------------------------*/
function Entrada(Objeto)
{
   //Objeto.style.background = "#29347D";

   Objeto.style.border = '1px solid #66FF00';
   //Objeto.style.border-bottom: 0px solid #9E9E9E;
   //Objeto.style.border-left: 0px solid #9E9E9E;
   //Objeto.style.border-right: 0px solid #9E9E9E;
   //Objeto.style.color = "#FFFFFF";

   Objeto.id = 1;
   if (Objeto.value != '' && Objeto.type=='text'){
      Objeto.select();
   }
}

function Saida(Objeto,UpperCase)
{
   Objeto.style.border = '1px solid #CACACA';
   //Objeto.style.background = '#FFFFFF';
   //Objeto.style.color = '#000000';
   Objeto.id = 0;
   if (UpperCase == 1)
   Objeto.value=Objeto.value.toUpperCase();
}

/*------------------------------------------------------------------------------
Pega a posição que uma string se encontra(Usado muito para formatação de número)
------------------------------------------------------------------------------*/
function position (valor, caracter){
   var pos; var index;
   for (index=0; index!=valor.length; index++){
      if (valor.substr(index,1) == caracter){
         pos = index;
         return pos;
      }
   }
   return 0;
}
/*------------------------------------------------------------------------------
Funcão que faz replace em uma string de modo simples
------------------------------------------------------------------------------*/
function replace(str, str_search, str_replace){
   var index;
   var str_start;
   var str_end;
   var str_end_len
   str = str + '';
   for (index=0; index!=str.length; index++)
   {
      if (str.substr(index,str_search.length) == str_search)
      {
         str_start = str.substr(0,index);
         str_end_len = index + str_search.length;
         str_end = str.substr(str_end_len,str.length);
         str = str_start + str_replace + str_end;
         index=0;
      }
   }
   return str;
}
/*------------------------------------------------------------------------------
Ao passar o mause em cima da linha da tabela muda de cor
------------------------------------------------------------------------------*/

function tag_tr(tag,cor){
   tag.bgColor = cor;
}

function tag_tr_click(tag,cor){
   tag.bgColor = cor;
}
/*----------------------------------------------------------------------------*/
//                     Função que usa o Tab como Enter
/*----------------------------------------------------------------------------*/
var Proximo;
Proximo = 0;
netscape = "";
ver = navigator.appVersion;
len = ver.length;
/*----------------------------------------------------------------------------*/
for(iln = 0; iln < len; iln++){
   if (ver.charAt(iln) == "(")
   break;
}
/*----------------------------------------------------------------------------*/
netscape = (ver.charAt(iln+1).toUpperCase() != "C");
/*----------------------------------------------------------------------------*/
function SearchFocus(){
   var index;
   if (document.forms[0]){
      for (index=0; index != document.forms[0].elements.length; index++){
         if (document.forms[0].elements[index].id == 1){
            index++;
            return index;
         }
      }
   }
   return 0;
}
/*----------------------------------------------------------------------------*/
function EscEnter(DnEvents){
   var find = 1;
   var key;
   var ie=document.all
   var dom=document.getElementById
   var ns4=document.layers
   key = (netscape) ? DnEvents.which : window.event.keyCode;

   if (key == 13){
      Proximo = SearchFocus();
      if (Proximo >= 0 && Proximo != document.forms[g_forms].elements.length){
         while (find == 1){
            if (document.forms[g_forms].elements[Proximo].type == 'hidden'){
               Proximo++;
            }else if(document.forms[g_forms].elements[Proximo].readOnly){
               Proximo++;
            }else if(document.forms[g_forms].elements[Proximo].disabled){
               Proximo++;
            }else if(document.forms[g_forms].elements[Proximo].id == '5'){
               Proximo++;
            }else{
               find = 0;
            }
         }
         //
         //
         //
         document.forms[g_forms].elements[Proximo].focus();
         //
         //
         //
         if (document.forms[g_forms].elements[Proximo].type == 'text')
         {
            document.forms[g_forms].elements[Proximo].select();
         }
      }
      return false;
   }else if (key == 27){
      Proximo--;
      if (Proximo >= 0 && Proximo != document.forms[g_forms].elements.length){
         while (find == 1){
            if (Proximo < 0) Proximo = document.forms[g_forms].elements.length-1;

            if (document.forms[g_forms].elements[Proximo].type == 'hidden'){
               Proximo--;
            }else if(document.forms[g_forms].elements[Proximo].readOnly){
               Proximo--;
            }else if(document.forms[g_forms].elements[Proximo].disabled){
               Proximo--;
            }else if(document.forms[g_forms].elements[Proximo].id == '5'){
               Proximo--;
            }else{
               find = 0;
            }
         }
         //
         //
         //
         document.forms[g_forms].elements[Proximo].focus();
         //
         //
         //
         if (document.forms[g_forms].elements[Proximo].type == 'text')
         {
            //
            //
            //
            document.forms[g_forms].elements[Proximo].select();
            //
            //
            //
         }
      }
      return false;
   }
}
/*----------------------------------------------------------------------------*/
function EntradaTextare(){
   document.onkeydown = '';
   if (netscape) document.captureEvents();
}
/*----------------------------------------------------------------------------*/
function SaidaTextare(){
   document.onkeydown = EscEnter;
   if (netscape) document.captureEvents(Event.KEYDOWN|Event.KEYUP);
}
/*----------------------------------------------------------------------------*/
function AbreJanelaFull(p_link,p_height,p_width){  // Abre Janela em Fullscreen
   var v_left = (screen.availWidth-p_width)/2;
   var v_top  = (screen.availHeight-p_height)/2;

   ret = window.open(p_link,null,'fullscreen=yes,toolbar=no,location=no,directories=no,status=no,menubar=no,scrollbars=yes,resizable=yes,menubar=no,top='+  v_top +',left='+ v_left +',width='+ p_width +',height='+ p_height);
   ret.focus();
}
function AbreJanela(p_link,p_height,p_width){
   var v_left = (screen.availWidth-p_width)/2;
   var v_top  = (screen.availHeight-p_height)/2;
   ret = window.open(p_link,null,'toolbar=no,location=no,directories=no,status=no,menubar=no,scrollbars=yes,resizable=yes,menubar=no,top='+  v_top +',left='+ v_left +',width='+ p_width +',height='+ p_height);
   ret.focus();
}
function AbreJanela(p_link,p_height,p_width,p_name_window)
{
   var v_left = (screen.availWidth-p_width)/2;
   var v_top  = (screen.availHeight-p_height)/2;

   ret = window.open(p_link,p_name_window,'toolbar=no,location=no,directories=no,status=no,menubar=no,scrollbars=yes,resizable=yes,menubar=no,top='+ v_top +',left='+v_left+',width='+ p_width +',height='+ p_height
   );
   ret.focus();
}

function AbreJanelaSimple (link,altura,largura,nome_janela)
{
   var newwindow = nome_janela;

   //if (opener) opener.close(nome_janela);
   newwindow = window.open(link,nome_janela,
   'toolbar=no,location=no,directories=no,status=no,fullscreen=yes,menubar=no,scrollbars=no,resizable=no,menubar=no,width='+ largura +',height='+ altura
   );
}
/*------------------------------------------------------------------------------
Preenche as casas decimais com 0 (zero)
------------------------------------------------------------------------------*/
function fill_zero(decimal){
   var str_zero='';
   var index;
   for (index=0; index!=decimal; index++){
      str_zero = str_zero + '0';
   }
   return str_zero;
}
/*------------------------------------------------------------------------------
Completa as casas decimais com 0 (zero)
------------------------------------------------------------------------------*/
function complete_zero(str_lenght, decimal){
   var index;
   var valor = '';
   for (index=str_lenght; index!=decimal; index++){
      valor = valor + '0';
   }
   return valor;
}
/*------------------------------------------------------------------------------
Dá um replace quando o usuário digita ".", adiciona o
ponto no número e trava a digitação
------------------------------------------------------------------------------*/
function add_point(valor, size, decimal){
   var found; var pos;
   valor.value = replace (valor.value,".",",");
   pos = position(valor.value,',');
   if (pos != 0){
      valor.maxlength = pos + 1 + decimal;
      valor.value = valor.value.substr(0,valor.maxlength-1);
   }else{
      valor.maxlength = size + 1 + decimal;
      valor.value = valor.value.substr(0,valor.maxlength-1);
      if (valor.value.length == size){
         valor.value = valor.value + ',';
      }
   }
}
/*------------------------------------------------------------------------------
Formata o número conforme o tamanho com o número de casas decimais no OnkeyPress
------------------------------------------------------------------------------*/
function format_number (valor, size, decimal){
   var str_valor = valor.value;
   var start_decimal;
   var pos;
   var index;
   var soma;
   var nro_zero;
   var str_decimal;
   //-- ----------------------------------------------------
   str_valor = replace(valor.value, '.', '');
   if (str_valor.substring(0,1) == ',') str_valor = '0' + str_valor;
   //-- ----------------------------------------------------
   pos = position (str_valor, ',');
   //-- ----------------------------------------------------
   if (pos > 0){
      index = pos;
      soma = 1;
      while (index != 0){
         if (soma == 3){
            str_valor = str_valor.substring(0,index-1) + '.' + str_valor.substring(index-1,str_valor.length);
            soma = 0;
         }
         soma++;
         index = index - 1;
      }
      if (str_valor.substr(0,1) == '.'){
         str_valor = str_valor.substring(1,str_valor.length);
      }
      pos = position (str_valor, ',');
      start_decimal = str_valor.substr(pos+1,decimal);
      nro_zero = complete_zero(start_decimal.length,decimal);
      valor.value = str_valor + nro_zero;
   }else{
      if (valor.value != ''){
         nro_zero = fill_zero(decimal);
         str_valor = str_valor + ',' + nro_zero;
         pos = position (str_valor, ',');
         index = pos;
         soma = 1;
         while (index != 0){
            if (soma == 3){
               str_valor = str_valor.substring(0,index-1) + '.' + str_valor.substring(index-1,str_valor.length);
               soma = 0;
            }
            soma++;
            index = index - 1;
         }
         if (str_valor.substr(0,1) == '.'){
            str_valor = str_valor.substring(1,str_valor.length);
         }
         valor.value = str_valor;
      }
   }
}

/*------------------------------------------------------------------------------
Formata o número
------------------------------------------------------------------------------*/
function FormatNumber(str, size, decimal){
   var start_decimal;
   var pos;
   var index;
   var soma;
   var nro_zero;
   var str_decimal;
   //-- ----------------------------------------------------
   str = replace(str,'.',',');
   //-- ----------------------------------------------------
   pos = position(str, ',');
   //-- ----------------------------------------------------
   if (pos > 0){
      index = pos;
      soma = 1;
      while (index != 0){
         if (soma == 3){
            str = str.substring(0,index-1) + '.' + str.substring(index-1,str.length);
            soma = 0;
         }
         soma++;
         index = index - 1;
      }
      if (str.substr(0,1) == '.'){
         str = str.substring(1,str.length);
      }
      pos = position (str, ',');
      start_decimal = str.substr(pos+1,decimal);
      nro_zero = complete_zero(start_decimal.length,decimal);
      str = str + nro_zero;

      start_decimal = str.substr(pos+1,str.length);
      if (start_decimal > 5){
         start_decimal = str.substr(pos+decimal,1)  / 1;
         //start_decimal = start_decimal + 1;
         str = str.substr(0,pos+decimal) + start_decimal;
      }else{
         str = str.substr(0,pos+decimal+1);
      }
   }else{
      if (str != ''){
         nro_zero = fill_zero(decimal);
         str = str + ',' + nro_zero;
         pos = position (str, ',');
         index = pos;
         soma = 1;
         while (index != 0){
            if (soma == 3){
               str = str.substring(0,index-1) + '.' + str.substring(index-1,str.length);
               soma = 0;
            }
            soma++;
            index = index - 1;
         }
         if (str.substr(0,1) == '.'){
            str = str.substring(1,str.length);
         }
         start_decimal = str.substr(pos+1,str.length);
         if (start_decimal > 5){
            start_decimal = str.substr(pos+decimal,1)  / 1;
            start_decimal = start_decimal + 1;
            str = str.substr(0,pos+decimal) + start_decimal;
         }else{
            str = str.substr(0,pos+decimal+1);
         }
      }
   }

   return str;
}

function Array2Str(p_name_element){
   /* Converte um array para string */

   var i=0;
   var str="";

   if (p_name_element) {
      /* Testa se é um valor e retorna */
      if (!p_name_element.length) {

         str = p_name_element.value;

      } else { /* Caso contrario percorre o vetor concatenando o valor em uma string */

         for (i=0 ; i < p_name_element.length; i++){
            str = str+p_name_element[i].value;
            if (i!=p_name_element.length-1)
            str = str+",";
         }
      }
   }
   return str;
}

function AllCheck(objeto,nome){
   var c = this.document.forms[0].elements[nome];
   var i = 0;
   if (!c.length)
   {
      if (objeto.checked)
      {
         c.checked = true;
      }
      else
      {
         c.checked = false;
      }
   }
   else
   {
      for (i=0 ; i < c.length; i++){
         if (objeto.checked)
         {
            c[i].checked = true;
         }
         else
         {
            c[i].checked = false;
         }
      }
   }
}

function InvertCheck(cnome)
{
   var c = this.document.forms[0].elements[cnome];
   var i = 0;
   for (i=0 ; i < c.length; i++){
      if (c[i].checked)
      {
         c[i].checked = false;
      }
      else
      {
         c[i].checked = true;
      }
   }
}

function Carregando()
{
   for (var i=0; i < document.forms[0].elements.length; i++)
   {
      if (document.forms[0].elements[i].type == 'button' ||
      document.forms[0].elements[i].type == 'submit' ||
      document.forms[0].elements[i].type == 'reset')
      {
         if (!document.forms[0].elements[i].disabled &&
         document.forms[0].elements[i].id != '5')
         {
            document.forms[0].elements[i].disabled = true;
         }
      }
   }
}

function CarregadoClear()
{
   for (var i=0; i < document.forms[0].elements.length; i++)
   {
      if (document.forms[0].elements[i].type == 'button' ||
      document.forms[0].elements[i].type == 'submit' ||
      document.forms[0].elements[i].type == 'reset')
      {
         if (document.forms[0].elements[i].id != '9')
         {
            document.forms[0].elements[i].disabled = false;
         }
      }
   }
}

function Carregado()
{
   for (var i=0; i < parent.document.forms[0].elements.length; i++)
   {
      if (parent.document.forms[0].elements[i].type == 'button' ||
      parent.document.forms[0].elements[i].type == 'submit' ||
      parent.document.forms[0].elements[i].type == 'reset')
      {
         if (parent.document.forms[0].elements[i].id != '9')
         {
            parent.document.forms[0].elements[i].disabled = false;
         }
      }
   }
}

function CarregadoLupa()
{
   for (var i=0; i < parent.document.forms[0].elements.length; i++)
   {
      if (parent.document.forms[0].elements[i].type == 'button' ||
      parent.document.forms[0].elements[i].type == 'submit' ||
      parent.document.forms[0].elements[i].type == 'reset')
      {
         if (parent.document.forms[0].elements[i].id != '9')
         {
            parent.document.forms[0].elements[i].disabled = false;
         }
      }
   }
}

function Delete(p_name_button)
{
   if (confirm('Tem certeza que deseja apagar o registro?'))
   {
      var acao = get_field('acao');
      acao.value = 'DELETE';
      Entrar(p_name_button,'Aguarde...Excluindo dados!');
   }
}

function ValidaEmail(obj)
{
   var ER = /^([\w+\.\-])+\@(([a-zA-Z\d+\-])+\.)+([a-zA-Z\d+]{2,6})+$/;
   if(!ER.test(obj.value) && (obj.value != ''))
   {
      alert('E-Mail inválido!');
      obj.focus();
      return false;
   }
   return true;
}

function add_ponto(p_link){
   if (get_field('id_tecnica').value == 2){
      var link = 'vb_ponto.php';
   }else{
      var link = 'arvore_ponto_new.php';
   }
   AbreJanela(link+p_link,400,780)
}
//
//
//
//
// Adiciona um item no combobox
//
function addSelect(p_name_obj, p_value, p_text)
{
   var v_select = get_field(p_name_obj);

   if (v_select.options.length){
      var v_index = v_select.options.length;
   }else{
      var v_index = 0;
   }
   v_select.options[v_index] = new Option( p_value, p_text, false, false);
}
//
// Limpa o combobox
//
function clearSelect(p_name_obj){
   var v_select = get_field(p_name_obj);

   for (var i=(v_select.options.length-1); i>=0; i--) {
      v_select.options[i] = null;
   }
   v_select.selectedIndex = -1;
}

function somente_numero(campo){
    var digits="0123456789"
    var campo_temp
    for (var i=0;i<campo.value.length;i++){
      campo_temp=campo.value.substring(i,i+1)    
      if (digits.indexOf(campo_temp)==-1){
            campo.value = campo.value.substring(0,i);
            break;
       }
    }
}