//<!--  

//
// <winlib.js>
//
// Novabase, S.A.
//
// Versão: B
//
// Data: 2007-06-14
//
// Autor: JFialho
//
// Histórico:
//		Rev. A em 2001-01-04
//		Rev. B em 2007-06-14
//



var nPesquisa = '0';

function GetVarUrl(sUrl, sUrlVar)
{
	var sTmp, sVar, sValue, nLenVar, nini, nfim, nPrefix;
    
	sTmp = '' + sUrl;
	sVar = '&' + sUrlVar + '=';
	nPrefix = 1;
	nLenVar = sUrlVar.length;
	nini = sTmp.indexOf(sVar, 0);

	if(nini < 0)
	{
		sVar = '?' + sUrlVar + '=';
		nini = sTmp.indexOf(sVar, 0);
	}	

	if(nini < 0)
	{
		sVar = '' + sUrlVar + '=';
	    nPrefix = 0;
		nini = sTmp.indexOf(sVar, 0);
		if(nini != 0)
		    nini = -1;		
	}

	if(nini >= 0)
	{
	    if(nini > 0 || (nini == 0 && nPrefix == 1) )
	        nLenVar = nLenVar + 2;
	    else
	        nLenVar = nLenVar + 1;
	
		nfim = sTmp.indexOf('&', nini+1);
		if(nfim >= 0)
			sValue = sTmp.substr(nini+nLenVar, (nfim-nini)-(nLenVar));
		else
			sValue = sTmp.substr(nini+nLenVar);
	}
	else
		sValue = '';
	
	return sValue;
}

function ReplaceVarUrl(sUrl, sFindVar, sReplaceValue)
{
	var sTmp, sVar, sValue, nLenVar, nini, nfim;
	
	sTmp = "" + sUrl;
	sVar = '&' + sFindVar + '=';
	nLenVar = sFindVar.length;
	nini = sTmp.indexOf(sVar, 0);
	if(nini < 0)
	{
		sVar = '?' + sFindVar + '=';
		nini = sTmp.indexOf(sVar, 0);
	}	
	
	if(nini >= 0)
	{
		nfim = sTmp.indexOf('&', nini+1);
		if(nfim >= 0)
		{
			sValue = sTmp.substr(0, nini+nLenVar+2) + sReplaceValue + sTmp.substr(nfim);
		}
		else
		{
			sValue = sTmp.substr(0, nini+nLenVar+2) + sReplaceValue;
		}
	}
	else
		sValue = sTmp + '&' + sFindVar + '=' + sReplaceValue;
	
	return sValue;
}

function AppsDoc(url)
{
	var regExp = /'/gi;
	sUrl = url.replace(regExp, "%27");

	urlTmp = "" + location;
	nini = urlTmp.indexOf("winlib.exe", 0);
	urlTmp = urlTmp.substr(0, nini);
	urlTmp = urlTmp + sUrl;
	location = urlTmp;
}

function OpenDoc(sList, sName, nWidth, nHeight)
{
	//window.open(sList, sName, "fullscreen=no,channelmode=no,toolbar=no,location=no,status=no,menubar=no,scrollbars=yes,resizable=yes,width=" + nWidth + ",height=" + nHeight + ",top=100,left=100", true);
	window.open(sList, sName, "fullscreen=no,channelmode=no,toolbar=no,location=no,status=no,menubar=no,scrollbars=yes,resizable=yes", true);
}

function DocPrint()
{
	print();
}

function OpenLista(sList, sName, nWidth, nHeight)
{
	window.open(sList, sName, "fullscreen=no,channelmode=no,toolbar=no,location=no,status=no,menubar=no,scrollbars=yes,resizable=no,width=" + nWidth + ",height=" + nHeight + ",top=100,left=100", true);
}

function OpenHlp(sDoc, nWidth, nHeight)
{
	window.open(sDoc, "HelpWindow", "fullscreen=no,channelmode=no,toolbar=no,location=no,status=no,menubar=no,scrollbars=yes,resizable=no,width=" + nWidth + ",height=" + nHeight + ",top=100,left=100", true);
}

function IsNum(sNumerica)
{
	var i, bFalha, len;
	var sNums = "0123456789";
	
	bFalha = false;
	if(sNumerica != "")
	{
		len = sNumerica.length;
		for(i=0; i<len; i++)
		{
			if(sNums.indexOf(sNumerica.charAt(i)) == -1)
			{
				bFalha = true;
				break;
			}
		}
	}
	else
		bFalha = true;
	
	return !bFalha;
}

