// Global JS file
// 
// COPYRIGHT NOTICE //////////////////////////////////////////////////////////////////////////////////////////////////
// Copyright (c) 2000-2001 Agtown.com.  All Rights Reserved.
//
// License is granted with written permission only. Selling any and/or all parts of this
// code is expressly forbidden. The code may not be redistributed over the 
// Internet or in any other medium without or implimented in any other web applications
// without prior written consent.
//
// Contact Information
// http://www.agtown.com
// agtown@agtown.com
//
// see readme.txt file in root directory for detailed copyright notice.
///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
//
// window open function ->
//	 include the following line outside of a javascript function on the page
// 		var win1 = createWinObj();
//  	include the followin line inside the init(); function on your page
//		win1 = createWinObj();
//	use the following function to open the window
//		winOpen(win1,'/index.asp','newwindow',1, 350, 400, 10, 10);
//		[variable,url of page to open, name of window(no spaces), type of window to open, width, height, coordinate x, coordinate y]
//	use the following function to close the window
//		winClose(win1);
//end window open function ||
// end init

function sObj() {
	this.win = new Array();
}
var nObj = new sObj();

function createWinObj() {
	var x = nObj.win.length;
	return x;
}

function winOpen (x,url,nm,prop,wdth, hght, cordx,cordy) {
	var nProp;
	if (prop == 0) {
		nProp = 'location=no,menubar=no,scrollbars=no,resizable=no,status=no,toolbar=no';
	} else if (prop == 1) {
		nProp = 'location=no,menubar=no,scrollbars=no,resizable=yes,status=no,toolbar=no';
	} else if (prop == 2) {
		nProp = 'location=no,menubar=no,scrollbars=yes,resizable=yes,status=no,toolbar=no';
	} else if (prop == 3) {
		nProp = 'location=no,menubar=yes,scrollbars=yes,resizable=yes,status=no,toolbar=no';
	} else if (prop == 4) {
		nProp = 'location=no,menubar=yes,scrollbars=yes,resizable=yes,status=no,toolbar=yes';
	} else {
		nProp = 'location=yes,menubar=yes,scrollbars=yes,resizable=yes,status=yes,toolbar=yes';
	}
	if (wdth && hght) {nProp = nProp + ',width=' + wdth + ',height=' + hght; }
	if (nObj.win[x] && nObj.win[x].open && !nObj.win[x].closed) {
		nObj.win[x].focus();
	} else {
		nObj.win[x] = window.open(url,nm,nProp);
	}
	nObj.win[x].moveTo(cordx,cordy);
}

function winClose (x) {
	if (nObj.win[x] && nObj.win[x].open && !nObj.win[x].closed) {
		nObj.win[x].close();
	}
}


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) { //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];}
}


// PRINT PAGE FUNCTIONS

var da = (document.all) ? 1 : 0;
var pr = (window.print) ? 1 : 0;
var mac = (navigator.userAgent.indexOf("Mac") != -1); 

function printPage(frame, arg) {
  if (frame == window) {
    printThis();
  } else {
    link = arg; // a global variable 
    printFrame(frame);
  }
  return false;
}

function printThis() {
  if (pr) { // NS4, IE5
    window.print();
  } else if (da && !mac) { // IE4 (Windows)
    vbPrintPage();
  } else { // other browsers
    alert("Sorry, your browser doesn't support this feature.");
  }
}

function printFrame(frame) {
  if (pr && da) { // IE5
    frame.focus();
    window.print();
    if (link) { link.focus(); }
  } else if (pr) { // NS4
    frame.print();
  } else if (da && !mac) { // IE4 (Windows)
    frame.focus();
    setTimeout("vbPrintPage(); link.focus();", 100);
  } else { // other browsers
    alert("Sorry, your browser doesn't support this feature.");
  }
}

if (da && !pr && !mac) with (document) {
  writeln('<OBJECT ID="WB" WIDTH="0" HEIGHT="0" CLASSID="clsid:8856F961-340A-11D0-A96B-00C04FD705A2"></OBJECT>');
  writeln('<' + 'SCRIPT LANGUAGE="VBScript">');
  writeln('Sub window_onunload');
  writeln('  On Error Resume Next');
  writeln('  Set WB = nothing');
  writeln('End Sub');
  writeln('Sub vbPrintPage');
  writeln('  OLECMDID_PRINT = 6');
  writeln('  OLECMDEXECOPT_DONTPROMPTUSER = 2');
  writeln('  OLECMDEXECOPT_PROMPTUSER = 1');
  writeln('  On Error Resume Next');
  writeln('  WB.ExecWB OLECMDID_PRINT, OLECMDEXECOPT_DONTPROMPTUSER');
  writeln('End Sub');
  writeln('<' + '/SCRIPT>');
}