function MM_findObj(n, d) { //v3.0
  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); 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 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 WindowOpen(url) {
   var l;
   var t;
   tempStrWidth=url.substr(url.indexOf('&width=')+7,url.length)
   tempStrHeight=url.substr(url.indexOf('&height=')+8,url.length)
   var width=tempStrWidth.substr(0,tempStrWidth.indexOf('&'))
   var height=tempStrHeight.substr(0,tempStrHeight.indexOf('&'))

   l=200;
   t=100;

   var properties = 'channels=0,location=0,toolbar=0,directories=0,status=0' +
',menubar=0,scrollbars=0,resizable=0' + ',copyhistory=0,width=' + width + ',height=' + height + ',top=' + t + ',left=' + l

   var NewWindow = window.open(url,'pop',properties);
 
   if (!NewWindow.focus()) {
      NewWindow.focus();
      return;}
   }

function popupWindow(url, width, height, scroll){
	if (width == "") {
		var properties = "";
	} else {
		var properties = 'width=' + width + ', height=' + height + ', resizable=1, scrollbars=' + scroll;
	}
  	 win=window.open(url,'newwin',properties)
}

function popupMulti(url){

width = '350';
height = '300'
scrollbar =0;

	 var properties = 'channels=0,location=0,toolbar=0,directories=0,status=0' +',menubar=0,scrollbars=' + scrollbar + ',resizable=1' + ',copyhistory=0,width=' + width + ',height=' + height ;

      win=window.open(url,'multiwin',properties)
}

function popupurl(url) {
width = '900';
height = '800'
scrollbar =0;

	 var properties = 'channels=0,location=0,toolbar=0,directories=0,status=0' +',menubar=0,scrollbars=' + scrollbar + ',resizable=1' + ',copyhistory=0,width=' + width + ',height=' + height ;

      win=window.open(url,'popup',properties)
}

function printpopup(url) {
width = '610';
height = '600'
scrollbar =1;

	 var properties = 'channels=0,location=0,toolbar=0,directories=0,status=0' +',menubar=0,scrollbars=' + scrollbar + ',resizable=1' + ',copyhistory=0,width=' + width + ',height=' + height ;

      win=window.open(url,'multiwin',properties)
}

function dbColumn(server,path,view,column){

xmlDoc = new ActiveXObject("Microsoft.XMLDOM");
xmlDoc.async = false;

var pos=0;
currURL = (document.location.href).toLowerCase();
if (trim(server) == "") {
pos = currURL.indexOf('://'); 
if (pos < 0 )
server = "http://11.22.33.44" // PUT YOUR SERVERNAME HERE
else
{
pos += 3;
pos = currURL.indexOf('/', pos);
server = currURL.substring(0, pos)
}
}

if( trim(path) == "" )
{
if( pos > 0 )
{
newPos = currURL.indexOf('.nsf',pos);
if (newPos > 0)
{
path = currURL.substring(pos+1,newPos+4)
}
}
}

if( !isNaN(column) )
column -= 1; 

vurl = trim(server)+"/"+trim(path)+"/"+view+"?readviewentries&login=1&count=9999";
xmlDoc.load(vurl);

nodes = xmlDoc.documentElement.childNodes;
temp = new Array(nodes.length);
var j = 0;
for (var i = 0; i < nodes.length; i++)
{
temp[j] = nodes.item(i).childNodes.item(column).text;
j++;
}

results = new Array(j);
for (var i = 0; i < j; i++)
{
results[i] = temp[i];
}

return(results);
} //End of dbColumn 

function trim(sStr)
{
var iI = 0;
var iJ = 0;
var iTam = 0;
var sAux = "";

iTam = sStr.length;
if(iTam==0) return(sStr);

for(iI=0; iI<iTam; iI++)
if(sStr.charAt(iI)!=' ') break;

if(iI >= iTam) return("");

for(iJ=iTam - 1; iJ>=0; iJ--)
if(sStr.charAt(iJ)!=' ') break;

return(sStr.substring(iI,iJ+1));
} //End of trim