function IsAnoValido(sAno)
{
	if( IsNum(sAno) && 
		sAno.length == 4 && 
		sAno.valueOf() >= 1000)
		return true;
	return false;
}

function IsDataValida(sData)
{
	var sAno, sMes, sDia;
	
	if(sData.length == 10)
	{
		sAno = sData.substr(0,4);
		sMes = sData.substr(5,2);
		sDia = sData.substr(8,2);
		
		if( IsNum(sAno) && sAno.valueOf() >= 1000 &&
			IsNum(sMes) && sMes.valueOf() >= 1 && sMes.valueOf() <= 12 &&
			IsNum(sDia) && sDia.valueOf() >= 1 && sDia.valueOf() <= 31 &&
			sData.charAt(4) == '-' && sData.charAt(7) == '-')
			return true;
	}	
	return false;
}

function goBack()
{
	history.back(-1);
}

function LeftTrim(szText)
{
  var szNewText = szText;
  var nlen = szText.length;
  var ctemp = "";
  var icnt = 0;

  for(icnt=0; icnt<nlen; icnt++)
  {
     ctemp = szText.substring(icnt, icnt+1);
     if (ctemp != " ")
     {
       szNewText = szText.substring(icnt, nlen);
       break;
     }
  }
  ctemp = szNewText.substring(0, 1);
  if(ctemp == " ")
    szNewText = "";

  return(szNewText);
}


function RightTrim(szText)
{
  var szNewText = szText;
  var nlen = szText.length;
  var ctemp = "";
  var icnt = 0;

  for (icnt=nlen; icnt>0; icnt--)
  {
     ctemp = szText.substring(icnt-1, icnt);
     if (ctemp != " ")
     {
        szNewText = szText.substring(0, icnt);
        break;
     }
  }

  return(szNewText);
}


function TrimAll(szText)
{
  var szTemp = "";
  var szNewText = "";

  szTemp = LeftTrim(szText);
  if(szTemp != "")  
    szNewText = RightTrim(szTemp);

  return(szNewText);
}

function wlSetCookie(sNome, sConteudo){
	document.cookie = sNome + "=" + escape(sConteudo);
}

function wlGetCookie(sNome){
	var aCookies = '';	// array de todos os cookies (separador de cookie é ';')
	var aCookie = '';	// array para cookie (separador nome,conteudo é '=')
	var sCookie = '';
	var iCookie = 0;

	aCookies = document.cookie.split(';'); // preenche o array de cookies
	for(iCookie = 0; iCookie<aCookies.length; iCookie++)
	{
		aCookie = aCookies[iCookie].split('=');
		if(TrimAll(aCookie[0]) == sNome)
		{
		    if(aCookie[1] != undefined)
		        sCookie = unescape(TrimAll(aCookie[1]));
            else
                sCookie = '';			
			break;
		}
	}

	return sCookie;
}

function wlClearAllCookies()
{
	var aCookies = '';	// array de todos os cookies (separador de cookie é ';')
	var aCookie = '';	// array para cookie (separador nome,conteudo é '=')
	var sCookie = '';
	var iCookie = 0;
	var sCookieName = '';
	var dDate = new Date(); 

	dDate.setTime(dDate.getTime() - 1); 
	aCookies = document.cookie.split(';'); // preenche o array de cookies
	for(iCookie = 0; iCookie < aCookies.length; iCookie++)
	{
		aCookie = aCookies[iCookie].split('=');
		sCookieName = TrimAll(aCookie[0]);
		if(sCookieName != '')
			document.cookie = sCookieName + '=; expires=' + dDate.toGMTString();// + '; path=/'; 
	}

	return;
}

function GetUrlVarValue(sNome){
	var sQueryString = "";
	var aParams = "";	// array de todos as variaveis (separador de variável é '&')
	var aParam = "";	// array para variaveis (separador nome,conteudo é '=')
	var sParam = "";
	var iParam = 0;

	sQueryString = location.toString();
	iParam = sQueryString.indexOf('?', 0);
	if(iParam >= 0)
	{
		sQueryString = sQueryString.substr(iParam+1);
		aParams = sQueryString.split("&"); // preenche o array de variaveis
		for(iParam = 0; iParam<aParams.length; iParam++)
		{
			aParam = aParams[iParam].split("=");
			if(aParam[0] == sNome)
			{
				sParam = unescape(aParam[1]);
				break;
			}
		}
		if(sParam == "undefined")
			sParam = "";
	}
	else
		sParam = "";
	
	return sParam;
}


//-->